
用inputbox函数输入任意一自然数,判断其是否为素数
打开VB软件,进入界面,选择“打开”
双击空白处,进入代码界面。
输入代码,Dim n% n = InputBox("n=") For i = 2 To n - 1 If n Mod i = 0 Then Exit For Next If i > n - 1 Then Print n & "是素数" End If
检测运行,点击上方运行按钮。
出现运行界面,输入数字
最后保存

用inputbox函数输入任意一自然数,判断其是否为素数
打开VB软件,进入界面,选择“打开”
双击空白处,进入代码界面。
输入代码,Dim n% n = InputBox("n=") For i = 2 To n - 1 If n Mod i = 0 Then Exit For Next If i > n - 1 Then Print n & "是素数" End If
检测运行,点击上方运行按钮。
出现运行界面,输入数字
最后保存