vb编写串口程序vb程序 用两种不同的格式输出九九乘法口诀表

您所在位置: &
&nbsp&&nbsp&nbsp&&nbsp
VB课件第5章 循环结构程序设计.doc 10页
本文档一共被下载:
次 ,您可全文免费在线阅读后下载本文档。
下载提示
1.本站不保证该用户上传的文档完整性,不预览、不比对内容而直接下载产生的反悔问题本站不予受理。
2.该文档所得收入(下载+内容+预览三)归上传者、原创者。
3.登录后可充值,立即自动返金币,充值渠道很便利
需要金币:120 &&
你可能关注的文档:
··········
··········
第5章 循环结构程序设计
循环是指在程序设计中,从某处开始有规律地反复执行某一程序块的现象。例如:计算2n 。
如果这样计算:
很显然,这不是解决问题的方法.在程序设计中要解决此问题,就需使用循环结构语句
使用了循环结构编写程序,可以简化程序,避免重复的不必要的工作,提高编程效率。
VB提供三种不同风格的循环结构,包括:
当循环(While-Wend循环)
Do循环(Do-Loop循环)
FOR循环(For-Next 循环)
其中For循环按规定的次数执行循环体,而当循环和Do循环则是在给定的条件满足时执行循环体。
§1、While…Wend语句(当循环语句)
1、格式:While
&语句序列&
上述格式中,“条件”为一布尔表达式,用以指定循环条件。
2、功能:根据条件进行判断,决定是否执行循环体。
3、执行过程:
如果“条件”为True(非0),执行由“语句序列”组成的循环体,当遇到Wend语句时,控制语句返回到While语句,并对“条件”进行测试,如果仍为True,则重复上述过程。如果“条件”为False,则不再执行循环体内容,而转去执行Wend后继语句,跳出循环。
执行流程如图所示。
Dim n#, s#, k&
n = InputBox(&input n&)
While k &= n
Print &s=&; s
Dim n#, s#, x&
n = InputBox(&input n&)
While x &= n
Print &s=&; s
Dim n#, s#, x&
n = InputBox(&input n&)
While x &= n
Print &s=&; s
例5_1_2 从键盘上输入一串字符(每次输入一个字符),以“!”结束,并对输入字符中的字母个数和数字个数进行统计。
分析:需要输入的字符个数没有指定,停止计数的条件是输入字符为“!”,所以用while…wend语句是合适的。
程序中,变量ch接受键盘输入的字符,变量T1, T2分别用于统计字母,数字的个数。
Private Sub command1_click()
Dim ch$, T1%, T2%
T1 = 0: T2 = 0
While ch && &!&
ch = InputBox(&请输入一个字符:&)
If ch &= &a& And ch &= &z& Or ch &= &A& And ch &= &Z& Then
Lcase(ch)&=&a&
Lcase(ch)&=&z&
T1 = T1 + 1
ElseIf ch &= &0& And ch &= &9& Then
T2 = T2 + 1
Print &字母个数:&; T1
Print &数字个数:&, T2
While…Wend循环语句先对“条件”进行测试,然后才决定是否执行循环体。如果进入循环体之前,“条件”为False,则一次也不执行循环。因此,进入循环体之前应正确设置循环条件。
循环体内应该有修改循环条件的语句,使得循环能正常执行和终止。否则,会出现死循环,这是程序设计中容易出现的错误,应当尽量避免。一旦出现“死循环”现象,可按下“Ctrl+Break”键强行退出。
§2、Do…Loop语句
Do 循环有两种:
先判断后执行
Do While|Until 条件
2、先执行后判断
Loop While|Until 条件
正在加载中,请稍后...

我要回帖

更多关于 vb简单程序编写 的文章

 

随机推荐