问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

vb的几种循环结构是什么?

发布网友 发布时间:2022-04-29 00:31

我来回答

3个回答

热心网友 时间:2022-06-26 11:46

1.While...Wend 语句
只要指定的条件为 True,则会重复执行一系列的语句。
语法
While condition
[statements]
..
Wend
2.Do...Loop
2.1 第一种用法
用 Do 循环重复执行一语句块,且重复次数不定。Do...Loop 语句有几种演变形式,但每种都计算数值条件以决定是否继续执行。如同 If...Then condition 必须是一个数值或者值为 True(非零)或 False(零)的表达式。
在下面的 Do...Loop 循环中,只要 condition 为 True 就执行 statements。
Do While condition
statements
..
Loop
2.2 第二种用法
Do...Loop 语句的另一种演变形式是先执行语句,然后在每次执行后测试 condition。这种形式保证 statements 至少执行一次:
Do
statements
Loop While condition
注:其它两种演变形式类似于前两个,所不同的是,只要 condition 为 False 而不是 True,它们就执行循环。
循环零次或多次
Do Until condition
statements
Loop
至少循环一次
Do
statements
Loop Until condition
3.For...Next
在不知道循环内需要执行多少次语句时,宜用 Do 循环。但是,在知道要执行多少次时,则最好使用 For...Next 循环。与 Do 循环不同, For 循环使用一个叫做计数器的变量,每重复一次循环之后,计数器变量的值就会增加或者减少。For 循环的语法如下:
For counter = start To end [Step increment]
statements
Next [counter]
参数 Counter、Start、end 和 increment 都是数值型的。
注意 increment 参数可正可负。如果 increment 为正,则 Start 必须小于等于 end,否则不能执行循环内的语句。如果 increment 为负,则 Start 必须大于等于 end,这样才能执行循环体。如果没有设置 Step,则 increment 缺省值为 1。
实例:
以下代码打印出所有有效的屏幕字体名:
Private Sub Form_Click ()
Dim I As Integer
For i = 0 To Screen.FontCount
Print Screen.Fonts (i)
Next
End Sub
4.For Each...Next
For Each...Next 循环与 For...Next 循环类似,但它对数组或对象集合中的每一个元素重复一组语句,而不是重复语句一定的次数。如果不知道一个集合有多少元素, For Each...Next 循环非常有用。
For Each...Next 循环的语法如下:
For Each element In group
statements
Next elementt
例如,下面的子过程打开 Biblio.mdb,把每一个表的名字加到列表框中。
Sub ListTableDefs ()
Dim objDb As Database
Dim MyTableDef as TableDef
Set objDb = OpenDatabase("c:\vb\biblio.mdb", _
True, False)
For Each MyTableDef In objDb.TableDefs ()
List1.AddItem MyTableDef.Name
Next MyTableDef
End Sub
请记住使用 For Each...Next 时的几点*:
对集合,element 只能是 Variant 变量,或一般的 Object 变量,或“对象浏览器”中列出的对象。
对数组,element 只能是 Variant 变量。
For Each...Next 不能与用户自定义类型的数组一起使用,因为 Variant 不可能包含用户自定义类型。

热心网友 时间:2022-06-26 11:46

Private Sub Command1_Click()

Dim i As Integer

Dim sum As Integer

Dim a As Integer

Do

Randomize

a = Int(Rnd * 1000)

sum = sum + a

i = i + 1

Loop while i <= 10

MsgBox "10个随机数得和:" & sum

End Sub

Visual 意即可视的、可见的,指的是开发像Windows操作系统的图形用户界面(Graphic User Interface,GUI)的方法,它不需要编写大量代码去描述界面元素的外观和位置,只要把预先建立好的对象拖放到屏幕上相应的位置即可。

Visual Basic 6 有学习版、专业版和企业版三种版本,以满足不同的开发需要。学习版适用于普通学习者及大多数使用 Visual Basic 开发一般 Windows 应用程序的人员;

专业版适用于计算机专业开发人员,包括了学习版的全部内容功能以及Internet控件开发工具之类的高级特性;企业版除包含专业版全部的内容外,还有自动化构件管理器等工具,使得专业编程人员能够开发功能强大的组骨子里分布式应用程序。

热心网友 时间:2022-06-26 11:47

