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

[单选题]

在窗体上画一个命令按钮Cmd1和一个标签Lab1，然后输入如下事件过程： Private Sub Cmd1_Click（) k = 0 For i = 1 To 4 For j = 6 To 1 Step -2 k = k + 1 Next j Next i Lab1.Caption = Str（k) End Sub 程序运行后，单击命令按钮，标签中显示的内容是。

A.11

B.12

C.16

D.20

提问人：网友dexter8787 发布时间：2022-01-06

参考答案

查看官方参考答案

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

网友答案

查看全部（）

· 有4位网友选择 D，占比40%
· 有3位网友选择 C，占比30%
· 有2位网友选择 B，占比20%
· 有1位网友选择 A，占比10%

ABCD

提交我的答案

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

登录/注册

您可能会需要：

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

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

更多“在窗体上画一个命令按钮Cmd1和一个标签Lab1，然后输入如…”相关的问题

第1题

在窗体上面画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下代码： Sub S(X As Integer，y As Integer) Static z As Integer y=x*x+Z z=y End Sub Private Sub Command1 Click（） Dim i As Integer．z As Integer m=0 z=0 For i=1 T0 3 S i，Z m=m+z Next i Label1．Caption=Str(m) 程序运行后，单击命令按钮，在标签中显示的内容是（）。

A.50

B.20

C.14

D.7

点击查看答案

第2题

在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序：

Private Sub Command1_Click（）

a=InputBox（“请输入日期（1~31）”）

t=”旅游景点：” _

& IIf （a > 0 And a <= 10,”长城”,””） _

& IIf （a >10 And a <= 20,”故宫”,””） _

& IIf （a > 20 And a <= 31,”颐和园”,””）

Text1.Text = t

End Sub

程序运行后，如果从键盘上输入16，则在文本框显示的内容是（）。

A．旅游景点：长城故宫

B．旅游景点：长城颐和园

C．旅游景点：颐和园

D．旅游景点：故宫

点击查看答案

第3题

下列程序段的执行结果为。 x = 1 y = 1 For i = 1 To 3 f = x + y x = y y = f Print f; Next i

A、2 3 6

B、2 2 2

C、2 3 4

D、2 3 5

点击查看答案

第4题

设有下列事件过程： Private Sub Cmd1_Click() Dim sum As Double, x As Double sum = 0 : n = 0 For i = 1 To 5 x = n / i n = n + 1 sum = sum + x Next i End Sub 该程序通过For-Next循环计算一个表达式的值，这个表达式是。

A、1+1/2+2/3+3/4+4/5

B、1+1/2+2/3+3/4

C、1/2+2/3+3/4+4/5

D、1+1/2+1/3+1/4+1/5

点击查看答案

第5题

执行下列程序段的输出结果是。 i=0 While i<=5 i="i+1" wend print>

点击查看答案

第6题

下列程序的功能是求计算10的阶乘。请完善程序： Private Sub Cmd1_Click() x = 1 r =1 While x <= 1 10 r="x" x + wend print end sub>

点击查看答案

第7题

下列程序用来输出20个在开区间（10,87）中的随机整数R，每行输出4个整数。请完善程序：[难度êê] Private Sub Cmd1_Click() For i = 1 To 20 r = int(rnd*76)+11 Print r; If Then Print Next i End Sub

点击查看答案

第8题

下述程序段的运行结果是______。 For m = 3 To 1 Step -1 x = String(m, "A") Print x; Next m

点击查看答案

第9题

分析下列程序段： x = 1 : y = 1 : z = 1 For j = 1 To 3 For k = 1 To 3 If j = 1 Then x = x + y + z ElseIf j = 2 Then x = 2 * x + 2 * y + 2 * z Else x = 3 * x + 3 * y + 3 * z End If Next k Next j x的值是。

点击查看答案

第10题

1. 设有以下循环结构： Do [循环体] Loop While <条件> 则下列叙述中错误的是。 A) 若“条件”是一个为0的常数，则一次也不执行循环体 B) “条件”可以是关系表达式、逻辑表达式或常数 C) 循环体中可以使用Exit Do语句 D) 如果“条件”总是为True，则不停地执行循环体 2. 设有以下循环结构： Do Until 条件 [循环体] Loop 则下列说法正确的是。 A) 如果“条件”是一个为-1的常数，则一次循环体也不执行 B) 如果“条件”是一个为-1的常数，则至少执行一次循环体 C) 如果“条件”是一个不为-1的常数，则至少执行一次循环体 D) 不论“条件”是否为“真”，至少要执行一次循环体 3. 执行下面的程序段后，x的值为。 x = 5 For i = 1 To 20 Step 2 x = x + i \ 5 Next i A) 21 B) 22 C) 23 D) 24 4. 设有下列程序段： For i = 1 To 3 For j = 1 To i For k = j To 3 a = a + 1 Next k Next j Next i 执行上面的三重循环后，a的值为。 A) 3 B) 9 C) 14 D) 21 5. 设有以下程序段： For i = 1 To 3 For j = 5 To 1 Step -1 Print j Next j Next i 语句：“Print j”的执行次数是。 A) 15 B) 16 C) 17 D) 18

点击查看答案