单选题当将______属性设置为True时,可以滚动和选择控件中的文本,但不能编辑。
单选题在黑盒测试方法中,设计测试用例的主要根据是( )。
单选题某人在窗体上画了一个名称为Timer1的计时器和一个名称为Lab的属性设置为Enabled=True,Interval=0,并编程如下。希望在每2秒在标签上显示一次系统当前时间。
Private Sub Timer1_Timer()
Label1.Caption=Time
End Sub
在程序执行时发现未能实现上述目的,那么,他应做的修改是______。
单选题运行下列程序: Private Sub Command1_Click()
x = 0 Do While x<10
x=x * x + 1 y=y+x
Loop MsgBox y End Sub
单击Command1命令按钮后,弹出的消息对话框中会显示
A. 5
B. 8
C. 26
D. 34
单选题如果要在程序代码中为图片框动态加载或清除图形,可以通过{{U}} {{/U}}函数来实现。
A. InputBox
B. Input
C. LoadPicture
D. PaintPicture
单选题阅读下列程序。
Private Sub Command1_Click()
Dim i As Integer,k As Integer
k=2
For i=1 To 3
Print Fun(k);
Next
End Sub
Function Fun(j As Integer)
Static b
a=0
a=a + 1
b=b + 1
Fun=a*b+j
End Function
程序运行后,单击命令按钮输出结果是
单选题如果要在窗体上使用2组单选按钮,每组都可以有一个被选中,则应该做的是
单选题在窗体上画一个命令按钮,然后编写如下时间过程______。
Print Sub Command1_Click()
a=InputBox("Enter the First interger")
b=InputBox("Enter the Second interger")
Print b+a
End Sub
程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是
单选题Visual Basic程序设计采用的编程机制是( )。 A) 可视化 B) 面向对象 C) 事件驱动 D) 过程结构化
单选题在窗体上添加一个文本框Text1,然后编写如下的Load事件过程,则程序运行结果为( )。 Private sub Form_Load() Text1.Text="" Text1.SetFocus For k=1 To 5 t=t*k Next k Text1.Text=t End Sub
单选题以下不属于VB控件的是
单选题利用菜单编辑器在窗体中新建一个名称为mnuOpen的弹出式菜单,其中含有若干个菜单项,并编写如下事件过程:Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then _________________ End IfEnd Sub程序运行过程中,当在窗体上单击鼠标右键时,显示已建立的mnuOpen菜单,则在以上程序代码中的横线处应填入的语句是( )。
单选题以下关于图片框、图像框的叙述中,正确的是______。
单选题以下说法中正确的是
单选题决定窗体有无控制菜单的属性是
单选题窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下: Private Type x Private Sub Command1_Click() a As Integer:b As Integer Dim Y As x End Type y.a=InputBox(””) Ify.a\2=y.a/2 Then y.b=y.a*y.a Else y.b=Fix(y.a/2) End If Text1.Text=y.b End Sub 对以上程序,下列叙述中错误的是
单选题在窗体上有一个文本框,其名称为Text1,编写下列事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=Stririg(2,KeyAscii) End Sub 程序运行后,如果在键盘上输入字母“a”,则在文本框Text3中显示的内容为( )。
单选题决定一个窗体有无控制菜单的属性是_________。
A. MinButtom
B. Caption
C. MaxButton
D. ControlBox
单选题下列程序段的执行结果为 For X=5 To 1 Step -1 For Y=1 To 6-X Print Tab(Y+5);"*"; Next Print Next
单选题有下面程序代码: Option Base 1 Private Sub Commandl_Click() Dim a(10)As Integer,x,b x=InputBox(”请输入一个多位整数”) For k=1 To Len(x) b=Mid(x,k,1) a(Val(b)+1)=a(Val(b)+1)+1 Next k For k=1 To 10 Print a(k): Next k End Sub 程序运行时,单击命令按钮Command1,输入2355270224,则输出是