VB语言程序设计_在线作业_3.docx

b b VB语言程序设计_在线作业_3 一、单选题?(?每题5分,?共20道小题,?总分值100分?) 1. 通过设置Line控件的什么属性，可以绘制虚线、点划线等多种样式的直线（??D??）。 (5分) A.?Style B.?DrawStyle C.?FillStyle D.?BorderStyle 是否存疑 2. 在窗体上画两个单选按钮，名称分别为Option1和Option2，标题分别为“宋体”和“黑体”；一个复选框，名称为Check1，标题为“粗体”；一个文本框，名称为Text1，Text属性为“改变文字字体”。要求程序运行时，“宋体”单选按钮和“粗体”复选框被选中，则能够实现上述要求的语句序列是（??C??）。 (5分) A.?Option1.Value = True ?? Check1.Value = False B.?Option1.Value = True Check1.Value = True C.?Option1.Value = True Check1.Value = 1 D.?Option2.Value = False Check1.Value = True 是否存疑 3. 下列可以把当前目录下的图形文件pic1.jpg装入图片框Picture1中的语句为（??A??）。 (5分) A.?Picture1. Picture = LoadPicture(pic1.jpg) B.?Picture.Handle = pic1.jpg C.?Picture = LoadPicture(pic1.jpg) D.?Picture = pic1.jpg 是否存疑 4. 设a = 2，b = 3，c = 4，d = 5，下列表达式Not a = c Or 4 * c = b ^ 2 And b a + c的值是（??D??）。?? (5分) A.?1 B.?True C.?-1 D.?False 是否存疑 5. 假定有以下循环结构 Do Until?条件 ???????循环体 Loop 则正确的描述是（???C?）。 (5分) A.?如果“条件”是一个不为0的常数，则至少执行一次循环体 B.?不论“条件”是否为“真”，至少要执行一次循环体 C.?如果“条件”是一个为0的常数，则无限次执行循环体 D.?如果“条件”是一个为0的常数，则一次循环体也不执行 是否存疑 6. 确定一个控件在窗体上的位置的属性是（??D??）。?? (5分) A.?Width和Height B.?Width或Height C.?Top或Left D.?Top和Left 是否存疑 7. 在窗体上画两个名称分别为Label1和Label2的标签，然后编写如下事件过程： Private Sub Form_Click() ????x = -5: s = -5 ????Select Case s ????????Case Is 0 ????????????y = x + 1 ????????Case Is = 0 ????????????y = x + 2 ????????Case Else ????????????y = x + 3 ????End Select ????Label1.Caption = x ????Label2.Caption = y End Sub 程序运行后，单击窗体，标签Label1和Label2中显示的内容分别是（??D??）。 (5分) A.?-5和-4 B.?-5和-3 C.?-5和-5 D.?-5和-2 是否存疑 8. 以下程序段的输出结果是（?B???）。 ????a = Sqr(3) ????b = Sqr(2) ????c = a b ????Print c (5分) A.?-1 B.?True C.?False D.?0 是否存疑 9. 阅读下面的程序： Function F(a As Integer) ????Static c ????b = 0 ????b = b + 1 ????c = c + 1 ????F = a + b + c End Function Private Sub Command1_Click() ????Dim a As Integer ????a = 2 ????For i = 1 To 3 ????????Print F(a) ????Next i End Sub 运行上面的程序，单击命令按钮，输出结果为（??C??）。 (5分) A.?4 6 8 B.?4 4 4 C.?4 5 6 D.?4 7 9 是否存疑 10. 对一个磁盘上的顺序文件进行读操作，打开方式为（??C??）。 (5分) A.?Random B.?Output C.?Input D.?Append 是否存疑 1