32VB三种程序结构VisualBasic语言作为结构化程序设计语言,提供课件.ppt

3.2 VB三种程序结构 Visual Basic语言作为结构化程序设计语言，提供了三种控制流来控制程序的流程：顺序，条件分支和循环语句。 3.2.1 顺序结构 顺序结构程序中的语句依照其在程序中的位置依次顺序地执行。 1、 赋值语句 格式： 变量名/对象.属性名 = 表达式 功能：将赋值号右边表达式的值赋给赋值号左边的变量或对象属性。 举例： Form1.width = 300 Temp = 20 说明： 1、 当表达式为数值型且与变量的精度不相同时，强制转换成左边变量的精度。例如： Dim A as integer A = 4.7 ˊA是整型变量，A中的结果是5。 2、 当表达式是数字字符串，左边变量是数值类型时，自动转换成数值类型再赋值；但当表达式有非数字字符或空串时，则出错。例如； n=“123” ‘n中的结果是123 ’n为整形 n=“1a23” ‘出现“类型不匹配”的错误 3、 当逻辑型赋值给数值型时，True转换为-1，False转换为0；反之，当数值型赋给逻辑型时，非0转换为True，0转换为False. 2、MsgBox函数：向用户显示信息（输出） MsgBox语句: MsgBox （提示内容 [,答复按钮+图标][,标题]） MsgBox函数： Dim x As Integer X=MsgBox(提示内容 [,答复按钮+图标][,标题]) 参数说明 提示内容：显示给用户的信息。最长1024字符。如果 内容超过一行，则可以在每一行之间用回车符 Chr(13))、换行符 (Chr(10)) 或是回车与换行符的组合 (Chr(13) Chr(10)) 将各行分隔开来。 答复按钮+图标：确定在消息框中按钮 的数目和类型，以及图标的类型。 标题：显示在消息框标题栏上的文本。 3、InputBox函数：从用户处获取信息（输入） 功能：打开一个对话框，等待用户键入内容。当用户单击确定按钮或按回车键时，函数返回输入的值，其值的类型为字符串。 （1）句法 变量名=InputBox(提示[,标题][,默认值][横坐标，纵坐标]) （2）参数说明 提示：提示信息，类型是字符串。 标题：是对话框窗口中的标题文本，类型是 字符串。 默认值：在用户输入信息之前，输入框中显 示的内容，类型是字符串。 例： bb = MsgBox(错误，重输吗？, vbYesNo + vbDefaultButton2 + vbCritical, 确认重输对话框) If bb = vbNo Then End 4、print语句 格式1：对象. Print [表达式] [{，|；}] 功能：显示数据。 对象可以是窗体（Form）、图形框(PictureBox)或打印机（Printer）。如果省略了对象，则在窗体上输出。 说明：① 表达式：可选项。可以是一个或多个表达式。当有多个表达式时，要用分隔符（逗号、分号）隔开。当表达式缺省时，则屏幕显示一个空行。 ② 输出格式分为标准输出格式和紧凑输出格式。 标准输出格式：以14个字符宽度划分为一个区段，每个数据项占一个区段的位置。（数据项之间用逗号隔开） 紧凑输出格式：对于数值型数据，前面有一个符号位，后面有一个空格；对于每个字符串，各个数据项之间没有间隔。（各数据项之间用分号或空格作为分隔符） 3.小写转换函数 格式：Lcase(字符表达式) 功能：将指定表达式值中的大写字母转换成小写字母，其他字符不变。 例： ? Lcase(BOOK) book 4.大写转换函数 格式：Ucase(字符表达式) 功能：将指定表达式值中的小写字母转换成大写字母，其他字符不变。 例： ? Ucase(“work”) WORK 5．Val（） 格式：Val(String) 功能：将字符串量转换成数值量。 示例：a=Val(-13.456) 值为-13.456 b=Val(13-456) 值为13 Val将数字字符串转换为数值，当字符串中出现非数值字符时，停止转换，函数返回的是停止转换前的结果。如Val(“ –123.45ty”)结果为-123.45。 6.str( ) 功能：将数值转换成字符串。 Visual Basic 选择结构的实现： ? If…Then 语句（单分支结构） ? If...Then…Else 语句（双分支结构） ? Select Case 语句（多分支结构） 1