编写程序实现输出从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,
即可输出结果
笑话军事旅游美容女性百态母婴家电游戏互联网财经美女干货家饰健康探索资源娱乐学院 数码美食景区养生手机购车首饰美妆装修情感篇厨房科普动物植物编程百科知道汽车珠宝 健康评测品位娱乐居家情感星座服饰美体奢侈品美容达人亲子图库折扣生活美食花嫁风景 | 首页 |
编写程序实现输出从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,
即可输出结果