网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
在窗体上画一个文本框和一个图片框，然后编写口下两个事件过程：
Private Sub Form_Click()
Text1.Text="VB程序设计"
End Sub
Private Sub Text1_Change()
PicturePrint"VB programming"
End Sub
程序运行后，单击窗体，则在本框中显示的内容是【 】，而在图片框中显示的内容是【 】。
参考答案
更多 “ 在窗体上画一个文本框和一个图片框，然后编写口下两个事件过程：Private Sub Form_Click()Text1.Text="VB程序设计"End SubPrivate Sub Text1_Change()PicturePrint"VB programming"End Sub程序运行后，单击窗体，则在本框中显示的内容是【 】，而在图片框中显示的内容是【 】。 ” 相关考题
考题
在窗体上画一个名称为 TxtA 的文本框，然后编写如下的事件过程：Private Sub TxtA_KeyPress（KeyAscii As Integer）……End Sub假定焦点已经位一地文本框中，则能够触发 KeyPress 事件的操作是（ ）。 A．单击鼠标B．双击文本框C．鼠标滑过文本框D．按下键盘上的某个键
考题
（ 28 ）在窗体上画一个名称为 TxtA 的文本框，然后编写如下的事件过程：Private Sub TxtA _KeyPress(KeyAscii As Integer)......End Sub假定焦点已经位于文本框中，则能够触发 KeyPress 事件的操作是A ） 单击鼠标B ） 双击文本框C ）鼠标滑过文本框D ）按下键盘上的某个键
考题
设有如下通用过程： Public Sub Fun(a() As Integer, x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程： Private Sub Command1_Click() Dim arr(5)As Integer, n As Integer For i=1 To 5 art(i)=i+i Next Fun arr, n Text1. Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的内容是______。A．30B．25C．20D．15
考题
在窗体上画一个列表框和一个文本框，然后编写如下两个事件过程： Private Sub Form_ Load () Liet1.AddItem“357” List1.AddItem“246” List1.AddItem“123” List1.AddItem“456” Text1.Text=“” End Sub Private Sub List1_DblClick() a=List1.Text Print a+Text1.Text End Sub 程序运行后，在文本框中输入“789”，然后双击列表框中的“456”，则输出结果为______ 。A．1245B．456789C．789456D．0
考题
在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Private Sub Form_Click（）Text1.Text = "VB程序设计"End SubPrivate Sub Text1_Change（）Picture1.Print "VB Programming"End Sub程序运行后，单击窗体，则在文本框中显示的内容是______，而在图片框中显示的内容是_____。
考题
在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click（）x = InputBox（"请输入一个整数"）Print x + Text1.TextEnd Sub程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为（ ）。A．123B．456C．479D．123456
考题
在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(KeyAscii As Integer) …… End Sub 假定焦点已经位于文本框中，则能够触发KeyPress事件的操作是______。A．单击鼠标B．双击文本框C．鼠标滑过文本框D．按下键盘上的某个键
考题
（10）在窗体上画一个文本框和一个图片框，然后编写下列两个事件过程： Private Sub Form_Click() Text1.Text="VB Programming" End Sub Private Sub Text1_Change() Picture1.Print"VB程序设计" End Sub 程序运行后，单击窗体，则在文本框中显示的内容是，而在图片框中显示的内容是 。
考题
在窗体上画一个文本框和一个图片框，然后编写下列两个事件过程：Private Sub Form_C1ick()Textl.Text="VB Programming"End SubPrivate SubText1_change()Picture1.Print"VB程序设计"End SUb程序运行后，单击窗体，则在文本框中显示的内容是______，而在图片框中显示的内容是______。
考题
在窗体上绘制一个文本框和一个图片框，然后编写如下两个事件过程：Private Sub Form_Click()Text1.Text="VB程序设计"End SubPrivate Sub Text1_Change()Picmml.Print"VBProgramming"End Sub程序运行后，单击窗体，则在文本框中显示的内容 [9] ，而在图片框中显示的内容是 [10] 。
考题
在窗体上画一个文本框(Textl)，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(Ucase(char)) Print String(4，KeyAscii) End Sub 程序运行后，在文本框Text1中输入A，则程序在窗体上的输出结果为A．aB．AC．aaaaD．AAAA
考题
在窗体上添加一个文本框，其名称为text1，然后编写如下的Load事件过程，则该程序的运行结果是______。Private Sub form_ load Text1. Text = " " t = 1 for k = 10 To 6 Step -2 t= t* k Next k Text1. Text = tEnd SubA．在文本框中显示120B．文本框中仍为空C．在文本框中显示480D．出错
考题
在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和 Text2)和一个命令按钮(Name属性为Commandl)，然后编写如下两个事件过程： Private Sub Commandl Click() a=TextText+TextText Print a End Sub Private Sub Form. Load() TextText="" Text2．Text="" End Sub 程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和 321，然后单击命令按钮，则输出结果为 ( )A．444B．321123C．123321D．132231
考题
在窗体上画两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：Private Sub Command1_Click()Text 1="VB programming"Text 2=Text 1Text 1="ABCD"End Sub程序运行后，单击命令按钮，文本框Text 2中显示的内容为【 】。
考题
在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(keyaseii as integer) …… End Sub 若焦点位于文本框中，则能够触发KeyPress事件的操作是A．单击鼠标B．双击文本框C．鼠标滑过文稿本框D．按下键盘上的某个键
考题
窗体上画一个名称为Text1的文本框，然后编写如下事件过程： Private Sub Form. Load() Show TextSetFocus End Sub Private Sub Text1_ KeyPress (KeyAscii As Integer) Dim ch As String ch = Chr (KeyAscii) KeyAscii = Asc(UCase(ch)) Pint Chr(KeyAscii + 4) End Sub程序运行后，在文本框中输入abcde，则在窗体上显示的内容是______。A．abcdeB．efghiC．EFGHID．ABCDE
考题
在窗体上画一个列表框、一个文本框及一个按钮，然后编写如下两个事件过程： Private Sub Form_Load() For i=1 To 10 List1.AddItem i * 10 Next i Text1.Text=" " End Sub Private Sub List1_Click() Print List1.Text + Text1.Text End Sub 程序运行后，在文本框中输入“123”，然后双击列表框中的第四行，则在窗体上输出的结果为A．40123B．163C．123D．30123
考题
在窗体上画一个名称为Text1的文本框，然后编写如下的事件过程： Private Sub Text1_KeyPress(Keyascii As Integer) ... End Sub 若焦点位于文本框中，则能够触发此事件的操作是( )。A．左键单击文本框B．左键双击文本框C．右键单击文本框D．按下键盘上的某个键
考题
在窗体上画一个文本框，然后编写如下事件过程：Private Sub Text1_ KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1. Text= String(6，KeyAscii)End Sub程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为______。A．aB．AC．aaaaaaaD．AAAAAAA
考题
在窗体上添加一个文本框Text 1，然后编写如下的Load事件过程，则程序运行结果为( )。 Private Sub Form_Load0 Text1. Text="" Text1. SetFocus For k = 1 To 5 t=t*k Next k Text1.Text = tEnd SubA．在文本框中显示120B．文本框中仍为空C．在文本框中显示1D．出错
考题
在窗体上画一个文本框和一个列表框，然后编写如下两个事件过程： Private Sub Form_Load() List1.AddItem "357" List1.AddItem "246" List1.AddItem "123" List1.AddItem "456" Text1.Text="" End Sub Private Sub List1_Db1Click() m=List1.Text Print m+Text1.Text End Sub 程序运行后，在文本框中输入“123”，然后双击列表框中的“456”，输出结果为( )。A．1245B．456123C．123456D．0
考题
在窗体上画一个文本框，然后编写如下程序： Option Base 1 Private Sub Form_Click() Dim Arr(10)As Integer For i=6 To 10 Arr(i)=i-3 Next i Text1．Text：Str(Arr(6)+Arr(Arr(6)+Arr(10))) End Sub 程序运行后，单击窗体，在文本框中显示的内容是A．1B．3C．6D．10
考题
在窗体上绘制一个文本框，然后编写如下事件过程： Private Sub Form_Click() x=InputBox("请输入一个整数") Print x+Text1.Text End Sub 程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为( )。A．123B．456C．579D．123456
考题
在窗体(Name属性为Forml)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl)，然后编写如下两个事件过程： Private Sub Commandl_Click() a=Text1.Text+Text2.Text Printa End Sub Private Sub Form_Load() Text1.Text="" Text2.Text="" End Sub 程序运行后，在第一个文本框(A．165B．8778C．7788D．7887
考题
在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Private Sub Form_Click()Textl.Text="VB程序设计"End SubPrivate Sub Textl_Change()Picturel.Print"VB programming"End Sub程序运行后，单击窗体，则在文本框中显示的内容是【 】，而在图片框中显示的内容是【 】。
考题
在窗体上画一个名称为Txta的文本框，然后编写如下的事件过程：Private Sub Txta_KeyPress（keyascii asinteger）EndSub若焦点位于文本框中，则能够触发KeyPress事件的操作是（）A、单击鼠标B、双击文本框C、鼠标滑过文本框D、按下键盘上的某个键
考题
单选题在窗体上画一个名称为Txta的文本框，然后编写如下的事件过程：Private Sub Txta_KeyPress（keyascii asinteger）EndSub若焦点位于文本框中，则能够触发KeyPress事件的操作是（）A
单击鼠标B
双击文本框C
鼠标滑过文本框D
按下键盘上的某个键
热门标签
最新试卷