在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:
Private Sub Form_Click()
Textl.Text="VB程序设计"
End Sub
Private Sub Textl_Change()
Picturel.Print"VB programming"
End Sub
程序运行后,单击窗体,则在文本框中显示的内容是【 】,而在图片框中显示的内容是【 】。
第1题:
在窗体上画一个列表框和一个文本框,然后编写如下两个事件过程: 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
第2题:
在窗体上画一个文本框,然后编写如下事件过程:
Private Sub Form_Click()
x = InputBox("请输入一个整数")
Print x + Text1.Text
End Sub
程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,在窗体上显示的内容为( )。
A.123
B.456
C.479
D.123456
第3题:
在窗体上画一个名称为 TxtA 的文本框,然后编写如下的事件过程:
Private Sub TxtA_KeyPress(KeyAscii As Integer)
……
End Sub
假定焦点已经位一地文本框中,则能够触发 KeyPress 事件的操作是( )。 A.单击鼠标
B.双击文本框
C.鼠标滑过文本框
D.按下键盘上的某个键
第4题:
在窗体上绘制一个文本框和一个图片框,然后编写如下两个事件过程:
Private Sub Form_Click()
Text1.Text="VB程序设计"
End Sub
Private Sub Text1_Change()
Picmml.Print"VBProgramming"
End Sub
程序运行后,单击窗体,则在文本框中显示的内容 [9] ,而在图片框中显示的内容是 [10] 。
第5题:
(10)在窗体上画一个文本框和一个图片框,然后编写下列两个事件过程: Private Sub Form_Click() Text1.Text="VB Programming" End Sub Private Sub Text1_Change() Picture1.Print"VB程序设计" End Sub 程序运行后,单击窗体,则在文本框中显示的内容是,而在图片框中显示的内容是 。
第6题:
在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:
Private Sub Form_Click()
Text1.Text = "VB程序设计"
End Sub
Private Sub Text1_Change()
Picture1.Print "VB Programming"
End Sub
程序运行后,单击窗体,则在文本框中显示的内容是______,而在图片框中显示的内容是_____。
VB程序设计 VB Programming
第7题:
在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程: Private Sub TxtA_KeyPress(KeyAscii As Integer) …… End Sub 假定焦点已经位于文本框中,则能够触发KeyPress事件的操作是______。
A.单击鼠标
B.双击文本框
C.鼠标滑过文本框
D.按下键盘上的某个键
第8题:
( 28 )在窗体上画一个名称为 TxtA 的文本框,然后编写如下的事件过程:
Private Sub TxtA _KeyPress(KeyAscii As Integer)
......
End Sub
假定焦点已经位于文本框中,则能够触发 KeyPress 事件的操作是
A ) 单击鼠标
B ) 双击文本框
C )鼠标滑过文本框
D )按下键盘上的某个键
第9题:
在窗体上画一个文本框和一个图片框,然后编写下列两个事件过程:
Private Sub Form_C1ick()
Textl.Text="VB Programming"
End Sub
Private SubText1_change()
Picture1.Print"VB程序设计"
End SUb
程序运行后,单击窗体,则在文本框中显示的内容是______,而在图片框中显示的内容是______。
第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.a
B.A
C.aaaa
D.AAAA