首页 > 电子信息工程> DSP技术

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

[主观题]

窗体上有一个命令按钮command1，其Click事件过程如下： Private Sub Commandl_Click（) Dim x As Integer

窗体上有一个命令按钮command1，其Click事件过程如下：

Private Sub Commandl_Click()

Dim x As Integer

x=InputBox("请输入x的值")

Select Case x

Case 1,2,4,6

Debug.Print"A"

Case 5,7 To 9

Debug.Print"B"

Case Is=10

Debug.Print"C"

CaSe ElSe

Debug.Print"D"

End Select

End Sub

程序执行后单击命令按钮，在弹出的输入框中输入8，则立即窗口上显示( )。

A．A B．B C．C D．D

查看答案

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

您可能会需要：

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

安装优题宝APP，拍照搜题省时又省心！

更多“窗体上有一个命令按钮command1，其Click事件过程如…”相关的问题

第1题

窗体中有一个命令按钮Command1，其Click事件过程如下。 PriVate Sub Coranland1_Click（) For i=1 To 4 x=

窗体中有一个命令按钮Command1，其Click事件过程如下。

PriVate Sub Coranland1_Click()

For i=1 To 4

x=3

For j=2 To 3

x=3

For k=1 To 2

x=x+2

Next k

Next j

Next i

MsgBox x

End Sub

窗体运行后，单击命令按钮，消息框输出的结果是______。

点击查看答案

第2题

窗体中有一个命令按钮Command1。其Click事件过程如下。 Sub P（b（)As Integer) For i=1 to 4 b（i)=2*i

窗体中有一个命令按钮Command1。其Click事件过程如下。

Sub P(b()As Integer)

For i=1 to 4

b(i)=2*i

Next i

End Sub

Private Sub Command1_Click()

Dim a(1 to 4)As Integer

For i=1 to 4

a(i)=i+4

Nexti

P a()

For i=1 to 4

MsgB0x a(i)

Next i

End Suk)

窗体运行后，单击命令按钮，消息框4次输出的结果分别是( )。

A．2 4 6 8 B．5 6 7 8 C．10 12 14 16 D．出错

点击查看答案

第3题

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub

Command1_Click() Dim a s=0 a=Array (1,2,3,4) j=1 For i=4 To 1 Step-1 s=s+a (i) * j j=j * 10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是()。

A.4321

B.34

C.1234

D.12

点击查看答案

第4题

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Su

b Command1_Clic() Dim a s=0 a=Array (1,2,3,4) j= 1 For i=4 To 1 Step-1 s=s+a(i) * j j=j*10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是()。

A.4321

B.34

C.1234

D.12

点击查看答案

第5题

在窗体中添加一个命令按钮，（其Name属性为Command1)，然后编写代码。程序的功能是产生100个小于1000

在窗体中添加一个命令按钮，(其Name属性为Command1)，然后编写代码。程序的功能是产生100个小于1000(不含1000)的随机正整数，并统计其中5的倍数所占比例。请在【】和【】、【】处填入适当的内容，将程序补充完整。 Private Sub Command1_Click() Dim a(100) For j=1 To 100 a(j)=Int (【】) If a(j)【】5=0 Then【】 Print a(j) Next j Print print k/100 End Sub

点击查看答案

第6题

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

A.空白

B.错误提示

C.绿色

D.白色

点击查看答案

第7题

在窗体中添加一个命令按钮，命名为Command1，然后编写如下程序：PrinvateSubCommand1_Click（)A=1234B=Str（A)C=Len（B)PrintCEndSub程序运行后，单击命令按钮，则在窗体上显示的内容是（)

A.0

B.5

C.6

D.7

点击查看答案

第8题

有一个窗体Form1，其中有命令按钮Command1，现要求单击该按钮用VBA程序打开已有的数据表“学生”，正确的命令是( )。

A.DoCmd.OpenTable学生

B.DoCmd.OpenTable"学生"

C.DoCmd.OpenForm学生

D.DoCmd.OpenForm"学生"

点击查看答案

第9题

有一个窗体Form1，其中有一个文本编辑框Text1和一个命令按钮Command1。运行窗体后在文本编辑框中输入一串字符，单击命令按钮后该窗体的标题改变为文本编辑框中输入的字符串。则宏命令SetValue的参数设置是( )。

A.“项目”：[Forms]![Form1]，“表达式”：[Forms]![Form1]![Text1]

B.“项目”：[Forms]![Form1].[Caption]，“表达式”：[Forms]![Form1]![Text1]

C.“项目”：[Forms]![Form1].[Caption]，“表达式”：[Forms]![Form1]![Command1]

D.“项目”：[Forms]![Form1]![Text1]，“表达式”：[Forms]![Form1]![Command1]

点击查看答案

第10题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（)x=-5 If x＞0 Then y=x∧2 Else y=x End If Print y End Sub 程序运行后，单击命令按钮，窗体上显示的是（)。

A.-5

B.25

C.1

D.-1

点击查看答案

第11题

在窗体上画一个命令按钮，然后编写如下程序：（假定变量x是一个窗体级变量) Dim x As Intege

在窗体上画一个命令按钮，然后编写如下程序：(假定变量x是一个窗体级变量) Dim x As Integer Sub inc(a As Integer) x=x+a End Sub Private Sub Command1_Click() inc 2 inc 3 inc 4 Print x； End Sub 程序执行后，单击Command1命令按钮，输出的结果是【】。

点击查看答案