用vb编..

来源:百度知道 编辑:UC知道 时间:2024/07/03 00:05:23
编写程序实现输出从0至100种只能被3整除的数??
急..!!
另外有追分。。

Private Sub Command1_Click()
Dim I As Integer, K As String

For I = 0 To 100
If I Mod 3 = O Then K = K & CStr(I) & ";"
Next I

Text1.Text = K

End Sub

请先放一个命令按钮,一个文本框,并将其multiline属性设置为true,
即可输出结果