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

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

在窗体上画一个命令按钮command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:

Dim Str1 As String, str2 As String

Private Sub form_load()

Text1.Text=""

Text2.Text=""

Text1.Enabled=False

Text2.Enabled=False

End Sub

Private Sub Form.

str1=str1& Chr(KeyAscii)

End Sub

Private Sub Form.

str2=str2 & Chr(KeyCode)

End Sub

Private Sub Command1

Text1.Text=str1

Text2.Text=str2

str1=""

str2=""

End Sub

当在设计阶段的窗体的KeyPreview属性设置为True时,程序运行过程中,在键盘上输入小写字母abc,然后单击命令按钮,则文本框Text1中显示的内容为

A.abc

B.不显示任何信息

C.ABC

D.出错


参考答案

更多 “ 在窗体上画一个命令按钮command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:Dim Str1 As String, str2 As StringPrivate Sub form_load()Text1.Text=""Text2.Text=""Text1.Enabled=FalseText2.Enabled=FalseEnd SubPrivate Sub Form.str1=str1 Chr(KeyAscii)End SubPrivate Sub Form.str2=str2 Chr(KeyCode)End SubPrivate Sub Command1Text1.Text=str1Text2.Text=str2str1=""str2=""End Sub当在设计阶段的窗体的KeyPreview属性设置为True时,程序运行过程中,在键盘上输入小写字母abc,然后单击命令按钮,则文本框Text1中显示的内容为A.abcB.不显示任何信息C.ABCD.出错 ” 相关考题
考题 在窗体中有两个文本框分别为 text1 和 text2 ,一个命令按钮 command1, 编写如下两个事件过程:Private sub command1_click()A=text1.value+text2.valueMsgbox aEnd subPrivate sub form_load()Text1.value= ””Text2.value= ””End sub程序运行时,在文本框 text1 中 78 ,在文本框 text2 中输入 87 ,单击命令按钮,消息框中输出的结果为____ 11 ___

考题 ( 19 )在窗体上画两个文本框(名称分别为 text1 和 text2 )和一个命令按钮(名称为 command1 ) , 然后编写如下事件过程:Private Sub Command1_Click()x = 0Do While x 50x = (x + 2) * (x + 3)n = n + 1Looptext1.Text = Str(n)text2.Text = Str(x)End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为A ) 1 和 0B ) 2 和 72C) 3 和 50D ) 4 和 168

考题 在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Text1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:Private Sub Commandl Click()Text3=Text1+Text2End SubPrivate Sub Form1 Load()Text1=" "Text2=" "Text3=" "End Sub打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。

考题 在窗体上画两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:Private Sub Command1_Click()Text 1="VB programming"Text 2=Text 1Text 1="ABCD"End Sub程序运行后,单击命令按钮,文本框Text 2中显示的内容为【 】。

考题 在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Tem1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:Private Sub Command1 Click()Text3=Text1+Text2End SubPrivate Sub Forml Load()Text1=""Text2=""Text3=""End Sub打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。

考题 在窗体上画两个文本框(其名称分别为Text1和Text2)和一个命令按钮(其名称为 Commandl),然后编写如下两个事件过程: Private Sub Command1_Click() Text1.Text = "Computer Rank Examination" End Sub Private Sub Text1_Change() Text2.Text = UCase(Text1.Text) End Sub程序运行后,单击命令按钮,则在Text2文本框中显示的内容是______。A.Computer Rank ExaminationB.computer rank examinationC.COMPUTER RANK EXAMINATIOND.空字符串

考题 在窗体上画两个文本框(其名称分别为Textl和Text2)和一个命令按钮(其名称为 Command1),然后编写如下两个事件过程: Private Sub Command1_Click() Text1.Text="Microsoft Visual Basic" End Sub Private Sub Text1_Change() TextText=UCase(Text1.Text) End Sub 程序运行后,单击命令按钮,则在Text2文本框中显示的内容是A.Microsoft Visual BasicB.microsoft visual basicC.MICROSOFT VISUAL BASICD.空字符串

考题 在名为”Forml”的窗体上添加三个文本框和一个命令按钮,其名称分别为”Textl”、”Text2”、”Text3”和”Commandl”,然后编写如下两个事件过程:

考题 在窗体上画两个文本框(其Name属性分别为Text1和Tex12)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程: 程序运行后,单击命令按钮,在两个文本框中显示的值分别为()。A10和0B2和100C3和50D4和168

考题 在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为多少?