网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
在窗体中添加一个标签控件,名称为Lbll;添加一个命令按钮,名称为Commandl,Click事件代码如下:PrivateSubCommandl_Click()A=1234B¥=Str¥(A)C=Len(B¥)ME.Lbll.Caption=CEndSub单击命令按钮,则在窗体上显示的内容是()。
A.2
B.0
C.6
D.5
B.0
C.6
D.5
参考答案
参考解析
解析:运算时把1234转换成了字符串,字符串的最后有一个结束符为/0,自动添加,显示不出来的,所以一共占了四个位置所以b=5。
更多 “在窗体中添加一个标签控件,名称为Lbll;添加一个命令按钮,名称为Commandl,Click事件代码如下:PrivateSubCommandl_Click()A=1234B¥=Str¥(A)C=Len(B¥)ME.Lbll.Caption=CEndSub单击命令按钮,则在窗体上显示的内容是()。A.2 B.0 C.6 D.5” 相关考题
考题
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As String, c As Integer a=1234: b=Str(a)c=Len(b)Print c End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是______。A.0B.5C.6D.7
考题
在窗体上添加一个命令按钮(名为Conunand1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码: Private Sub Command1_Click() m=2170 n=Len (Str$ (m) +Space (5)) Me! Text1=n End Sub打开窗体运行后,单击命令按钮,在文本框中显示( )。A.5B.8C.9D.10
考题
在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim a() a=Array(“机床”,”车床”,”钻床”,”轴承”) Print a(2) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.机床B.车床C.钻床D.轴承
考题
在窗体上添加一个命令按钮(名为Commandl) 和一个文本框(名为Text1) ,并在命令按钮中编写如下事件代码: Private Sub Commandl_click() m=2.17 n=Len(Str$(m) +Space(5) ) Me!Text1=n End Sub 打开窗体运行后,单击命令按钮,在文本框中显示( )。A.5B.8C.9D.10
考题
在窗体上添加一个命令按钮和一个文本框,并在命令按钮中编写如下代码:PrivateSubCommand1_Click()a=1.2c=Len(Str( )+Space(10))Text1.Text=cEndSub程序运行后,单击命令按钮,在文本框中显示( )A.3B.8C.14D.10
考题
在窗体中有一个标签Lablel,标题为“测试进行中”,有一个命令按钮Commandl,事件代码如下:Private Sub Commandl Click( )Lablel.Caption=”标签”End SubPrivate Sub Form—Load( )Form.Caption=”举例”Commandl.Caption=”移动”End Sub打开窗体后,单击命令按钮,屏幕显示( )。A.B.C.D.
考题
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码: Pfivate Sub Command 1 Click( )窗体打开运行后,单击命令按钮,则消息框的输出结果是( )。A. 1B. 2C. 3D. 4
考题
在窗体中添加一个命令按钮(名称为Commandl),然后编写如下代码。 Private Sub Commandl_Click0a=3:b=4:c=5MsgBox a=b+cEndSub窗体打开运行后,如果单击命令按钮,则消息框的输出结果为( )。A.0B.9C.a=9D.False
考题
在窗体上添加一个命令按钮,名称为Commandl,然后编写如下事件过程: Option Base 0Private Sub Commandl_Click() Dim cityAs VariantCity=.Array("北京", "上海","天津”, "重庆")Print city(1)End Sub程序执行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.空白B.错误提示C.北京D.上海
考题
在窗体中有一个标签Lbl和一个命令按钮Commandl,事件代码如下: Option Compare DatabaseDim aAs String*10Private Sub Command 1_Click( ) a="1234"b=Len(A. Me.Lbl.Caption=bEnd sub打开窗体后单击命令按钮,窗体中显示的内容是( )。【考点3 VBA程序设计基础】A.4B.5C.10D.40
考题
在窗体中添加一个命令按钮(名称为Conunandl),然后编写如下代码:PrivateSubCommand1-Click()a=0:b=0:c=6MsgBoxa=b+cEndSub窗体打开运行后,如果单击命令按钮,则消息框的输出结果为______。A.11B.a=11C.0D.False
考题
在窗体上添加一个命令按钮(名为Commandl)和一个文本框(名为Textl),并在命令按钮中编写如下事件代码:PrivateSubCommandlClick()m=17n=Len(Str$(m)+Sp2ace(5))Me!Text1=nEndSub打开窗体运行后,单击命令按钮,在文本框中显示______。A.5B.8C.9D.10
考题
在窗体中有一个标签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
考题
在窗体上添加一个名称为Commandl的命令按钮,一个名称为Labell的标签,然后编写如下事件过程。 Private Sub Commandl_Click( ) s=0fori=lt015x=2*i.1ifx mod 3=0 then s=s+ln=n+1next iLabell.Caption=sEndSub运行完毕后,单击命令按钮,则标签中显示的内容是( )。A.4B.5C.6D.7
考题
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码:PrivateSubCommandl_Click()Dima(10,10)Form=2To4Forn2To5a(m,n)=m*nNextnNextmMsgBoxa(2,5)+a(3,4)+(4,5)EndSub窗体打开运行后,单击命令按钮,则消息框的输出结果是______。A.22B.32C.42D.52
考题
在窗体中有一个标签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
考题
在窗体中添加一个命令按钮,名称为Commandl,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer,b As String,C As Integer a = 1234 : b = Str(A)c = Len(B)Print c End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是A.0B.5C.6D.7
考题
( 32 ) 在窗体上添加一个命令按钮 ( 名为 Command1 ) 和一个文本框 ( 名为 Text1 ) , 并在命令按钮中编写如下事件代码:Private Sub Command1_Click( )m=2.17n=Len(Str$(m)+Space(5))Me!Text1 =nEnd Sub打开窗体运行后,单击命令按钮,在文本框中显示A ) 5B ) 8C ) 9D ) 10
热门标签
最新试卷