首页 > 计算机类考试> 计算机二级> Access

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

[主观题]

窗体中有命令按钮run34，对应的事件代码如下： PrivateSub run34_Enter（） Dim humAs Integer，aAs

Integer，b As Integer，i AsInteger For i=1To 10 num=InputBox(”请输入数据：”，”输入”) IfInt(num／2)==num／2 Then a=a+1 Else b=b+1 End if Next i MsgBox(”运行结果：a=”&Str(a)&”，b=”&Str(b)) End Sub 运行以上事件过程，所完成的功能是（）。

A.对输入的10个数据求累加和

B.对输入的10个数据求各自的余数，然后再进行累加

C.对输入的10个数据分别统计奇数和偶数的个数

D.对输入的10个数据分别统计整数和非整数的个数

查看答案

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

您可能会需要：

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

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

更多“窗体中有命令按钮run34，对应的事件代码如下： Priva…”相关的问题

第1题

P46.窗体中有命令按钮run34,对应的事件代码如下:运行以上事件过程,所完成的功能是（）

A.对输入的10个数据求累加和

B.对输入的10个数据求各自的余数,然后再进行累加

C.对输入的10个数据分别统计奇数和偶数的个数

D.对输入的10个数据分别统计整数和非整数的个数

点击查看答案

第2题

窗体上有一个命令按钮Command1，编写如下事件过程：Private Sub Command1_Click()x = InputBox（

窗体上有一个命令按钮Command1，编写如下事件过程：

Private Sub Command1_Click()

x = InputBox("x=")

y = InputBox("y=")

Print x + y

End Sub

运行后，单击命令按钮，先后在两个输入对话框中输入123和321，窗体显示的内容是()。

A、 444

B、 123321

C、 123+321

D、出错信息

点击查看答案

第3题

假定有如下的命令按钮（名称为Command1）事件过程： PrivateSubCommand1_Click() x=InputB

假定有如下的命令按钮（名称为Command1）事件过程：

Private Sub Command1_Click（）

x=InputBox（"输入："，"输入整数"）

MsgBox"输入的数据是：”，，”输入数据："+x

End Sub

程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是（）。

A．x的值是数值10

B．输入对话框的标题是“输入整数”

C．信息框的标题是“输入数据：10”

D．信息框中显示的是“输入的数据是：”

点击查看答案

第4题

窗体上有一个名称为Label1的标签和一个名称为Command1的命令按钮。命令按钮的单击事件过程如下： P

rivate Sub Command1 Click（） XzInputBox("输入X："，，0) y=InputBox("输入y："，，0) Label1．Caption=x+y End Sub 运行程序，单击命令按钮，在输入对话框中分别输入2、3，运行的结果是（）。

A.程序运行有错误，数据类型不匹配

B.程序运行有错误，InputBox函数的格式不对

C.在Label1中显示5

D.在Label1中显示23

点击查看答案

第5题

在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后

编写如下两个事件过程：程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入一个具有大小写的字符串，则在标签中显示的内容全部为大写。请填空。

点击查看答案

第6题

在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() x=0 Do Until x=-1

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=0 Do Until x=-1 a=InputBox(“请输入A的值”) a=Val(A)b=InputBox(“请输入B的值”) b=Val(B)x=InputBox(“请输入x的值”) x=Val(x) a=a+b+x Loop Print a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为 ______。

A．2

B．3

C．14

D．15

点击查看答案

第7题

在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x=0Do Until x=-1 a

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=0 Do Until x=-1 a=InputBox("请输入A的值") a=Val(A) b=InputBox("请输入B的值") b=Val(B)x=InputBox("请输入x的值") x=Val(x) a=a+b+x Loop Print a End：Sub 程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为______。

A．2

B．3

C．14

D．15

点击查看答案

第8题

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1 Click()Do Until b＜O a=In

在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1 Click()

Do Until b＜O

a=InputBox("输入a的值")

a=Val(A)

b=InputBox("输入b的值")

b=Val(B)

a=a+b

Loop

Print a

End Sub

程序运行后，依次输入5，4，3，2，1，0，-1，-2，则输出结果是【】

点击查看答案

第9题

假定有以下函数过程： Function Fun（S As String) As String Dim s1 As String For i=1 To Len（S)

假定有以下函数过程： Function Fun(S As String) As String Dim s1 As String For i=1 To Len(S) s1=UCase(Mid(S，i，1))+s1 Next i Fun=S1 End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim Str1 As String，Str2 As String Str1=Input Box(“请输入一个字符串”) Str2=Fun(Str1) Print Str2 End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确定”按钮后在窗体上的输出结果为

A．abederg

B．ABCDEFG

C．gfedcba

D．GFEDCBA

点击查看答案

湖南希赛网络科技有限公司版权所有 ©2001-2024

湘ICP备16018319号-4 营业执照

违法和不良信息举报电话：400-118-7898

举报/反馈/投诉邮箱：2861363944@qq.com