设在窗体Form1上有一个列表框List1，其中有若干个项目。要求单击列表框中的某一项时，把该项显示在窗体上，正确的事件过程是( )

A:Private Sub List1_Click() B:Print List1.Text C:End Sub D:Private Sub Form1_Click() E:Print List1.Text F:End Sub G:Private Sub List1_Click() H:Print Form1.Text I:End Sub J:Private Sub Form1_Click() K:List1.Print List1.Text L:End Sub

设在窗体Form1上有一个列表框List1，其中有若干个项目。要求单击列表框中某一项时，把该项显示在窗体上，正确的事件过程是______。

A:Private Sub Form1_Click() B:Print List1.Text C:End Sub D:Private Sub Forml_Click() E:List1.Print List1.Text F:End Sub G:Private Sub List1_Click() H:Print List1.Text I:End Sub J:Private Sub List1_Click() K:Print Form1.Text L:End Sub

当Form1_Click事件发生时，窗体上显示的第三行是( )。
Dim i As Integer，j As Integer，a(5，5) As Integer
For i=1 To 5
For j=1 To 5
If(i＜=j)Then
a(i,j)=1
Else
a(i,j)=0
End If
Next j
Next i
For i=1 To 5
For j=1 To 5
Print a(i,j),
Next j
Print
Next i
End Sub

A:0 0 0 1 1 B:0 0 1 1 1 C:0 1 1 1 1 D:1 1 1 1 1

当Form1_Click事件发生时，写出在窗体上显示的第二行和第三行是( )。
Private a As Integer,c As Integer
Private Sub Form_Click（　）
Dim a As Integer,b As Integer
a=10：b=10：c=10
Print a,b,c
Call test1(a,b)
Print a,b,c
End Sub
Private Sub test1(m As Integer,ByVal n As Integer)
Dim c As Integer
m=5：n=5：c=5
Print m,n,c
End Sub

A:5 5 5
5 10 10 B:5 5 5
5 5 10 C:5 5 10
5 10 10 D:5 5 5
10 10 10

当Form1_Click事件发生时，程序的输出结果是( )。
Private Sub Form_Click（　）
Dim M As Integer，k As Integer，t As Integer
M=5：k=7
Select Case M
Case Is＜0
M=M+5
Case 1 To 10
t=M：M=k：k=t
Case Else
M=k Mod 3
End Select
Print M，k，t
End Sub

A:5 5 7 B:5 7 5 C:7 5 5 D:7 5 7

当Form1_Click事件发生时，窗体上显示的第三行是( )。
Option Base 1
Private Sub Form_Click（　）
Dim i As Integer，j As Integer
Dim k As Integer，a(5，5)As Integer
For i=1 To 5
k=1
For j=1 To 5
If i＜=j Then
a(i，j)=k
k=k+1
Else
a(i，j)=1
End If
Next j
Next i
For i=1 To 5
For j=1 To 5
Print a(i，j)；
Next j
Print
Next i
End Sub

A:1 2 3 4 5 B:1 1 2 3 4 C:1 1 1 2 3 D:1 1 1 1 2

当Form1_Click事件发生时，窗体上显示的第三行是( )。 Option Base 1 Private Sub Form_Click（　） Dim i As Integer，j As Integer Dim k As Integer，a(5，5)As Integer For i=1 To 5 k=1 For j=1 To 5 If i＜=j Then a(i，j)=k k=k+1 Else a(i，j)=1 End If Next j Next i For i=1 To 5 For j=1 To 5 Print a(i，j)； Next j Print Next i End Sub

A:1 2 3 4 5 B:1 1 2 3 4 C:1 1 1 2 3 D:1 1 1 1 2

当Form1_Click事件发生时，窗体上显示的第三行是( )。 Dim i As Integer，j As Integer，a(5，5) As Integer For i=1 To 5 For j=1 To 5 If(i＜=j)Then a(i,j)=1 Else a(i,j)=0 End If Next j Next i For i=1 To 5 For j=1 To 5 Print a(i,j), Next j Print Next i End Sub

A:0 0 0 1 1 B:0 0 1 1 1 C:0 1 1 1 1 D:1 1 1 1 1

当Form1_Click事件发生时，写出在窗体上显示的第二行和第三行是( )。 Private a As Integer,c As Integer Private Sub Form_Click（　） Dim a As Integer,b As Integer a=10：b=10：c=10 Print a,b,c Call test1(a,b) Print a,b,c End Sub Private Sub test1(m As Integer,ByVal n As Integer) Dim c As Integer m=5：n=5：c=5 Print m,n,c End Sub

A:5 5 5 5 10 10 B:5 5 5 5 5 10 C:5 5 10 5 10 10 D:5 5 5 10 10 10

当Form1_Click事件发生时，程序的输出结果是( )。 Private Sub Form_Click（　） Dim M As Integer，k As Integer，t As Integer M=5：k=7 Select Case M Case Is＜0 M=M+5 Case 1 To 10 t=M：M=k：k=t Case Else M=k Mod 3 End Select Print M，k，t End Sub

A:5 5 7 B:5 7 5 C:7 5 5 D:7 5 7