VB程序设计基教程第四章.pptVIP

第四章 控制结构 编写程序三个环节 数据输入 数据处理(计算) 数据输出 4.1 顺序结构 在顺序结构中，各语句是按照书写顺序依次执行的，这是一种最简单的控制结构。 例如： ● Text1.Text=”” ”” ● Text1.Text=””欢迎使用Visual Basic6.0 ”” ● S1=89 ● AV= (S1+ S2)/2 ● FileName$=””student_addrss”” ● n=n+1 -------------用于计数 ● sum=sum + 10 -------------用于累加。 赋值语句的有关规定 例如：输入圆的半径，求圆的面积。 功能：在屏幕上打开一个对话框，等待用户输入内容，当用户单击“确定”按钮或按回车键时，函数返回输入的值，其值的类型为字符串。 提示 ：提示用户操作的信息， 标题： 标题区显示 默认： 字符串或字符串表达式，输入区的默认内容 X、Y坐标位置: 对话框在屏幕上的的位置。单位为Twip [ ]: 表示其中的内容可以省略，全部省略后的语句形式为: 用Inputbox函数输入圆半径，求圆面积。 例4.1编写一个程序，通过调用InputBox函数，在屏幕上显示一个数据输入对话框。 Private Sub Form_click() Dim strName As String*20 Dim strS As String*20 strS=请输入你的姓名+Chr(13)+Chr(10)+然后单击确定按钮 strName=InputBox$(strS, 输入框, , 200,200) End Sub 功能：在屏幕上打开一个信息框，等待用户选择一个按钮。MsgBox函数返回所选按钮的整数值，其数值的含义见教材第四章表4.1。 按钮: 整数表达式，决定信息框按钮的数目和类型及出现在信息框上的图标类型，其设置见表4.2. print方法的语句格式为： ［对象名.］Print [{spc(n)|tab(n)};] [表达式列表][;|,] 用于清除运行时在窗体或图形框中显示的文本或图形。 形式为：(对象.)Cls “对象”为窗体或图形框，省略时默认为窗体。 例如： Picture1.Cls 清除图形框 Cls 清除窗体 用于退出某种控制结构的执行。 有多种形式为：Exit for、Exit Do等 例如： For i=1 To 5 　　 Print Tab(15-i);String(i,●); Print Tab(30-i);String(i,⊙) If i=3 then Exit for Next i 4.2 选择结构 选择结构通过对条件的判断来选择一个分支。VB中提供了多种形式的条件语句和函数来实现选择结构，如If、Select Case等。 例如 求十个数之和 Dim num!, tol!, n! Private Sub Command1_Click() num = InputBox(请输入数据) tol = tol + num n=n+1 End Sub 单行形式与多行形式 【例如】：已知两个变量x和y，比较它们的大小，使得x总是小于y的值。 例：编程实现轮流变换窗体背景颜色。要求最少要有四种颜色，如红、绿、蓝、黄。 Dim i As Integer Private Sub Form_Click() i = i + 1 If i 4 Then i = 1 If i = 1 Then Form1.BackColor = vbRed If i = 2 Then Form1.BackColor = vbGreen If i = 3 Then Form1.BackColor = vbBlue If i = 4 Then Form1.BackColor = vbYellow End Sub 例4.5 在窗体上输出整数a、b中的大数 Private Sub Form_Load() AutoRedraw=True FontItalic=True 字形设为斜体 a%=5:b%=9 If ab Then Print 大数是：; a Else Print 大数是：; b End If End Sub