可视化设计第四章课件.pptVIP

* 一个循环体内又包含了一个完整的循环结构称为循环的嵌套. 例题：打印九九乘法表. For i = 1 To 9 For j = 1 To 9 For j = 1 To i se = i × j = i * j Picture1.Print Tab((j - 1) * 9 + 1); se; Next j Picture1.Print Next i 思考：打印上三角或下三角程序如何改动？要打印下三角? 循环的嵌套 * (1)内循环变量与外循环变量不能同名； (2)外循环必须完全包含内循环，不能交叉； (3)不能从循环体外转向循环体内，也不能从外循环转向内循环,反之则可以。 正确 错误 For ii =1 To 10 For ii=1 To 20 … Next ii Next ii For ii =1 To 10 For jj=1 To 20 … Next jj Next ii For ii =1 To 10 For jj=1 To 20 … Next ii Next jj For ii =1 To 10 … Next ii For ii =1 To 10 … Next ii 对于循环的嵌套，要注意以下事项： 第四章 VB控制结构 顺序结构 选择结构 循环结构 * 顺序结构－赋值语句 赋值语句：把等号右边的值赋给左边的变量 变量名=表达式 Text1.text=“Visual Baisc” n%=3.5 n%=“123” n%=True 顺序结构－数据的输入和输出 InputBox函数： InputBox(提示[,标题][,缺省][,x坐标值][,y坐标值]) strName=InputBox(“Please Input your name”, “输入框”) 标题 提示 例 源程序 MsgBox函数： 变量[%]=MsgBox(提示[,按钮][,标题]) MsgBox过程： MsgBox 提示[,按钮][,标题] 按钮:整型表达式,决定信息框按钮数目和类型及出现在信息框上的图标类型。 s1=msgbox( “真的删除”,VbYesNo+VbQuestion+VbDefaultButton1,”输入框”) 顺序结构－数据的输入和输出 例 编一帐号和密码检验程序。 要求: 帐号不超过6位数字,有错,清除原内容再输入。密码输入时在屏幕上以 “*”代替; 若密码错,显示有关信息,选择“重试”按钮,清除原内容再输入,选择“取消”按钮,停止运行。 源程序 顺序结构－数据的输入和输出 Print方法 Print [定位函数][输出表达式][分隔符] Spc(n):输出时插入n个空格 Tab(n):定位从对象最左算起的n列 分号分隔符:定位在上一个显示的字符后 逗号分隔符:定位在下一个打印区 无分隔符:输出后换行 * 顺序结构－数据的输入和输出 Format函数 Format(表达式,”格式字符串”) * Dim a as single a=12.2345 Print “a=“ ; Format(a,”0.00”) 顺序结构－数据的输入和输出 实例 * 顺序结构－数据的输入和输出 顺序结构－选择结构 If…Then语句 If 表达式Then 语句块 Endif If 表达式 Then 语句 说明： 表达式为关系表达式、逻辑表达式或算术表达式，表达式 的值按非零为True，零为False进行