网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

在窗体中有一个命令按钮Commandl,对应的事件代码如下: Pfivate Sub Command l_Ente( ) Dim nllm As IntegerDim aAs IntegerDim bAs IntegerDim iAs IntegerFori=1 To 10num=InputBox("请输入数据:","输入",l)If Int(num/2)=Iaum/2 Thena=a+lElseb=b+1EndIfNext iMsgBox("运行结果:a="&;St"A.&;:",b="&;Str(B.)End Sub运行以上事件所完成的功能是( )。

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

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

C.对输入的10个数据分别统计有几个是整数,有几个是非整数

D.对输入的10个数据分别统计有几个是奇数,有几个是偶数


参考答案

更多 “ 在窗体中有一个命令按钮Commandl,对应的事件代码如下: Pfivate Sub Command l_Ente( ) Dim nllm As IntegerDim aAs IntegerDim bAs IntegerDim iAs IntegerFori=1 To 10num=InputBox("请输入数据:","输入",l)If Int(num/2)=Iaum/2 Thena=a+lElseb=b+1EndIfNext iMsgBox("运行结果:a="&St"A.&:",b="&Str(B.)End Sub运行以上事件所完成的功能是( )。A.对输入的l0个数据求累加和B.对输人的l0个数据求各自的余数,然后再进行累加C.对输入的10个数据分别统计有几个是整数,有几个是非整数D.对输入的10个数据分别统计有几个是奇数,有几个是偶数 ” 相关考题
考题 在窗体中有一个标签Lablel,标题为“测试进行中”,有一个命令按钮Commandl,事件代码如下:Private Sub Commandl Click( )Lablel.Caption=”标签”End SubPrivate Sub Form—Load( )Form.Caption=”举例”Commandl.Caption=”移动”End Sub打开窗体后,单击命令按钮,屏幕显示( )。A.B.C.D.

考题 在窗体中有一个名为(Command1的命令按钮,Click事件的代码如下:单击命令按钮后,标签显示的结果是( )。

考题 在窗体中有一个标签Labele,标题为“测试进行中”,有一个命令按钮Command1,事件代码如下:Private Sub Command1_Click()Labele.Caption=“标签”End SubPrivate Sub Form_Load( )Form.Caption=“举例”Command1.Caption=“移动”End Sub打开窗体后单击命令按钮,屏幕显示( )。A.B.C.D.

考题 在已建窗体中有一命令按钮(名为Commandl),该按钮的单击事件对应的VBA代码为:Private SuB command 在已建窗体中有一命令按钮(名为Commandl),该按钮的单击事件对应的VBA代码为:Private SuB commandl_Click()SuBT.Form.RecordSource = “select*From 雇员”End SuB单击该按钮实现的功能是A.使用select命令查找“雇员”表中的所有记录B.使用select命令查找并显示“雇员”表中的所有记录C.将suBt窗体的数据来源设置为一个字符串D.将suBt窗体的数据来源设置为“雇员”表

考题 在窗体中有一个标签Lbl和一个命令按钮Commandl,事件代码如下:打开窗体后单击命令按钮,窗体中显示的内容是( )。A. 4B. 5C. 10D. 40

考题 窗体Forml上有一个名称为Commandl的命令按钮,以下对应窗体单击事件的事件过程是( )。

考题 在窗体中有一个标签Labele,标题为“测试进行中”:有一个命令按钮Commandl,事件代码如下:Private Sub Commandl_Click()Labele.Caption=“标签”End SubPrivate Sub Form_Load()Form.Caption=“举例”Commandl.Caption=“移动”End Sub打开窗体后,单击命令按钮,屏幕显示( )。A.B.C.D.

考题 在窗体中有一个标签Lbl和一个命令按钮Commandl,事件代码如下。 Option Compare DatabaseDim aAs String*10Private Sub Commandl_Click( ) a="1234"b=Len(A. Me.Lbl.Caption=bEndSub打开窗体后单击命令按钮,窗体中显示的内容是( )。A.4B.5C.1OD.40

考题 在窗体中有一个标签Lbl和一个命令按钮Commandl,事件代码如下: Option Compare Database Dim a As String*10 Pfivae Sub Commandl_Click() a=“1234” b=Len(A) Me.Lbl.Caption=b End Sub 打开窗体后单击命令按钮,窗体中显示的内容是( )。A.4B.5C.10D.40

考题 在窗体中有一个标签kabel(),标题为“测试进行中”;有一个命令按钮Command1,事件代码如下:Private Sub Conunandl_Click()Label(). Caption=“标签”End SubPrivate Sub Foml_Load()Form.Caption:“举例”Commandl.Caption=“移动”End Sub打开窗体后单击命令按钮,屏幕显示A.B.C.D.