第6章 顺序结构

null第6章 顺序结构第6章 顺序结构本章的学习要点 数据输入 数据输出： （1）Print方法 （2）与Print方法有关的函数（Tab、Spc、S pace $） （3）格式输出（Format $） InputBox函数 MsgBox函数和MsgBox语句 程序结构概述程序结构概述结构化程序由三种基本控制结构组成， 即顺序结构、分支结构和循环结构。 这三种基本结构可以组成所有的各种复杂程序。 顺序结构是一种简单的程序结构，即按程序段中语句出现的先后顺序依次执行的结构。先执行A操作，其次执行B操作， ……，最后执行N操作， 它们都是顺序执行的关系。6.1 注释语句6.1 注释语句 为了提高程序的可读性，在程序的必要位置加上注释是有用的。注释语句就起此作用，以方便自己或他人理解语句的含义。 注意注释语句是非执行语句。 注释语句有两种定义格式： Rem 注释内容 ’注释内容 功能：用来对程序中的语句进行注释说明。 6.1 注释语句6.1 注释语句说明： 注释语句可单独占一行，也可以放在语句的后面; 若在语句行后面使用Rem关键字，则必须使用冒号“：”与语句隔开; 若在语句行后面使用“ ’ ”,则不必使用冒号; 单引号应是半角英文的直撇号。6.1 注释语句6.1 注释语句例如： Private Sub Command1_Click() Text2.Text = Text1.Text ’将文本框1里面的内容赋给文本框2 Rem将文本框1里面的内容赋给文本框2 End Sub6.2 数据的输入6.2 数据的输入 所谓输入是指在执行程序时需要从外界获取的必要信息。输入可以有多个，也可以没有。 VB中可以有多种基本输入方式，包括赋值语句、文本框的输入和InputBox函数等。 6.2.1利用赋值语句输入数据 VB编程语言中用“＝”作为赋值运算符，简称赋值号。赋值语句的语句格式为： [Let] 变量名＝常量|变量|表达式|对象的属性 6.2.1 利用赋值语句输入数据6.2.1 利用赋值语句输入数据说明： 在上述格式中，赋值语句的功能是将赋值号右边的表达式的值赋给赋值号左边的变量； 其中赋值号左边的变量可以是用户自定义的变量，也可以是对象的属性； 赋值号右边的表达式可以是常量、表达式、文本框等控件中获取的值，也可以是由InputBox函数提供的值 。6.2.1利用赋值语句输入数据6.2.1利用赋值语句输入数据注意： 赋值号两边的数据类型必须保持一致性或兼容； 赋值语句先计算右边表达式的值，再将结果赋给左边的变量； 赋值号与数学中“等号“在概念上有所区别。数学中等号为判断左右两值是否相等。 例如： Let X＝X＋1 ’变量X加上1以后赋给左边的变量X6.2.1利用赋值语句输入数据6.2.1利用赋值语句输入数据例6-1．求半径为3的圆周长 Private Sub Command1_Click() Const p = 3.1415 Dim r As Single, L As Single r = 3 L = 2 * p * r Text1.Text = L End Sub6.2.2使用文本框输入数据6.2.2使用文本框输入数据 文本框控件具备Text的属性，程序可以通过获取文本框Text属性值来得到相关的信息，也可以将信息以文本框Text属性向外显示。故在很多程序中利用文本框完成信息的输入与输出。6.2.2使用文本框输入数据6.2.2使用文本框输入数据例6-2．单击按钮时，将Text1内的内容复制到Text2中。 Private Sub Command1_Click() Text2.Text = Text1.Text End Sub运行效果6.2.3 InputBox函数6.2.3 InputBox函数InputBox函数的作用： 生成一对话框来显示提示，等待用户在文本框里输入内容或按下按钮，并输入文本框中内容。函数的返回值的类型为 String类型。 InputBox函数的语法格式： X=InputBox(提示信息,[标题[,缺省值][,X坐标,Y坐标][,帮助文件,上下文]]) 标题提示信息缺省值6.2.3 InputBox函数6.2.3 InputBox函数6.2.3 InputBox函数6.2.3 InputBox函数6.2.3 InputBox函数6.2.3 InputBox函数例如： X＝InputBox （“请输入任意字符串”, “输入”） 生成的对话框为:标题提示信息6.2.3 InputBox函数6.2.3 InputBox函数例6-3．单击按钮时，弹出对话框，并将用户输入的信息显示在文本框里。 Private Sub Command1_Click() Dim i As String ‘定义字符串变量i i = InputBox("请输入任意字符串", "输入") Text1.Text = i ’ 通过文本框显示i的值 End Sub6.3 数据的输出6.3 数据的输出 程序设计的最终目的是给用户一个答案，将计算的结果应显示在用户界面上以供用户观看。因此对于一个完整的程序，数据的输出是不可缺少的。 在VB程序设计中，数据的输出可以有多种方式：Print方法输出、MsgBox函数等。6.3.1 Print方法 6.3.1 Print方法 Print方法是很多VB对象所具备的方法，包括窗体、图片框或打印机等。使用Print方法可以在上述对象上显示字符串和表达式的值。 语法格式如下： [对象名.]print[{常量|变量|表达式[{,|;}]]…… 说明： 对象名可以是Form、PictureBox或Printer。如果省略对象名，则在窗体上输出。 表达式可以是数值表达式或字符串表达式。当输出多个表达式时，表达式之间可以用“，”、“；”或“ ”隔开。6.3.1 Print方法6.3.1 Print方法若要使后面执行Print时还在本行输出，可以在末尾加“；”或“，”。 单独一个“Print”效果即为换行。 6.3.1 Print方法6.3.1 Print方法(1)Tab函数 语法格式：Tab（n） 功能： 可选的 n 参数是在显示或打印列表中的下一个表达式之前移动的列数。若省略此参数，则 Tab 将插入点移动到下一个打印区的起点。当 Print 方法与 Tab 函数一起使用时，打印的外观将会被分割为均匀、定宽的列。各列的宽度等于选用字体内以磅数为单位的所有字符的平均宽度。6.3.1 Print方法6.3.1 Print方法(2)Spc函数或Space[$]函数 语法格式：Spc(n)或Space(n) 功能：跳过n个空格后再输出下一个输出项。6.3.2 MsgBox函数6.3.2 MsgBox函数MsgBox称为消息对话框，用于创建一个消息框，等待用户选择一个按钮，并通过返回值将用户的选择作为程序继续执行的依据。信息框中通常显示一些提示信息、出错信息或者警告信息等。6.3.2 MsgBox函数6.3.2 MsgBox函数MsgBox函数的语法格式如下： [Action＝]MsgBox（提示信息，显示类型，标题） 说明： （1）提示信息显示在提示框内； （2）显示类型为对话框所显示的效果； （3）Action获取用户所选择按钮对应的返回值。6．4 MsgBox函数6．4 MsgBox函数6.3.2 MsgBox函数6.3.2 MsgBox函数6.3.2 MsgBox函数6.3.2 MsgBox函数6.3.2 MsgBox函数6.3.2 MsgBox函数注意： （1）设置MsgBox函数中的type函数类型时，既可以将所需的符号常量类型用“＋”连接起来，又可以直接将符号常量对应的数值加起来作为设置。 6.3.2 MsgBox函数6.3.2 MsgBox函数MsgBox "欢迎光临！", vbOKOnly + vbInformation, "欢迎" MsgBox "欢迎光临！", 64, "欢迎" 0646.3.2 MsgBox函数6.3.2 MsgBox函数MsgBox “网络连接出现问题，是否重试？", 274, "警告" 2＋16＋256 vbAbortRetryIgnore+ vbCritical+vbDefaultbutton26.3.2 MsgBox函数6.3.2 MsgBox函数（2）若返回值不需要做进一步的判断则可以省略“Action＝”，同时使用MsgBox函数的时候不用圆括号。 例如： x = MsgBox("是否退出？", vbOKCancel, "提示") 在弹出的对话框中若选择“确定”按钮，则x＝1，否则x等于2。6.3.2 MsgBox函数6.3.2 MsgBox函数