单选题假定窗体上有一个标签,名为Label1,为了使该标签透明并且没有边框,则正确的属性设置为( )。
单选题假定有以卜循环结构 Do Until条件 循环体 Loop 则正确的描述是( )。
单选题在窗体上添加一个命令按钮,名为command1,一文本框,名为text1,则执行如下事件过程后,文本框中的输出为______。 For i=1 To 4 x=3 For j=1 To 3 For k=1 To 2 x= x + 3 Next k Next j Next i Text1.Text=str(x)
单选题栈底至栈顶依次存放元素A、B、C、D,在第五个元素E入栈前,栈中元素可以出栈,则出栈序列可能是_________。
A. ABCED
B. DBCEA
C. CDABE
D. DCBEA
单选题目录列表框的Path属性的作用是______。A) 显示当前驱动器或指定驱动器上的某目录下的文件名B) 显示当前驱动器或指定驱动器上的目录结构C) 显示根目录下的文件名D) 显示指定路径下的文件
单选题在窗体下画两个文本框Text1和Text2,一个命令按钮Command1,请阅读下列程序段:
Private Sub Command1_Click()
x=0
Do Until x>=50
x=(x+4)*(x+3)
n=n+1
Loop
Text1.Text=Str(n)
Text2.Text=Str(x)
End Sub
运行程序后,单击命令按钮,在两个文本框中显示的值分别为( )。
单选题假定有如下语句:
answer$=MsgBox("String1",,"String2","String3",2)
执行该语句后,将显示一个信息框,单击其中的“确定”按钮,则answer$的值为______。
A.String1
B.String2
C.String3
D.1
单选题用于显示弹出式菜单的方法名是
A.ShowPOpupMenu
B.ShowMenu
C.ListPopupMenu
D.PopupMenu
单选题设已经在窗体上添加了一个通用对话框控件CommonDialogl,以下语句正确的是( )。
单选题在文本框中输入密码时,要求在文本框中只显示(*)号,则应当设置此文本框的( )属性。
单选题在窗体上画一个名称为Label1、标题为"VisualBasci考试"的标签,两个名称分别为Command1和Command2、标题分别为"开始"和"停止"的命令按钮,然后画一个名称为Timer1的计时器控件,并将其Interval属性设置为500。界面如下图所示。编写如下程序:PrivateSubForm_Load()Timer1.Enabled=FalseEndSubPrivateSubCommand1_Click()Timer1.Enabled=TrueEndSubPrivateSubCommand2_Click()Timer1.Enabled=FalseEndSubPrivateSubTimer1_Timer()IfLabel1.Left<WidthThenLabel1.Left=Label1.Left+20ElseLabel1.Left=0EndIfEndSub程序运行后单击"开始"按钮,标签在窗体中移动。对于这个程序,以下叙述中错误的是______。A)标签的移动方向为自右向左B)单击"停止"按钮后再单击"开始"按钮,标签从停止的位置继续移动C)当标签全部移出窗体后,将从窗体的另一端出现并重新移动D)标签按指定的时间间隔移动
单选题在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl—Click() x=InputBox(“请输入一个整数”) Print x+345 End Sub 程序运行后,单击命令按钮,在输入对话框中输入123,则在窗体上输出的内容为( )
单选题以下能在窗体Forml的标题栏中显示“Visual Basic窗体”的语句是{{U}} {{/U}}。
A.Forml.Namer="VisualBasic窗体"
B.Forml.Title="VisualBasic窗体"
C.Forml.Caption="VisualBasic窗体"
D.Forml.Text="VisualBasic窗体"
单选题语句Dim a(-3 To 4, 3 To 6) As Integer定义的数组的元素个数是
单选题窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器,并有下面的事件过程:
Private Sub Command1_Click()
Timer1.Enabled=Ture
Private Sub Form_Load()
Timer1.Interval=10
Timer1.Enabled=False
End Sub
Private Sub Timer1_Timer()
Command1.Left=Command1.Left+10
End Sub
程序运行时,单击命令按钮,则产生的结果是______。
单选题使两种完全不同的应用程序进行通信的技术称为( )技术。
单选题某人在窗体模块中定义了如下自定义类型:Type Rec num As Integer name As StringEnd Type但发现程序不能运行,关于这一问题,下面叙述中正确的是
单选题设有下面的循环:
i=0
While i<=1
i=i + 3
Print i
Wend
则运行后的输出结果是( )。
单选题当一个工程含有多个窗体时,其中启动窗体是( )。
单选题运行下列语句后,输出的结果是( )。 Option Base 1 Dim a i=1 a=Array(l, -2, 9, 0, -1, 9) Do k=a(i) For m = 10 To k Step -2 n=k+m Next m Print n+m i=i+1 Loop While Abs(m+n) <> 27