vb中的循环语句怎么写?
Posted
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了vb中的循环语句怎么写?相关的知识,希望对你有一定的参考价值。
参考技术A下面提供多种方法:
第一种:
For i = 0 To 100
If (i Mod 2 = 0) And (i Mod 3 = 0) And (i Mod 5 <> 0) Then
MsgBox i
End If
Next i
第二种:
Private Sub Command1_Click()
Text1 = ""
Dim a()
k = InputBox("请输入上限")
For i = 1 To k
If i Mod 2 = 0 And i Mod 3 = 0 And i Mod 5 <> 0 Then
j = j + 1
ReDim Preserve a(j)
a(j) = i
End If
Next i
For i = 1 To j
Text1 = Text1 & a(i) & " "
Next i
End Sub
Visual Basic(简称VB)是Microsoft公司开发的一种通用的基于对象的程序设计语言,为结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。是一种可用于微软自家产品开发的语言。
“Visual” 指的是开发图形用户界面 (GUI) 的方法——不需编写大量代码去描述界面元素的外观和位置,而只要把预先建立的对象add到屏幕上的一点即可。 “Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 语言,是一种在计算技术发展历史上应用得最为广泛的语言。
Visual Basic源自于BASIC编程语言。VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建Active X控件,用于高效生成类型安全和面向对象的应用程序。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。
参考技术B写法如下:
Private Sub Command1_Click()
Text1 = ""
Dim a()
k = InputBox("请输入上限")
For i = 1 To k
If i Mod 2 = 0 And i Mod 3 = 0 And i Mod 5 <> 0 Then
j = j + 1
ReDim Preserve a(j)
a(j) = i
End If
Next i
For i = 1 To j
Text1 = Text1 & a(i) & " "
Next i
End Sub
1、Visual Basic(简称VB)是Microsoft公司开发的一种通用的基于对象的程序设计语言,为结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。是一种可用于微软自家产品开发的语言。
2、Visual Basic源自于BASIC编程语言。VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建Active X控件,用于高效生成类型安全和面向对象的应用程序 。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。
参考技术C 循环语句包括For-Next、While-Wend、Do-Loop语句比较常用的是for和whileFor-Next语句:For 变量 = 初值 To 终值 [Step 步长]
循环体
Next
While Wend 语句:
While 条件
循环体
Wend
但满足条件时,(如当i>5时),便退出循环,否则执行循环体。Do-Loop语句:
Do
循环体
...[Exit Do]
Loop
循环体会在Do 与 Loop 之间不停循环。Exit Do 语句可有可无,是为了设定当满足一定条件后,运行Exit Do 语句,即退出循环。for应该是最简单的,因为不用自己去控制自增或自减,只要设置初始值,循环条件,和步阶就行了~
T--SQL语句的for循环怎么写的?
for循环的条件怎么写,举一个例子!谢谢
参考技术A FOR loop index IN [REVERSE] lowest number ..highest numberLOOP
executable statement(s)
END LOOP; 参考技术B for loop i in 1..100
loop
表达式
end loop
循环100次。
以上是关于vb中的循环语句怎么写?的主要内容,如果未能解决你的问题,请参考以下文章