在窗体中绘制两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:Private Su
在窗体中绘制两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:
Private Sub Command1_Click()
Text1="VB programming"
Text2=Text1
Text1="ABCD"
End Sub
程序运行后,单击命令按钮,文本框Text2中显示的内容为【 】。
在窗体中绘制两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:
Private Sub Command1_Click()
Text1="VB programming"
Text2=Text1
Text1="ABCD"
End Sub
程序运行后,单击命令按钮,文本框Text2中显示的内容为【 】。
在窗体上画两个文本框(其NAME属性分别为TEXT1和TEXT2)和一个命令按钮(其NAME属性为COMMAND1),然后编写如下事件过程: PRIVATE SUB COMMAND1_CLICK() X=0 N=0 DO WHILE X<50 x=(x+2) * (x+3) N=N+1 LOOP TEXT1=STR(N) TEXT2=STR(X) END SUB程序运行后,单击命令按钮,在两个文本框中显示的值分别为()。
A.1和0
B.2和72
C.3和50
D.4和168
(6)在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为 Text1、Label1 和 Command1,然
后编写如下两个事件过程:
Private Sub Command1_Click()
S$=InputBox("请输入一个字符串")
Text1.Text=S$
End Sub
Private Sub Text1_Change()
Label1.Caption=UCase(Mid(Text1.Text, 7))
End Sub
程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入字符串“VisualBasic”,
则在标签中显示的内容是 【6】 。
在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(真Name属性为Command1),然后编写如下事件过程: Private Sub Command1_Click() x=0 Do While x<50 x=(x+2)*(x+3) n=n+1 Loop Text1.Text=Str (n) Text2.Text=Str (x) End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别为______ 。
A.1和0
B.2和72
C.3和50
D.4和168
在窗体上画两个文本框(其Name属性分别为了ext1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程: Private Sub Command1_Click() x = 0: n = 0 Do Until x >= 30 x = (n + 2)* (n + 3) n = n + 1 Loop Text1.Text = Str(n) TextText = Str(x) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为
A.2和30
B.2和240
C.3和50
D.4和30
在窗体中有两个文本框分别为Textl和Text2,一个命令按钮Cmmand1,编写如下两个事件过程:
Private Sub Commandl_Click()
a=Textl.Value+Text2.Value
MsgBox a
End Sub
Private Sub Form_Load()
TextI.Value=“”
Text2.Value=””
End Sub
程序运行时,在文本框Textl中输入78,在文本框Text2中输入87,单击命令按钮,消息框中输出的结果为【 】。
在窗体(名称为Forml)上绘制一个名称为Text1的文本框和一个名称为Commandl的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是()。
A.Private Sub Texl_Change() Commandl.Caption="计算机等级考试” End Sub
B.PrivateSubCommandl_Click() Caption="计算机等级考试"
C.Private Sub Commandl_Click() Text.Caption="计算机等级考试" End Sub
D.Private Sub Commandl_Click() Text1.Text="计算机等级考试" End Sub
在窗体上绘制一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序: Private Sub Command1_Click() a=InputBox("请输入日期(1~31)") t="旅游景点:"_ &IIf(a>0 And a<=10,"长城:,"")_ &IIf(a>10 And a<=20,"故宫","")_ &IIf(a>20And a<=31,"颐和园:,"") Text1.Text=t End Sub 程序运行后,如果从键盘上输入16,则在文本框中显示的内容是()
A.旅游景点:长城故宫
B.旅游景点:长城颐和园
C.旅游景点:颐和园
D.旅游景点:故宫
在窗体(名称为Form1)上绘制一个名称为Text1的文本框和一个名称为Commandl的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是
A.Private Sub Tex1_Change() Command1.Caption=“计算机等级考试” EndSub
B.Private Sub Command1_Click() Caption="计算机等级考试”
C.Private Sub Command1_Click() Text.Caption=“计算机等级考试” End Sub
D.Private Sub Command1_Click() Textl.Text=-"计算机等级考试” End Sub
在窗体下画两个文本框Text1和Text2,一个命令按钮Command1,请阅读下列程序段:
Private Sub Command1_Click()
x=0
Do Until x>=50
x=(x+4)*(x+3)
n=n+1
Loop
Text1.Text=Str(n)
Text2.Text=Str(x)
End Sub
运行程序后,单击命令按钮,在两个文本框中显示的值分别为()。
A.1和0
B.2和240
C.3和50
D.4和168
在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1、Text2,然后编写如下程序: Private Sub Command1_Click() a=Text1.Text b=Text2.Text c=LCase (A)d=UCase (B)Print c;d End Sub程序运行后,在文本框Text1、Text2中分别输入AbC和Efg,结果是______ 。
A.abcEFG
B.abcefg
C.ABCefg
D.ABCEFG
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!