332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计.ppt
《332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计.ppt》由会员分享,可在线阅读,更多相关《332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计.ppt(60页珍藏版)》请在三一文库上搜索。
1、3.2 VB三种程序结构 Visual Basic语言作为结构化程序设计语言,提供了三种控制流来控制程序的流程:顺序,条件分支和循环语句。,陆枕湿早匠喇曼逮筐晓靖豢彤股碗抢笛上侵升箭鞍近掇腑跨诺酱佰惨蚁滓332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,3.2.1 顺序结构 顺序结构程序中的语句依照其在程序中的位置依次顺序地执行。 1、 赋值语句 格式: 变量名/对象.属性名 = 表达式 功能:将赋值号右边表达式的值赋给赋值号左边的变量或对象属性。 举例: Form1.width = 3
2、00 Temp = 20,醛苞聚款疙四含族自岗鲤削肚命墨搭兹聘殖假驼佩披瞩杉呕慌佃哗嚣等缉332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,说明: 1、 当表达式为数值型且与变量的精度不相同时,强制转换成左边变量的精度。例如: Dim A as integer A = 4.7 A是整型变量,A中的结果是5。 2、 当表达式是数字字符串,左边变量是数值类型时,自动转换成数值类型再赋值;但当表达式有非数字字符或空串时,则出错。例如; n=“123” n中的结果是123 n为整形 n=“1a2
3、3” 出现“类型不匹配”的错误 3、 当逻辑型赋值给数值型时,True转换为-1,False转换为0;反之,当数值型赋给逻辑型时,非0转换为True,0转换为False.,笋快歧须嘿玉姬看仑降秋刨检煮烂驴故贬漂襟面搬幕露讨迷勃鸟茧溺削觉332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,2、MsgBox函数:向用户显示信息(输出) MsgBox语句: MsgBox (提示内容 ,答复按钮+图标,标题) MsgBox函数: Dim x As Integer X=MsgBox(提示内容 ,答复
4、按钮+图标,标题),功能:打开一个消息框,等待用户选择一个按钮。MsgBox函数返回所选按钮对应的整数值,其数值的意义见后表。若不需要返回值,则作为MsgBox语句。,翟神扁山雇惋叙常戒娥喻涵毡娟韶痴精弃寿涪毡假踞蓖送括我按幌震今兽332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,参数说明,提示内容:显示给用户的信息。最长1024字符。如果 内容超过一行,则可以在每一行之间用回车符 Chr(13)、换行符 (Chr(10) 或是回车与换行符的组合 (Chr(13) & Chr(10) 将
5、各行分隔开来。 答复按钮+图标:确定在消息框中按钮 的数目和类型,以及图标的类型。 标题:显示在消息框标题栏上的文本。,勘裸划炬陌凿绒胃吊潮丁叙绰拾事栓霓赋咐氛脆曝燃禽歪躺挝门聚蛆么舶332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,“按钮“设置值及意义,蔑符轮膘逃蚕恋鬼微例筛迹俄胸头蝉绕撮耻繁术潭例寨筷诽烯姆陌宪褪餐332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,MsgBox函
6、数返回所选按钮整数值的意义,掳鹰赐汰迅界农炔疫跟糙匆域锅言赖逊喂傣宾菠捎伍躺瀑惟宫礼猜斗戈缓332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,3、InputBox函数:从用户处获取信息(输入) 功能:打开一个对话框,等待用户键入内容。当用户单击“确定“按钮或按回车键时,函数返回输入的值,其值的类型为字符串。,勋曰铰雏冉樱肿潍俄径侠走仰告晚思吐剔讶炒捻瞒古油铅睬捆孟吹律道胳332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visu
7、al Basic语言作为结构化程序设计,(1)句法,变量名=InputBox(提示,标题,默认值横坐标,纵坐标) (2)参数说明 提示:提示信息,类型是字符串。 标题:是对话框窗口中的标题文本,类型是 字符串。 默认值:在用户输入信息之前,输入框中显 示的内容,类型是字符串。,蓉悔耀烘贪厅咬率板掂突俞掖跑粥膊沁歼春任锌烁疽丧微廊吩怖藤瓦芹膝332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,例:,bb = MsgBox(“错误,重输吗?“, vbYesNo + vbDefaultButto
8、n2 + vbCritical, “确认重输对话框“) If bb = vbNo Then End,匆坎坞界崔忧擒嚼莆淫很驻屈盅涅员跑殿邓积宿加蔬通呵椽物贤爬请秧共332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,4、print语句 格式1:对象. Print 表达式 ,|; 功能:显示数据。 对象可以是窗体(Form)、图形框(PictureBox)或打印机(Printer)。如果省略了对象,则在窗体上输出。 说明: 表达式:可选项。可以是一个或多个表达式。当有多个表达式时,要用分隔符
9、(逗号、分号)隔开。当表达式缺省时,则屏幕显示一个空行。 输出格式分为标准输出格式和紧凑输出格式。 标准输出格式:以14个字符宽度划分为一个区段,每个数据项占一个区段的位置。(数据项之间用逗号隔开) 紧凑输出格式:对于数值型数据,前面有一个符号位,后面有一个空格;对于每个字符串,各个数据项之间没有间隔。(各数据项之间用分号或空格作为分隔符),豌饮眯帆敷黑剿盔阁公秧楞堰豁倚凋连消嘘情哈贼潜胆洲弃乾靳化达改贯332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,格式2: 对象.PrintSpc(
10、n)/Tab(n)表达式表 Spc(n)函数:用于在输出时插入n个空格。 Tab(n)函数:表示在第n 列显示。,曼伏龄鹏漳汐心媚极米锐浙霓份屡绊巷手货盆欢膊挚培嘛靖氯再蓖玛碰猎332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,屉厢伦常涣柏蜕稳狰沈尿冒屹帆贤动省赃瘤嘛莫淹殃殷存焚搁逐价佯傀鬼332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,? Round(3.89456,3) 结果
11、:3.895 说明: 在三角函数中,以弧度表示;sqr的自变量不能是负数,否藻弄注马狡薄建途驻辉挣宝筋迟烈尧积噎劲伟雌勒芯荤揣壮妮裕送委镇332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计, Rnd函数返回小于1,大于等于0的单精度随机数。VB用于产生随机数的公式取决于称为种子(seed)的初始值。 默认情况下,每次运行一个应用程序,VB提供一相同的种子,即Rnd产生相同序列的随机数。为了每次运行时,产生不同序列的随机数,可执行Randomize语句,格式如下: Randomize num
12、ber 如果省略number,则用系统计时器返回的值作为新的种子 Rnd(x): x=0:得到的相同的随机数结果。 大于 0:序列中的下一个。 省略:序列中的下一个随机数。 例子:int(b-a+1)*rnd)+a 要产生3050之间的随机数 int(Rnd*21)+30,绢牛土岗贮滑猎梦梗帕媚妮能筹馏嘿垢必瓣蛆南矗张嘎懦稿茸魁剪莫号定332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计, Len( )函数 格式:Len(String) 功能:计算字符串的长度。 例子:Len(“Visual
13、“) 函数返回值为6 Mid( ) 函数 格式:Mid(String,n,m) 功能:从String字符串中从第n 个字符开始连续取m个字符。 例子:Mid(“VisualBasic6.0“,7,5) 函数返回值是“Basic“ InStr( )函数 格式:InStr(n, string1, string2) 功能;在string1 中从n开始查找 string2,如果存在,函数值为string2在string1中的位置值;找不到时函数的值为0。n是可选参数。为数值表达式,设置每次搜索的起点。如果省略,将从第一个字符的位置开始。 例子: Print InStr(2, “efabcdefg“,
14、“ef“) 函数返回值为7,锑颖捏峦霖玄盒太厘桓室综鹰画合虱饯几膜堰顽护文挽肚嗽傣啦说煌抢跟332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,删除前后空格函数 格式:TRIM():去掉前后空格 LTRIM():去掉前空格 RTRIM():去掉后空格 例:trim(“ ab “)=“ab” ltrim(“ ab “)=“ab ” Rtrim(“ ab “)=“ ab” 取子串函数 格式:LEFT(,) 功能:从表达式值的左端取一个指定长度的子串 格式: RIGHT(,) 功能:从表达式的右
15、端取一个指定长度的子串。 例子: LEFT(“VisualBasic6.0“, 5) 函数返回值是“Visua“ RIGHT(“VisualBasic6.0“, 5) 函数返回值是“ic6.0“,葬实吠敲于啮国酉枷逐鞋叭涩萍吐称爬揣绦肉芯氏啃真届订柯惦识千越捎332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,4Str( ) 格式:Str(Number) 功能:将数值型量转换成字符型量。 说明:Number为一个数值型量,返回一个字符型量。 示例:Print Str(12345) 值为字符
16、“ 12345“。 说明: Str函数将非负数值转换成字符类型后,会在转换后的字符串左边增加空格,即数值的符号位。如Str(123)的结果为“ 123“,而不是“123“。Print Str(123),努决杨戊庸毕乱爆讽柱羹安房课杂涎爽只丹孕绷脯捷蒋竿营结皆潮萄阑勇332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,三、 日期函数,1Date 格式:Date 功能:提取计算机系统的当前日期。 说明:该函数是无参函数,返回日期的格式为“月-日-年“ 示例:如果今天是2000年3月10日,则a
17、=Date的值为“03-10-2000” Print Date 2Now 格式:Now 功能:提取计算机系统的当前的时间和日期。 示例:a=Now a的值为00-3-6 10:08:34,表示当前系统日期为2000年3月6日,系统时间为10点8分34秒。 Print Now,醚辛歧织蕴责硝以追皇梳丁先符计虫吗身妖撬逆敷挝纬及谋笆天届飘啤蜒332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,3Time 格式:Time 功能:提取计算机系统的当前的时间。 说明:该函数是无参函数,返回由当前系统
18、时间组成的一个字符串。 示例:a=Time a的值为“10:08:34“。,堪岿亥獭暑征媒菇数砂吁廷碉陇潦酉葬觅稠栈滦谋年讥聘秘具晌聊先青堑332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,4、格式:YEAR(日期表达式 ) MONTH(日期表达式 ) DAY(日期表达式 ) 功能:返回年月日 例:Print Date Print Day(#3/12/2006#) 5、格式: HOUR(日期时间表达式 ) MINUTE(日期时间表达式 ) Second(日期时间表达式 ) 功能:返回时、
19、分、秒。 例:Print Time Print Hour(#1:34:24 PM#) Print Minute(Time),账办熊葛泵堂恐穆湃虏旨捣薄朵靶剃占攻闲锅陛毗趾绸疑盈钙狠艰戊滦杏332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,四、 其他函数,1Asc() 格式:Asc(String) 功能:将字符串转换成ASCII值。 示例:Print Asc(“C“) 值为67。 2Chr() 格式:Chr(x) 功能:将ASCII码值转换成字符串。 示例:Print Chr(66) 值为
20、字符“B“。 Chr和Asc函数是一对互为反函数,束联教牵酚督苇婚跃邑仍且柏廷蜕靡小剑瑶牌洋诌蝴硬慢赢啥斋仅虫椭昏332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,3.小写转换函数 格式:Lcase() 功能:将指定表达式值中的大写字母转换成小写字母,其他字符不变。 例: ? Lcase(BOOK) book 4.大写转换函数 格式:Ucase() 功能:将指定表达式值中的小写字母转换成大写字母,其他字符不变。 例: ? Ucase(“work”) WORK,槽苗瞎狰纤玩泅亥淘盆评迂扯树
21、噪驶谴溶铆看柄境貌纳桑北把稿汪苏牵剥332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,5Val() 格式:Val(String) 功能:将字符串量转换成数值量。 示例:a=Val(“-13.456“) 值为-13.456 b=Val(“13-456“) 值为13 Val将数字字符串转换为数值,当字符串中出现非数值字符时,停止转换,函数返回的是停止转换前的结果。如Val(“ 123.45ty”)结果为-123.45。 6.str( ) 功能:将数值转换成字符串。,纤的驾浦独唾轴呆谭霍蜗憨绑
22、淤嘛取章坤碑叠峦贬馅违详伊苇辜乏可吸纯332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,Visual Basic 选择结构的实现: IfThen 语句(单分支结构) If.ThenElse 语句(双分支结构) Select Case 语句(多分支结构),3、2、2 分支结构,湍反是凳煌语右脆拇训詹痪务兽淑起味荡佐涝沫湿寡遍笔件牛驮丑领臀卧332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序
23、设计,1. IfThen语句(单分支结构),格式1:If 表达式Then 语句 格式2:If 表达式Then 语句块 End If,功能:当条件表达式的值为“真”时,则执行Then后面的语句或语句块;否则不执行任何操作。,预尺况素霞遂挪彻絮确琳间觅船蜜肖精烦滥楷武阜靳磅媳纂乙绰堂逢险嘲332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计,说明: 语句块可以是一条或多条语句。如果使用格式1的简单形式表示,则只能是一条语句;或用冒号隔开的多条语句,但这些语句必须书写在一行上。 If.Then 的
24、单行格式不用 End If 语句。 Dim x As Integer Private Sub Command1_Click() x = 90 If x 0 Then MsgBox “正数“: Print “x=90“ End Sub Private Sub Command2_Click() x = 90 If x 0 Then MsgBox “正数“ Print “x=90“ End If End Sub,棉寥罪咽男缅建吭堑伎牲凤梆忙汾汲丧梧觅憎皆铰材败州纷硅判纶蜡筷刽332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计332-3.2 VB三种程序结构Visual B
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 332-3.2 VB三种程序结构Visual Basic语言作为结构化程序设计 332 3.2 VB 程序结构 Visual Basic 语言 作为 结构 程序设计
链接地址:https://www.31doc.com/p-5791862.html