单选题在窗体上画一个名称为Text1的文本框,并编写如下程序: Private Sub Form_Load() Show Text1.Text=" Text1.SetFocus End Sub Phvate Sub Form_MouseUp(Buuon As Integer,Shift As Integer,X As Single,Y As Single) Phnt“程序设计” End Sub Private Sub Textl_KeyDown(KeyCode As Integer,Shift As Integer) Print"Visual Basic": End Sub 程序运行后,如果按“A”键,然后单击窗体,则在窗体上显示的内容是( )。
单选题在下面各关系中,当X取小数或负数时都能成立的式子是( )。
单选题下列叙述中正确的是( ) A.软件测试应该由程序开发者来完成 B.程序经凋试后一般不需要再测试 C.软件维护只包括对程序代码的维护 D.以上三种说法都不对
单选题下列关于菜单项的说法中,正确的是( )。
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base1 Private Sub Command1_Click( ) Dim a As Variant a=Array(1,2,3,4,5) Sum=0 For i=1To 5 Sum=Sum+a(i) Next i x=Sum/5 For i=1 To 5 If a(i)>x Then Print a(i); Next i End Sub程序运行后,单击命令按钮,在窗体上显示的内容是
单选题在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下代码: Sub s(x As Integer, y As Integer) Static z As Integer y=x*x+z z=y End Sub Private Sub Command1 Click() Dim i As Integer, z As Integer m=0 z=0 For i=1 To 3 S i, Z m=m+z Next i Labell. Caption=Str(m) End Sub 程序运行后,单击命令按钮,在标签中显示的内容是( )。 A) 50 B) 20 C) 14 D) 7
单选题设有如下声明语句 Option Base1 Dim arr(2,-1 To 5)As Integer 则数组arr中数组元素的个数是
单选题设窗体上有2个文本框Text1和Text2,并有下面的事件过程: Dim n Private Sub Text1_KeyPress(KeyAscii As Integer) If"A"<=Chr(KeyAscii)And Chr(KeyAscii)<="Z"Then n=n+1 End If IfKeyAscii=13 Then Text2.Text=n End Sub 程序运行时,在文本框Text1中输入“Visual Basic 6.0”并按回车键后,在文本框Text2中显示的是
单选题下列程序段的执行结果为( )。 I=9 x=5 Do I=I+1 x=x+2 Loop Until I>=7 Print "I=";I; Print "x=";x
单选题下面不属于软件需求分析阶段主要工作的是
单选题在一个工程的窗体中有如下代码:
Public x As Integer
Private Sub Form_Load()
Dim y As Integer
End Sub
在该工程的标准模块的声明部分有如下代码:
Public a As Integer
Private b As Integer
关于上述代码,以下叙述中错误的是______。
单选题DblClick事件是指什么时候触发的基本事件( )
单选题有如下程序: Private Sub Form Click() Dim s As Integer,p As Integer p=1 For i=1 To 4 For i=1 To i s=s+j Next j p=p*s Next i Print p End Sub 程序运行后,单击窗体,则输出结果是
单选题组合框控件是将( )组合成一个控件。
单选题以下关于VB的叙述中,错误的是______。
A.VB采用事件驱动方式运行
B.VB既能以解释方式运行,也能以编译方式运行
C.VB程序代码中,过程的书写顺序与执行顺序无关
D.VB中一个对象对应一个事件
单选题某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Command1_Click() Dim a(10)As Integer,max As Integer For k=1 To 10 a(k)=InputBox("输入一个整数") Next k max=0 For k=1 To 10 Ifa(k)>max Then max=a(k) End If Next k Print max End Sub 运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改。下面的修改中可以得到正确运行结果的是
单选题在菜单编辑器中建立一个名称为Menu()的菜单项,将其"可见"属性设置为False,并建立若干子菜单,然后编写如下过程: Private Sub Form_MouseDown(Button As Integer, Shift As Integer,X As Single,Y As Single) If Button=1 Then PopupMenu Menu() End If End Sub 则以下叙述中错误的是______。 A) 该过程的作用是弹出一个菜单 B) 右击时弹出菜单 C) Menu()是在菜单编辑器中定义的弹出菜单的名称D) 参数X、Y指明鼠标当前位置的坐标
单选题表达式Int(-15.8)+Fix(-15.8)+Int(15.8)+Fix(15.8)的运算结果是( )。
单选题函数过程F1的功能是:如果参数a为奇数,则返回值为1,否则返回值为0。以下能正确实现所述功能的代码的是( )。
单选题在Visual Basic工程中,可以作为“启动对象”的程序是______。
