VBnet第6课.ppt

上周回顾 改进： 对于“分数”菜单，参照样张当输入非数字时不出现任何结果 上周回顾 改进： 对于“退出”菜单，参照样张弹出对话框 上周回顾 增加”Select Case分数”按钮，在该按钮的Click事件中用Select case语句实现分数菜单的功能（注意，只是在判断各个等级的时候用Select Case） * Visual Basic.NET 程序设计（6） 授课教师：柳 青 电 话办 公 室 ：学院楼B418 E-mail：Liuq@ * Visual Basic.NET 程序设计 第六课 基本的控制结构：循环 * 复合赋值语句 复合赋值运算符： +=、-=、*=、\=、/=、^= 、= 复合赋值语句的形式： 变量名 复合赋值运算符 表达式 作用： 计算右边表达式的值 再与左边的变量进行相应的运算 最后赋值给变量 如：a*=b+4 等价于a=a*(b+4) * 复合语句常用形式 累加 Sum+=x 等价于sum=sum+x 计数 n+=1 等价于n=n+1 显示多行信息 =表示将上一行的内容与本行内容连接 TextBox1.Text = Visual Basic.NET vbCrLf TextBox1.Text = 程序设计教程 vbCrLf * For循环语句——计数型循环语句 For 循环变量 = 初值 To 终值 [Step 步长] 语句块 [Exit For] Next [循环变量] 说明： 循环变量必须为数值型 步长缺省时步长为1 Exit For 当遇到该语句，退出循环 循环体 * 循环次数 For i=1 to 10 For i=1 to 10 step 2 For i=10 to 1 step -1 * 例：计算1~100的奇数和 S=0 For n=1 To 100 Step 2 s+=n 等价于S=S+n Next n n：循环变量 1：初值 100：终值 Step 2：步长，可正负 循环变量 n取初值1 若超过终值100，转6 执行语句块 S+=n 增加步长 n += 2 转2 Next的下一句 思考：1~100的偶数和怎么做？1~100的和怎么做？ * 比较 1到100的奇数和 S=0 For n=1 To 100 Step 2 s+=n 等价于S=S+n Next n 1到100的偶数和 S=0 For n=2 To 100 Step 2 s+=n Next n 1到100的和 S=0 For n=1 To 100 s+=n Next n 1到100的积 S=1 For n=1 To 100 s*=n 等价于S=S*n Next n * 例：计算阶乘和 计算： tt=0 s = 1 For n = 1 To 100 s *= n tt + =s Next n 1到100的积 S=1 For n=1 To 100 s*=n 等价于S=S*n Next n * 示例：“计算数列”按钮（n个数的阶乘之和） 注意 数值均有范围，这里n不能超过170 没有写输入错误的判断语句，重点是讨论循环，请大家输入正确的数据 Textbox2 Textbox1 * Space与strDup 函数 Space（n） 返回有n个空格组成的字符串。 StrDup(n，char) 返回n个char组成的字符串 如果char是一个字符串，只取第一个字符 strDup(3,”k”) kkk StrDup(5,”Wow! What a string”) WWWWW * 示例（续）利用标签输出图形并比较 单击“三角1”按钮输出如右边图形，注意先添加一个标签 标签的AutoSize属性设置为False，显示边框 单击“三角2”按钮输出如右边图形 * 循环的嵌套（九九乘法表） 在一个循环体内又包含了完整的循环结构称为循环的嵌套 示例（续）：单击按钮“九九乘法表”显示出如下界面 * 分析 Space(8-Len(se))? * 练习 完成示例程序 增加： 单击窗体，显示左上图显示图形 双击窗体，显示右上图显示图形。 单击“下三角的九九”按钮，显示下三角的九九乘法表。 * 下周展望 基本的控制结构 Do……Loop循环语句 老师友情提醒 别忘了 把自己的 U 盘带走 MP3 * * Liu Qing