《可视化程序设计Ⅰ》1.在窗体上画一个名称为Drive1的驱动...

奥鹏网院作业

奥鹏东北大学16秋学期《可视化程序设计Ⅰ》在线作业1标准答案
一、单选题：
1.在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。当改变当前驱动器时，目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中，这个事件过程是          (满分:5)
    A. Drive1Change
    B. Drive1Click
    C. Dir1Click
    D. Dir1Change
2.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是          (满分:5)
    A. 工程资源管理器窗口
    B. 工具箱窗口
    C. 代码窗口
    D. 属性窗口
3.在窗体上画一个命令按钮，名称为Command1。程序运行后，如果单击命令按钮，则显示一个输入对话框，在该对话框中输入一个整数，并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数，如果是奇数，过程F1返回1，否则返回0。能够正确实现上述功能的代码是          (满分:5)
    A. ") Private Sub Command1Click(    ) x=InputBox(“请输入整数”) a=F1(Val(x)) Print a End Sub  Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function"
    B. "Private Sub Command1Click(    ) x=InputBox(“请输入整数”) a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1=0 Else F1=1 End If End Function"
    C. "Private Sub Command1Click(    ) x=InputBox(“请输入整数”) F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) Function F1(ByRef b As Integer) If b Mod 2=0 Then F1=1 Else F1=0 End If End Function "
    D. "Private Sub Command1Click(    ) x=InputBox(“请输入整数”) F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function
4.(2)以下叙述中正确的是          (满分:5)
    A. 窗体的Name属性指定窗体的名称，用来标识一个窗体
    B. " 窗体的Name属性的值是显示在窗体标题栏中的文本"
    C. 可以在运行期间改变对象的Name属性的值
    D. "对象的Name属性值可以为空
5.(10)为了把窗体上某个控件变成活动控件，应执行的操作是(    )          (满分:5)
    A. 单击窗体的边框
    B. 单击控件的内部
    C. 双击控件
    D. "双击窗体
6.语句Print 5/4*6\5 Mod 2的输出结果是          (满分:5)
    A. 0
    B. 1
    C. 2
    D. 3
7.一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称md1Func的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程，其定义格式为：Form1中定义的过程：Private Sub frmFunction1(    )……End SubForm2中定义的过程Public Sub frmFunction2(    )……End SubmdlFunc中定义的过程：Public Sub md1Function(    )……End Sub在调用上述过程的程序中，如果不指明窗体或模块的名称，则以          (满分:5)
    A. 上述三个过程都可以在工程中的任何窗体或模块中被调用
    B. frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
    C. 上述三个过程都只能在各自被定义的模块中调用
    D. 只有md1Function过程能够被工程中各个窗体或模块调用
8.假定窗体上有一个Text1文本框，为使它的文本内容位于中间并且没有边框，则正确的属性设置为          (满分:5)
    A. Text1.Alignment=1
9.关于Line语句正确的说法是          (满分:5)
     Text1.BorderStyle=0
    B. Text1.Alignment=2
10.当利用Line方法进行添加图时，以下正确的说法是(    )          (满分:5)
     Text1.BorderStyle=1
    C. Text1.Alignment=1
11.表达式4+5 \ 6 * 7 / 8 Mod 9 的值是          (满分:5)
     Text1.BorderStyle=1
    D. Text1.Alignment=2
12.有窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程:Private Sub Command1Click(    )s=0For i=1 To 15x=2*i-1If x Mod 3=0 Then s=s+1Next iLabel1.Caption=sEnd Sub程序运行后，单击命令按钮，则标签中显示的内容是          (满分:5)
     Text1.BorderStyle=0
13.inputBox函数反回值的类型为          (满分:5)
    A. Line只能绘制直线
    B. Line可以绘制矩形，但是不可以设置填充色
    C. Line在绘制矩形，填充色由FillColor属性决定
    D. Line在绘制矩形，填充色由forecolor属性决定
14.在列表框中当前被选中的列表项的序号是由下列哪个属性表示(    )          (满分:5)
    A. 有7种不同的线型，而且不管线宽多少都可以绘制虚线/点划线/点线
    B. "使用Line(100
    100)-(1000
    1200)和Line(100
    100)-Step(900
    1100)将绘制两条相同位置的直线 "
    C. "可利用Line方法添加矩形，如Line(300
    300)-(2000
    2000)
    BF "
    D. "可利用Line方法添加矩形，如Line(300
    300)-(2300
    2300)
    B+F "
15.software and hardwarB) softwareC) hardwareD) 1(26)执行如下语句a=InputBox("Today","Tomorrow","Yesterday",,,"Day before yesterday",5)将显示一个输入对话框，在对话框的输入区中显示的信息是          (满分:5)
    A. 4
    B. 5
    C.
    D. 7
16.在窗体上面画一个命令按钮，然后编写如下事件过程：Option Base 1Private Sub CommandlClick(    )Dim aa = Array(1,2,3,4)j = 1For i = 4 To Step -1s = s + a(i)*jj =j*10Next iPrint sEnd Sub运行上面的程序，单击命令按钮，其输出结果是          (满分:5)
    A. 1
    B. 5
    C. 27
    D. 45
17.假定有如下的Sub过程：Sub S（x As Single,y As Single）t = xx =t/y y =t Mod yEnd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub CommandlClick(    )Dim a As SingleDim b As Singlea =5b =4S a,b Print a,bEnd Sub程序运行后，单击命令按钮，输出结果为          (满分:5)
    A. 数值
    B. 字符串
    C. 变体
    D. 数值或字符串（视输入的数据而定）
18.在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1Click(    )For i=1 To 4x=4For j =1 To 3x=3For k=1 To 2x=x+6Next kNext jNext iPrint xEnd Sub程序运行后，单击命令按钮，输出结果是          (满分:5)
    A.
    B. Index
    C. ListIndex
    D. TabIndex
19.有如下语句：Open “f1.dat” For Random As #1 Len =15，表示文件f1.dat每个记录的长度等于(    )          (满分:5)
    A. Today
    B. Tomorrow
    C. Yesterday
    D. Day before Yesterday
20.(8)下列不能打开属性窗口的操作是(    )          (满分:5)
    A. 4321
    B. 12
    C. 34
    D. 1234