VB的for循环该怎么写?

发布网友 发布时间：2022-05-02 04:19

我来回答

共5个回答

热心网友 时间：2022-06-28 03:53

1、首先，我们输入For关键字。

2、然后我们定义一个循环变量。

3、然后我们写入【1 to 10】。

4、然后我峨眉呢输入【Next i】结束。

5、然后我们就可以在这里输入每次执行的语句。

6、最后运行就可以看到这个结果了。

热心网友 时间：2022-06-28 03:53

for…next循环如下：（在C盘根目录建立一个名字为1的文件夹，反复10次）Private Sub Command2_Click()
Dim i As Integer
For i = 1 To 10
Set
fso
=
CreateObject("Scripting.filesystemobject")

fso.CreateFolder
("c:\1")
Next
End Sub

热心网友 时间：2022-06-28 03:54

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

热心网友 时间：2022-06-28 03:54

For i = 1 To k
If (i Mod 2 = 0 And i Mod 3 = 0 And i Mod 5 <> 0) Then
Debug.Print i
End If
Next i

热心网友 时间：2022-06-28 03:55

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