在窗体中有两个文本框分别为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,单击命令按钮,消息框中输出的结果为【 】。
在程序中添加一个命令按钮和两个文本框,并在命令按钮中编写如下代码: Private Sub Command1_Click() a=Text1.Text b=Text2.Text c=LCase (A.d=UCase (B)Print c;d End Sub程序运行后,在文本框中分别输入ABCD和efgh,结果是______。
A.abcdEFGH
B.abcdefgh
C.ABCDefgh
D.ABCDEFGH
窗体上有一个列表框和一个文本框,编写下列两个事件过程:
Private Sub Form. Load()
List1.Addltem"北京"
List1.Addltem"天津"
List1.Addltem"上海"
Text1.Text=""
End Sub
Private Sub List1 Click()
Print Text1.Text+List1.Text
End Sub
程序运行后,在文本框中输入“中国”,然后单击列表框中的“北京”,则输出结果是()。
A.中国北京
B.中国天津
C.中国上海
D.北京中国
(13)窗体上有一个列表框和一个文本框,编写下列两个事件过程: Private Sub Form_Load() List1.AddItem"北京" List1.AddItem"天津" List1.AddItem"上海" Text1.Text="" End Sub Private Sub List1_Click() Print Text1.Text+List1.text End Sub 程序运行后,在文本框中输入“中国”,然后单击列表框中的“北京”,则输出结果是A.中国北京 B.中国天津 C.中国上海 D.北京中国
在窗体上有一个命令按钮和一个文本框。编写如下事件过程:
Private Sub Command1_Click()
a=InputBox("请输入一个整数")
Text1.Text=a
If a > 0 Then
If a Mod 3 = 0 Then
MsgBox "True"
Else
MsgBox "error"
End If
End If
End Sub
程序运行后,单击命令按钮,在输入对话框里输入12,则弹出的提示内容是______。
在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1), 然后编写如下事件过程: Private Sub Command1 Click() Text1.Text=InputBox("请输入数据1") TextText=InputBox("请输入数据2) End Sub 程序运行后,如果单击命令按钮,将先后显示两个输入对话框,在两个输入对话框中分别输入123和abc,则两个文本框中显示的内容分别为【 】和【 】。
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!