单项选择题
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序: Private Sub Form_Load() Show Text1.Text = "" Text2.Text = "" Text1.SetFocus End Sub Private Sub Text1_Change() Text2.Text = Mid(Text1.Text, 8) End Sub 程序运行后,如果在文本框Text1中输入BeijingChina,则在文本框Text2显示的内容是______。
A.BeijingChina
B.China
C.Beijing
D.BeijingC
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
设已经在“菜单编辑器”中设计了窗体的快捷菜单,其顶级菜单为Bs,取消其“可见”属性,运行时,在以下事件过程中,可以使快捷菜单响应鼠标右键菜单的是( )。
A.Private Sub Form_Mouse Down(Button As Integer,Shift As Integer,- X As Single,Y As Single) If Button=2 Then PopupMenu Bs,2 End Sub
B.Private Sub Form_MouseDown(Button As Integer,Shift As Integer,- X As Single,Y As Single) PopupMenu Bs End Sub
C.Private Sub FOrm_MouseDown(Button As Integer,Shift As Integer,- X As Single,Y As Single) PopupMenu Bs,0 End Sub
D.Private Sub Form_MouseDown(Button As Integer,Shin As Integer,- X As Single,Y As Single) If(Button=vbLeftButton)Or(Button=vbRightButton)Then PopupMenu Bs End Sub
点击查看答案&解析
单项选择题
设有下面的循环:i=1Doi=i + 3Print iLoop Until I>_________程序运行后要执行3次循环体,则条件中I的最小值为( )。
A.k%=10Dim Arr(k)
B.Const k%=10Dim Arr(k)
C.Dim Arrl(10) As IntegerDim Arr2(10)
D.Dim Arrl(1 To 10)Dim Arr2(1 To 10,2 To 11)
点击查看答案&解析
相关试题
在窗体上画 1 个文本框,名称为 Text1...
某二叉树中度为2的结点有18个,则该二叉...
在E盘当前目录文件夹下建立一个名为“Stude...
在E盘当前目录文件夹下建立一个名为“Stude...
每一个窗体或者控件都有一个名字,为提高程...