题目内容（请给出正确答案）

[单选题]

从键盘输入一个数N，判断是否为质数。 Private Sub Command1_Click（) Dim N %, I%, K% N = Val（InputBox（"N=？")) K= N-1 For I = 2 To K If N Mod I = 0 Then Exit For Next I If Then Print N; “ 是质数" Else Print N; “ 不是质数" End If

A.I＞K

B.I=K

C.I＞K+1

D.I＞N

提问人：网友metal009 发布时间：2022-01-07

参考答案

抱歉！暂无答案，正在努力更新中……

如搜索结果不匹配，请联系老师获取答案

网友答案

查看全部（）

· 有6位网友选择 B，占比60%
· 有3位网友选择 D，占比30%
· 有1位网友选择 A，占比10%

ABCD

提交我的答案

登录提交答案，可赢取奖励机会。

登录/注册

您可能会需要：

重置密码查看订单联系客服

安装简答题APP，拍照搜题省时又省心！

更多“从键盘输入一个数N，判断是否为质数。 Private Sub…”相关的问题

第1题

从键盘上输入两个正整数m 和n ,求最大公约数。 Private Sub Form_Click() Dim m As Integer, n As Integer,m1 As Integer, n1 As Integer Dim r As Integer m = Val(InputBox("请输入m的值")) m1=m n = Val(InputBox("请输入n的值")) n1 =______(1)______ r = m Mod n Do While______(2)______ m = n ______(3)______ r = m Mod n Loop Print m1; "和"; n1; "的最大公约数是:"; n End Sub 完善程序，在答题时，务必在答题框中写好题号和答案，如下： (1)： _________ (2)： _________ (3)： _________

点击查看答案

第2题

在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程：

Private Sub Command1_Cliek

Dim b, k

For k = 1 to 6

b=23+k

Next k

MsgBox b + k

End Sub

打开窗体后，单击命令按钮，消息框的输出结果是【】。

点击查看答案

第3题

当运行如下程序时，若输入：1 2，运行结果并不是3，请分析原因，并给出解决方案。 /*两个整数的和*/ #include <stdio.h> int main(void) { int m, n, sum; sum = m + n; scanf( "%d%d", &m, &n); printf("%d", sum); return 0; }

点击查看答案

第4题

运行下列程序：

Private Sub Command1_Click()

a = Val(InputBox("a = "))

Print fun1(a)

End Sub

Private Function fun1(b)

If b > 0 Then

fun1 = 10

ElseIf b = 0 Then

fun1 = 9

Else

fun1 = 8

End If

End Function

单击按钮后从键盘为变量a输入数据3，输出的结果是()。

A.3

B.8

C.9

D.10

点击查看答案

第5题

下列程序段的执行结果为 Private Sub Command1_Click() a=InputBox("请输入a值") c="您要查询的是" &IIf(a＞0，"天气"，" ") &IIf(a＜0，"电话号码"，" ") &IIf(a=0，"邮编"，" ") Text1.Text=c End Sub程序运行后，如果从键盘上输入"16"，则在文本框显示的内容是______。

A．您要查询的是天气

B．您要查询的是邮编

C．您要查询的是电话号码

D．False

点击查看答案

第6题

运行下列程序，输出结果是 struct contry { int num; char name[20]; }x[5] = {1,"China", 2, "USA", 3, "France", 4, "Englan", 5, "Spanish"}; int main() { int i; for(i=3; i<5; i++) printf("%d%c", x[i].num, x[i].name[0]); return 0; }> A、3F4E5S

B、4E5S

C、F4E

D、c2U3F4E

点击查看答案

第7题

运行下列程序：

Private Sub form_Click()

t = Val(InputBox("请输入一个数："))

x = t - 1

Select Case t

Case 1 To 10

y = 4 * t