更多"窗体上有一个列表框和一个文本框,编写下列两个事件过程: Privat"的相关试题:
[单项选择]窗体上有一个列表框和一个文本框,编写下列两个事件过程:
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. 北京中国
[单项选择]窗体上有一个列表框和一个文本框,编写如下两个事件过程:
Private Sub Form_Load( )
List1.AddItem“Beijing"
List1.AddItem "Tianjin"
List1.AddItem”Shanghai”
Text1.Text=“”
End Sub
Private Sub List1_Db1Click( )
x=List1.Text
Print x+Text1.Text
End Sub
程序运行后,在文本框中输入“China”,然后双击列表中的“Shanghai”,则输出结果为( )。
A. China Beijing
B. China Tianjing
C. China Shanghai
D. Shanghai China
[单项选择]窗体上有一个列表框和一个文本框,编写下列两个事件过程:
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. 北京中国
[单项选择]设窗体上有一个名为Text1的文本框,并编写如下程序: Private Sub Form_Load( ) Show Text1.Text="" Text1.SetFocus End Sub Private Sub Form_Mouse Up (Button As Integer,Shift As Integer,X As Single,Y As Single) Print"程序设计" End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print"Visual Basic"; End Sub 程序运行后,如果在文本框中输入字母“a”,然后单击窗体,则在窗体上显示的内容是()。
A. Visual Basic
B. 程序设计
C. Visual Basic程序设计
D. a程序设计
[单项选择]在窗体上添加文本框Text1,然后编写下列程序:
Private Sub Form_Load( )
Text1.Text=" "
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Char=Chr(KeyAscii+1)
KeyAscii=Asc(Ucase(Char))
End Sub
Private Sub Command1_Click( )
Print Text1.Text
End Sub
程序运行后,在文本框中依次输入1、2、3、a、b、c,单击命令按钮,则窗体上显示的内容是
A. 23BCD
B. ABC
C. !@#ABC
D. 123abc
[单项选择]在窗体上画一个列表框和一个文本框,然后编写如下两个事件过程: 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. 1245
B. 456789
C. 789456
D. 0
[单项选择]在窗体上画一个文本框和一个列表框,然后编写如下两个事件过程:
Private Sub Form_Load( )
List1.Addltem "357"
List1.Addltem "246"
List1.Addltem "123"
List1.AddItem "456"
Text1.Text = ""
End Sub
Private Sub Listl_DblClick0
m=List1.Text
Print m + Text1.Text
End Sub
程序运行后,在文本框中输入“123”,然后双击列表框中的“456”,输出结果为( )。
A. 1245
B. 456123
C. 123456
D. 0
[单项选择]在窗体上画一个文本框和一个列表框,然后编写如下两个事件过程: 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. 1245
B. 456123
C. 123456
D. 0
[单项选择]在窗体上画一个文本框和一个列表框,然后编写下列两个事件过程:
Private Sub Form_Load( )
List1.AddItem"357"
List1.AddItem"246"
List1.AddItem"123"
List1.AddItem"456"
Text1.Text=""
End Sub
Private Sub List1 DblClick( )
m=List1.Text
Print m+Text1.Text
End Sub
程序运行后,在文本框中输入“123”,然后双击列表框中的"456",输出结果是( )。
A. 1245
B. 456123
C. 123456
D. 0