[填空题]在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Private Sub Form_Click（　） Text1.Text="VB程序设计"End SubPrivate Sub Text1_Change（　） Picturel.Print"VB Programming"End Sub程序运行后，单击窗体，则在文本框中显示的内容是（），而在图片框中显示的内容是（）。

更多"在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Priva"的相关试题:

[填空题]在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Click（　）
Text1.Text="VB程序设计"
End Sub
Private Sub Text1_Change（　）
Picture1.Print"VB programming"
End Sub
程序运行后，单击窗体，则在文本框中显示的内容是【7】，而在图片框中显示的内
容是【8】。

查看答案

[填空题]在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Click（　）
Text1.Text="VB程序设计"
End Sub
Private Sub Text1_Change（　）
Picture1.Print"VB Programming"
End Sub
程序运行后，单击窗体，则在文本框中显示的内容是______，而在图片框中显示的内容是______

查看答案

[填空题]在窗体上画一个文本框和一个图片框，然后编写下列两个事件过程：
Private Sub Form_C1ick（　）
Textl.Text="VB Programming"
End Sub
Private SubText1_change（　）
Picture1.Print"VB程序设计"
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

查看答案

[单项选择]在窗体上画一个文本框和一个列表框，然后编写如下两个事件过程：
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（　）
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

查看答案

[单项选择]在窗体上画一个文本框，然后编写如下程序：
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. 1
B. 3
C. 6
D. 10

查看答案

[单项选择]在窗体上画一个文本框，然后编写如下代码：
Option Base 1
Private Sub Form_Click（　）
Dim arr
Dim Start As Integer，Finish As Integer
Dim Sum As Integer
arr=Array(12，4，8，16)
Start=Lbound(arr)
Finish=Ubound(arr)
Sum=0
For i=Start To Finish
Sum=Sum+arr(i)
Next i
c=Sum/Finish
Text1．Text=c
End Sub
程序运行后，单击窗体，则在文本框中显示的内容是
A. 40
B. 10
C. 12
D. 16

查看答案

[单项选择]在窗体上画一个文本框和一个列表框，然后编写如下两个事件过程： 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

查看答案

我来回答:

提交