题目
第1题
Dim SaveAll As String
Private Sub Form_Load ()
Show
Text1.Text= ” ”
Text1.SetFocus
End Sub
Private Sub Command1_Click()
Text1.Text=Lcase(SaveAll)+SaveAll
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
SaveAll=SaveAll+Chr(KeyAscii)
End Sub
程序运行后,直接用键盘输入: VB ,再单击命令按钮,则文本框中显示的内容为
A ) vbVB
B )不显示任何信息
C ) VB
D )出错
第2题
A.对象,值,属性
B.对象,属性,值
C.对象,方法,属性
D.属性,对象,值
第3题
在窗体上画一个文本框和一个图片框,然后编写口下两个事件过程:
Private Sub Form_Click()
Text1.Text="VB程序设计"
End Sub
Private Sub Text1_Change()
PicturePrint"VB programming"
End Sub
程序运行后,单击窗体,则在本框中显示的内容是【 】,而在图片框中显示的内容是【 】。
第4题
A.Textbox.text="这是一个等边三角形!"
B.Text1.text="这是一个等边三角形!"
C.Text1.Caption="这是一个等边三角形!"
D.Text1.textbox="这是一个等边三角形!"
第6题
在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:
Private Sub Form_Click()
Text1.Text = "VB程序设计"
End Sub
Private Sub Text1_Change()
Picture1.Print "VB Programming"
End Sub
程序运行后,单击窗体,则在文本框中显示的内容是______,而在图片框中显示的内容是_____。
第7题
在窗体上绘制一个文本框和一个图片框,然后编写如下两个事件过程:
Private Sub Form_Click()
Text1.Text="VB程序设计"
End Sub
Private Sub Text1_Change()
Picmml.Print"VBProgramming"
End Sub
程序运行后,单击窗体,则在文本框中显示的内容 [9] ,而在图片框中显示的内容是 [10] 。
第8题
(10)在窗体上画一个文本框和一个图片框,然后编写下列两个事件过程: Private Sub Form_Click() Text1.Text="VB Programming" End Sub Private Sub Text1_Change() Picture1.Print"VB程序设计" End Sub 程序运行后,单击窗体,则在文本框中显示的内容是,而在图片框中显示的内容是 。
第11题
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:Dim SaveAll As StringPrivate Sub Form_ Load () Show Text1.Text=" " Text1.SetFocusEnd SubPrivate Sub Command1_ Click() Text1. Text=LCase(SaveAll)+SaveAllEnd SubPrivate Sub Form_ KeyPress (KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii)End Sub程序运行后,直接用键盘输入:VB,再单击命令按钮,则文本框中显示的内容为 ______。
A.vbVB
B.不显示任何信息
C.VB
D.出错
为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!