| 
 | 
 
19春《VB程序设计》在线作业3 
1.[单选题]代码Command1.Caption=”退出”,其中Command1是(   ),Caption是(   ),“退出”是(   )。请选择一个正确答案(   )。 
奥鹏19春在线答案 
奥鹏电子科技大学 
    A.方法,事件,属性 
    B.对象,属性,值 
    C.对象,方法,值 
    D.方法,对象,值 
    正确答案:——B—— 
2.[单选题]以下叙述中正确的是(   )。 
    A.窗体的Name属性指定窗体的名称,用来标识一个窗体 
    B.窗体的Name属性的值是显示在窗体标题栏中的文本 
    C.可以在运行期间改变对象的Name属性的值 
    D.对象的Name属性值可以为空 
    正确答案:——A—— 
3.[单选题]为了把一个记录型变量的内容写入文件中指定的位置,要使用语句(   )。 
    A.Get文件号,记录号,变量名 
    B.Get文件号,变量名,记录号 
    C.Put文件号,变量名,记录号 
    D.Put文件号,记录号,变量名 
    正确答案:——D—— 
4.[单选题]在Visual Basic6.0中,改变控制的位置可以通过设置(   )属性来实现。 
    A.Left和Top 
    B.Width和Height 
    C.Left和Height 
    D.Width和Top 
    正确答案:———— 
5.[单选题]使文本框获得焦点的方法是(   )。 
    A.GotFocus 
    B.Change 
    C.ListFocus 
    D.SetFocus 
    正确答案:———— 
6.[单选题]在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: 
Private Sub Command1_Click() 
Dim array1(10,10) As Integer 
Dim I, j As Integer 
For I=1 To 3 
For j=2 To 4 
array1(I, j)=I+j 
Next j  
Next I 
Text1.Text=array1(2,3)+array1(3,4) 
End  Sub 
程序运行后,单击命令按钮,在文本框中显示的值是(   )。 
    A.12 
    B.13 
    C.14    奥鹏答案 
奥鹏电子科技大学 
    D.15 
    正确答案:———— 
7.[单选题]下列哪种说法正确的是(   )。 
    A.通用对话框是Visual Basic 6.0的内部标准控件 
    B.要使用CommonDialog控件,必须在“工程”菜单下的“部件”对话框中选定“Microsoft Common Dialog Control 6.0” 
    C.打开“部件”对话框只有一种方法 
    D.程序运行过程中,通用对话框在窗体中是可见的 
    正确答案:———— 
8.[单选题]在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程: 
Private Sub Command1_Click() 
n = Text1.Text 
Select  Case n 
Case 1 To 20 
x = 10 
Case 2,4,6 
x = 20 
Case Is<10 
x = 30 
Case 10 
x = 40 
End Select 
Text2.Text = x 
End  Sub 
程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是(   )。 
    A.10 
    B.20 
    C.30 
    D.40 
    正确答案:———— 
9.[单选题]Sub过程与Function函数的最根本区别是(   )。 
    A.Function过程可以有参数,而Sub过程不可以 
    B.两种过程参数的传递方式不同 
    C.Sub过程无返回值,但Function过程有返回值 
    D.Sub过程是语句级调用,可以使用Call或直接使用过程名,但Function过程是在表达式中调用 
    正确答案:———— 
10.[单选题]下列哪个属性设置文本框中文字的对齐方式(   )。 
    A.SelLength 
    B.Alignment 
    C.Multiline 
    D.ScrollBars 
    正确答案:———— 
11.[单选题]定义一个常量PI,可以使用下列语句中的(   )。 
    A..PI=3.14159 
    B.Set PI = 3.14159 
    C.Const PI = 3.14159 
    D.Const PI 
    正确答案:———— 
12.[单选题]以下关于焦点的叙述中,错误的是(   )。 
    A.如果文本框的TabStop属性为False,则不能接收从键盘输入的数据 
    B.当文本框失去焦点时,触发LostFocus事件 
    C.当文本框的Enabled属性为False时,其Tab顺序不起作用 
    D.可以用TabIndex属性改变Tab顺序 
    正确答案:———— 
13.[单选题]设在菜单编辑器中定义了一个菜单项,名为Menu1,为了在运行时隐藏该菜单项应使用的语句是(   )。 
    A.Menu1.Enabled=True 
    B.Menu1.Enabled=False 
    C.Menu1.Visible=True 
    D.Menu1.Visible=False 
    正确答案:———— 
14.[单选题]执行语句:Open "Tel.dat" For Random As #1 Len=50后,对文件Tel.dat中的数据能够执行的操作是(   )。 
    A.只能写,不能读 
    B.只能读,不能写 
    C.既可以读,也可以写 
    D.不能读,不能写 
    正确答案:———— 
15.[单选题]下列属性中哪个不是图片框的属性(   )。 
    A.Align 
    B.Picture 
    C.Stretch 
    D.AutoRedraw 
    正确答案:———— 
16.[单选题]设有语句:x=InputBox("输入数值","0","示例") 
程序运行后,如果从键盘上输入数值10并按回车键,则下列叙述中正确的是(   )。 
    A.变量x的值是数值10 
    B.在inputbox对话框标题栏中显示的是“示例” 
    C.0是默认值 
    D.变量x的值是字符串“10” 
    正确答案:———— 
17.[单选题]窗体上有一组合框Combol,窗体加载时的代码如下: 
  Private Sub Form_Load() 
      Combol. AddItem“电视机” 
      Combol. AddItem“录像机” 
      Combol. AddItem“VCD” 
      Combol. AddItem“组合音响” 
  End Sub 
  要在文本框Textl中显示列表中的第三个项目,则正确的语句的是(   )。 
    A.Textl.Text=Combol.List(0) 
    B.Textl.Text=Combol.List(1) 
    C.Textl.Text=Combol.List(2) 
    D.Textl.Text=Combol.List(3) 
    正确答案:———— 
18.[单选题]用下面语句定义的数组,其元素个数是(   )。 
Dim A (-3 To 5) As Integer 
    A.6 
    B.7 
    C.8 
    D.9 
    正确答案:———— 
19.[单选题]在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: 
Private Sub Command1_Click() 
Dim num As Integer 
num = 1 
Do Until num > 6 
Print num; 
num = num + 2.4 
Loop 
End  Sub 
程序运行后,单击命令按钮,则窗体上显示的内容是(   )。 
    A.1 3.4 5.8 
    B.1 3 5 
    C.1 4 7 
    D.无数据输出 
    正确答案:———— 
20.[单选题]在窗体中添加一个命令按钮,然后编写如下程序: 
Private Sub Command1_Click() 
Dim a As Integer, b As Integer 
a=InputBox("Enter the Firstinteger") 
b=InputBox("Enter the Secondinteger") 
Print b+a 
End  Sub 
程序运行后,单击命令按钮,先后在两个输入框中分别输入123和123,则输出结果是(   )。 
    A.246 
    B.123 
    C.456 
    D.123123 
    正确答案:———— 
奥鹏作业答案 
奥鹏电子科技大学 
 |   
 
 
 
 |