单项选择题
在窗体上有两个文本框控件,名称分别为Text1和Text2,以下程序实现的功能是希望在文本框Text1中输入字符时,输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示,下划线处应填( )。
图20-1 Private Sub Text1_ _________() Text2. Text=Text1. Text End Sub
A.SetFocus
B.Change
C.GetFocus
D.Click
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
程序代码如下,当单击窗体上的Command1控件时,窗体上显示的结果是( )。 Option Base 1 Private Sub Command1_Click() Dim i As Integer Dim x(3,3)As Integer For i=1 To 3 For j=1 To 3 x(i,j)=(i-1)*3+j Next j Next i For i=1 To 3 Print x(i,4-i); Next i End Sub
A.1 5 9
B.1 4 7
C.3 5 7
D.3 6 9
点击查看答案&解析
单项选择题
在窗体Form1中有一个名称为Image1的图像框,在窗体加载的时候为它装载了一幅图片,该图片比图像框要小如图20-2a所示,现在单击一下图像框,将把照片放到和图像框一样大,如图20-2b所示。再单击它将其还原,然后再单击放大,再单击还原,如此反复。下划线处应填( )。 图20-2 Private Sub Form_Load() Image1.Stretch=True __________ End Sub Private Sub Image1_click() Image1.Height=3000 _________ End Sub
A.Image1.Picture=LoadPictrue("gg1.gif’)
B.Image1.Picture="gg1.gif’ Image1.Stretch=True Image1.Stretch=Not Image1.Stretch
C.Image1.Picture=Loadptctrue("gg1.gif")
D.Image1.Picture="gg1.gif" Image1.Sbetch=Not Image1.Stretch Image1.Stretch=True
点击查看答案&解析
相关试题
当Form1_Click事件发生时,程序的输出结...