1.While...Wend 语句
只要指定的条件为 True,则会重复执行一系列的语句。
语法
While condition
[statements]
..
Wend
2.Do...Loop
2.1 第一种用法
用 Do 循环重复执行一语句块,且重复次数不定。Do...Loop 语句有几种演变形式,但每种都计算数值条件以决定是否继续执行。如同 If...Then condition 必须是一个数值或者值为 True(非零)或 False(零)的表达式。
在下面的 Do...Loop 循环中,只要 condition 为 True 就执行 statements。
Do While condition
statements
..
Loop
2.2 第二种用法
Do...Loop 语句的另一种演变形式是先执行语句,然后在每次执行后测试 condition。这种形式保证 statements 至少执行一次:
Do
statements
Loop While condition
注:其它两种演变形式类似于前两个,所不同的是,只要 condition 为 False 而不是 True,它们就执行循环。
循环零次或多次
Do Until condition
statements
Loop
至少循环一次
Do
statements
Loop Until condition
3.For...Next
在不知道循环内需要执行多少次语句时,宜用 Do 循环。但是,在知道要执行多少次时,则最好使用 For...Next 循环。与 Do 循环不同, For 循环使用一个叫做计数器的变量,每重复一次循环之后,计数器变量的值就会增加或者减少。For 循环的语法如下:
For counter = start To end [Step increment]
statements
Next [counter]
参数 Counter、Start、end 和 increment 都是数值型的。
注意   increment 参数可正可负。如果 increment 为正,则 Start 必须小于等于 end,否则不能执行循环内的语句。如果 increment 为负,则 Start 必须大于等于 end,这样才能执行循环体。如果没有设置 Step,则 increment 缺省值为 1。

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
蚂蚁泡酒适合哪些人喝 蚂蚁酒的功效与禁忌蚂蚁酒的功效与作用 热血无赖卡怎么办 了解这两方面内容 益生菌孕妇 孕妇能喝益生菌吗 羽毛球双打底线是内线还是外线 为什么泰国两位尊者有不死之身 秦始皇活了多少岁?当了几年皇帝? DELL电脑D630.PP18L2手机。才用了4个多月。多少钱我可以买呢,麻烦谁说... dellpp18l现在买多少钱 VB的循环语句包括 VB 循环语句 把标准的SIM卡剪成Nano-SIM卡,能放在华为麦芒5里用吗 VB循环语句 VB中的循环语句包括( )1.Do while语句和For语句2. For语句和Loop语句3. For语句和Repeat语句4.While 语 VB循环语句主要有哪些带说明 vb中的循环语句怎么写? VB中的循环语句包括什么? 雪蛤怎么煮都不会变透明状? VB循环语句主要有哪些 雪蛤是海鲜吗??? 雪蛤是啥? 雪蛤的学名是 无限传感器网络定位的作用是什么? 极品雪蛤是仕么意思 j4125性能相当于i53250 凸轮轴位置传感器又称为什么?它的作用是什么? 吉林雪哈是什么 凸轮轴位置传感器起什么作用?为什么进气和排气都有? 凸轮轴位置传感器干嘛用的? VB中if语句/Do while语句/For语句一定代表循环语句吗? 美团商家怎么续约 怎么闪电下载app下载的视频在Download里找不到,没有呢? 请问怎么修改网易闪电邮下载的邮件的文件夹? 谁知道坦克世界 闪电战的数据包下好后应该放在哪个文件夹里 闪电PDF转换出来的文件在哪里可以看到? 下载文件到目录/storage/emulated/0/Download 这个目录在哪我怎 坦克世界闪电战对应的文件夹是哪个?数据包下好放在哪儿? 闪电搜索怎么用?闪电搜索下载安装及使用教程 用网易闪电邮接受了很多邮件,很多附件,都下载到本地了,想把这些附件单独存放到一个文件夹里,怎么做? 网易126闪电邮箱内通讯录人员信息保存在电脑安装程序哪给文件夹里了?急啊? 百度云闪电互传文件视屏在哪里可以看 qq动态回复怎样删除 怎么删除自己贴吧动态里的回复贴 qq空间里我的空间动态怎么删除呢 (就是说说里别人给我的回复什么... 在我的空间动态里评论了别人别人也回复了怎么删除 QQ动态中的好友回复怎样删除,而不被其他QQ好友看到 空间动态的说说回复怎么删掉? 有上饶师范学院的学生吗?能留下你们的QQ吗?准备放长假的时候去那里玩。 删除QQ校友动态中好友的回复