更多"在窗体上面有一个列表,然后编写如下两个事件过程: Private S"的相关试题:
[填空题]在窗体上面有一个列表,然后编写如下两个事件过程:
Private Sub Form_Click( )
List1.RemoveItem1:List1.RemoveItem2
List1.RemoveItem3
End Sub
Private Sub Form_Load( )
List1.AddItem"ItemA":List1.Addhem"ItemB"
List1.AddItem"ItemC":List1.Addhem"ItemD"
List1.AddItem"ItemE"
End Sub
运行上面的程序,然后单击窗体,列表框中显示的项目是______。
[单项选择]在窗体上面画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
a$="321":b$="abc"
For j=l To 5
Print Mid$(a$,6-j,1)+Mid$(b$,j,1);
Next j
End Sub
程序运行后,输出的结果是
A. alb2c3
B. ablc23
C. clb2a3
D. a12bcl
[填空题]在窗体上有一个列表,然后编写如下两个事件过程:
Private Sub Form_Click( )
List1.RemoveItem 1:List1.RemoveItem 2
List1RemoveItem 3
End Sub
Private Sub Form_Load( )
List1.AddItem"ItemA":List1.AddItem"ItemB’P
List1.AddItem"ItemC ’:List1.AddItem"ItemD"
List1.AddItem"ItemE”
End Sub
运行上面的程序,然后单击窗体,列表框中显示的项目是 (7) 。
[填空题]在窗体上画一个列表,然后编写如下两个事件过程。
Private Sub Form_Click( )
List1.Removeltem 1
List1.Removeltem 2
End Sub
Private Sub Form_Load( )
List1.Addltem"ItemA"
List1.Addltem"ItemB"
List1.Addltem"ItemC"
List1.Addltem"ItemD"
List1.Addltem"ItemE"
End Sub
运行上面的程序,然后单击窗体,列表框中显示的项目是______。
[单项选择]在窗体上画一个列表框、一个文本框和一个按钮,然后编写如下事件过程:
Private Sub Form_Load( )
List.AddItem“357”
List.AddItem“246”
List.AddItem”123”
List.AddItem”456”
TEXT1.Text="
End Sub
Private Sub Command1_C1ick( )
List.Listindex=3
Print List.Text+Text1.Text
End Sub
程序运行后,在文本框中输入“789”,然后双击列表框中“456”,则输出结果为( )。
A. 789123
B. 456789
C. 789456
D. 12345
[单项选择]在窗体上面有一个文本框,其名称为Text1,然后编写如下事件过程:
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim str As String
str=Chr(KeyAscii)
KeyAscii=Asc(UCase(str))
Text1.Text=String(2,KeyAscii)
End Sub
程序运行后,如果在键盘上输入字母“a”,则在文本框Text1中显示的内容为( )。
A. aaa
B. AAA
C. AA
D. aa
[单项选择]在窗体上画一个列表框、一个文本框及一个按钮,然后编写如下两个事件过程。
Private Sub Form_Load( )
List.Addltem"357"
List.Addltem"246"
List.Addltem"123"
List.Addltem"456"
Text1.Text=""
End Sub
Private Sub Command1_C/ick( )
List. ListIndex=3
Print List.Text+Text1.Text
End Sub
程序运行后,在文本框中输入“789”,然后双列表框中的“456”,则输出结果为______。
A. 789123
B. 456789
C. 789456
D. 1245
[填空题]在窗体上画一个列表框,然后编写如下两个事件过程:
Private Sub Form_Click( )
List1.RemoveItem 1
List1.Removeltem 3
List1.RemoveItem 1
End Sub
Private Sub Form Load( )
List1.AddItem "ItemA"
List1.AddItem "ItemB"
List1.AddItem "ItemC"
List1.AddItem "ItemD"
List1.AddItem "ItemE"
End Sub
运行上面的程序,然后单击窗体,列表框中所显示的项目为 【10】 。
[单项选择]在窗体上画一个列表框和一个文本框,然后编写如下两个事件过程: 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