Private Sub Form_click()
Dim n As Boolean
Dim m As Integer
求100与300之间的素数(所谓素数就是只能被自己和1整除的数)For m = 101 To 300 Step 2
n = False
For j = 2 To m
If m Mod j = 0 Then
n = False
Else
n = True
Print m
End If
Next j
Next m
End Sub
输出结果全部是101,为什么会这样(2)请问:num=int(rnd * 100)中后面的 *100是什么意思
谢谢
Dim n As Boolean
Dim m As Integer
求100与300之间的素数(所谓素数就是只能被自己和1整除的数)For m = 101 To 300 Step 2
n = False
For j = 2 To m
If m Mod j = 0 Then
n = False
Else
n = True
Print m
End If
Next j
Next m
End Sub
输出结果全部是101,为什么会这样(2)请问:num=int(rnd * 100)中后面的 *100是什么意思
谢谢
解决方案 »
- VB windowsmediplayer控件同时两个使用求全屏解决方法
- 多人同时操作数据库时,如何确定数据库记录的唯一关键字?
- VertScrollBar滚动条 如何控制 向上翻页 向下翻页 功能
- 谁能帮我把这段c++builder的代码用vb实现 谢谢!
- 怎样才能将mshflexgrid 中的数据清空,标头还在
- 编绎错误:类型-声明字符与声明的数据类型不符合
- 救救!!我用VB Active X DLL调用VC编写普通DLL时出问题!大家帮我看看
- 一个小问题,在线等待,搞定给分!
- 100分真心希望那位能提供在VB中如何实现类似于QQ截屏时的那八个可拖动角的代码啊?
- 救命,VB高手请进来!!!!!
- 急急!!!vb写个com组件调试错误报告信息
- 问一个问题
(2)num=int(rnd * 100)是生成一个0-100之间的整数,由于rnd的值总在0-1之间,所以要乘以100