在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click(
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() s= "ABBACDDCAB" For i=6 To 2 Step -2 x=Mid(s,i,i) y=Left(s,i) z=x&y Next i MsgBox z End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果是()。
A.AABA
B.ABBA
C.BABBA
D.BBAB
时间:2023-01-30 16:38:13
-
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:
https://assets.asklib.com/images/image2/2018080114161482449.jpg
程序运行后,单击命令按钮,则标签中显示的内容是()
A . 5
B . 15
C . 20
D . 25
-
在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过程:Private Sub Command1
在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过程: Private Sub Command1_Click() a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBox a$,,b$,c$,1 End Sub 则在弹出的信息框的标题栏中显示的信息是()。
A.hardware
B.software
C.hardware
D.1
-
在VB窗体上添加一个名称为 Command1的命令按钮,再添加两个名称分别为Label1、Label2的标签,然后
A.A.13和40
B.B.13和8
C.C.5和40
D.D.5和8
-
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程:
Private Sub Command1_Click()
n = Val(Text1.Text)
For i = 2 To n
For j = 2 To sqr(i)
If i Mod j = 0 Then Exit For
Next j
If j > Sqr(i) Then Print i
Next i
End Sub
该事件过程的功能是()。
A.输出n以内的奇数
B.输出n以内的偶数
C.输出n以内的素数
D.输出n以内能被j整除的数
-
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:Public x As integerPrivate Sub C
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Public x As integer Private Sub Command1_Cliek() x=10 Call s1 Call s2 MsgBox x End Sub Private Sub s1 () x = x+20 End Sub Private Sub s2 () Dim x As integer x =x +20 End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果为()。
A.10
B.30
C.40
D.50
-
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程;Private Sub Command1_Click()a $
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程; Private Sub Command1_Click() a $="software and hardware" b $=Right(a$, 8) c $=Mid(a$, 1, 8) MsgBox a$, ,b$,c$,1 End Sub 运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是______。
A.software and hardware
B.software
C.hardware
D.1
-
在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色)。当向文本框中输入任何字符时,命令按钮Command1变为可用。请在()处填入适当的内容,将程序补充完整。
<img src='https://img2.soutiyun.com/ask/uploadfile/10839001-10842000/b6e1961a1ece372d5b5d9638e1f875a5.jpg' />
-
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(如图1所示),就可以把文本框中的内容写到文件Out.txt中,每次写 入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是()。<img src='https://img2.soutiyun.com/ask/uploadfile/2340001-2343000/9ee39e48e3711140203a592ce77b107b.jpg' /><img src='https://img2.soutiyun.com/ask/uploadfile/2340001-2343000/54c76f430783fad60b8a548d0f7a9765.jpg' />
-
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click()
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() c = 1234 c1 = Trim(Str(C)) For i = 1 To 4 Print_____ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容 1 12 123 1234 则在下划线处应填入的内容为
A.Right(c1,i)
B.Left(c1,i)
C.Mid(c1,i,1)
D.Mid(c1,i,i)
-
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程:Priva
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写 如下事件过程: Private Sub Command1_Click() n = Val(Text1.Text) For i = 2 To n For j = 2 To Sqr(i) If i Mod j=0 Then Exit For Next j If j>Sqr(i)Then Print i Next i End Sub 该事件过程的功能是
A.输出n以内的奇数
B.输出n以内的偶数
C.输出n以内的素数
D.输出n以内能被j整除的数
-
在窗体上画二个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
<img src='https://img2.soutiyun.com/ask/uploadfile/2586001-2589000/23e1201b59bd107c459be2a1be30957d.jpg' />
程序运行后,单击命令按钮,在文本框中显示的值是
A.2
B.3
C.4
D.5
-
在窗体中添加一个名称为COMMAND1的命令按钮,然后编写如下事件代码: PRIVATE SUB COMMAND1_CLICK(
在窗体中添加一个名称为COMMAND1的命令按钮,然后编写如下事件代码: PRIVATE SUB COMMAND1_CLICK() A =75 IF A >60 THEN K=1 ELSEIF A > 70 THEN K=2 ELSEIF A > 80 THEN K=3 ELSEIF A >90 THEN K=4 ENDIF MSGBOX K END SUB 窗体打开运行后,单击命令按钮,则消息框的输出结果是()。
A.1
B.2
C.3
D.4
-
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码:Private Sub Command1_Click()
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() A=75 If A>60 Then I=1 If A>70 Then 1=2 If A>80 Then 1=3 If A>90 Then 1=4 MsgBox I End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果是()。
A.1
B.2
C.3
D.4
-
在窗体中添加一个名称为Text1的文本框,两个名称分别为Command1和Com mand2的命令按钮。要求程序运行后,用户向文本框中输入字母,单击Command1按钮则文本框中字母全部转换为大写;然后单击Command2按钮则文本框中字母全部转换为小写。请在【 】、【 】和【 】处填入适当的内容,将程序补充完整。
-
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n=1 To 20 If n Mod 3<>0 Then in=m+n/3 Next Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是
A.15
B.18
C.21
D.24
-
在窗体中添加一个命令按钮、一个标签和一个文本框,并将文本框的Text属性置空,编写命令按钮Command1的Click事件代码:
<img src='https://img2.soutiyun.com/ask/uploadfile/3852001-3855000/06618ed14e1342af407ef4550c1f28b1.jpg' /><img src='https://img2.soutiyun.com/ask/uploadfile/3852001-3855000/1ebfd75144eb824dfe338ddda7667206.jpg' />程序运行后,在文本框中输入20,单击命令按钮后,标签中的内容为()。
A.20是一个奇数
B.20
C.20是一个偶数
D.2
-
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()c=
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() c=“ABCD” For n=l to 4 Print______ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容: D CD BCD ABCD 则在______处应填入的内容为
A.Left(c,n)
B.Right(c,n)
C.Mid(c,n,1)
D.Mid(c,n,n)
-
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序:对于上述程序,以下叙述中错误的是()
A.语句fun=n有错,因为n是整型,fun没有定义类型
B.运行程序,输入值为5时,文本框中显示655
C.运行程序,输入值为6时,文本框中显示42
D.ByRef表示参数按址传递
-
窗体上有一个名称为Command1的命令按钮,并有如下程序:程序运行后单击命令按钮Command1,输出结果是()
A.0
B.-1
C.-2
D.-3
-
窗体上有一个名称为Command1的命令按钮,其单击事件过程代码如下:运行程序后单击命令按钮Command1,窗体上显示的是()
A.12345
B.678910
C.23456
D.62345
-
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码:程序运行后,单击命令按钮,则两个标签中显示的内容分别是()
A.25和3
B.5和3
C.25和6
D.5和6
-
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:程序运行后,单击命令按钮,将显示一个输入对话框,如果在输入对话框中输入25,则程序的执行结果为()。
A.输出0
B.输出25
C.输出45
D.无任何输出
-
窗体上有一个名称为Combo1的组合框, 其初始内容为空,有一个名称为Command1、标题为“添加项目”的命令按钮。程序运行后,如果单击命令按钮,会将给定数组中的项目添加到组合框中,如图所示。请填空。 Option Base 1 Private Sub Command 1_ Click(Dim city As Variant city=_【6】_("北京","天津","上海","武汉","重庆
-
在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1、Text2,然后编写如下程序: Private Sub Command1_Click() a=Text1.Text b=Text2.Text c=LCase (
A.
d=UCase (
B.
&