07759Visual Basic程序设计 浙江省13年10月自考 试题.docVIP

浙江省2013年10月高等教育自学考试 Visual Basic程序设计试题 课程代码：07759 一、单项选择题(本大题共10小题，每小题2分，共20分) A.Date( ) B.Time( ) C.IsDate( ) D.Year( ) 2.在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=0 Do Until x=-1 a = InputBox(“请输入A的值”) a = Val(a) b = InputBox(“请输入B的值”) b = Val(b) x = InputBox(“请输入x的值”) x = Val(x) a = a+b+x Loop Print a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为 A.2 B.3 C.14 D.15 3.以下能在窗体Form1的标题栏中显示VisualBasic窗体的语句是 A.Form1.Name=VisualBasic窗体 B.Form1.Title=VisualBasic窗体 C.Form1.Caption=VisualBasic窗体 D.Form1.Text=VisualBasic窗体 4.数学表达式sin25°写成VB表达式是 A.Sin25 B.Sin（25） C.Sin（25°） D.Sin（25*3.14/180） 5.可将新的列表项添加到一个列表框中的方法是 A.Print B.AddItem C.Clear D.RemoveItem 6．下面有关数组的说法中，正确的是 A.数组的维下界不可以是负数 B.模块通用声明有Option Base 1，则模块中数组定义语句Dim A(0 To 5)会与之冲突 C.模块通用声明有Option Base 1，模块中有Dim A(0 T0 5)，则A数组第一维维下界为0 D.模块通用声明有Option Base 1，模块中有Dim A(0 To 5)，则A数组第一维维下界为1 7.要向文件data1.txt添加数据，正确的文件打开命令是 A.Open data1.txt For Output As #1 B.Open data1.txt For Append As #5 C.Open data1.txt For Input As #1 D.Open data1.txt For Write As #5 8.执行指令“Line (1200，1200)-Step(1000，500)，B”后，CurrentX的值是 A.2200 B.1200 C.1000 D.1700 9.在Select Case x结构中，描述判断条件3≤X≤7的测试项应该写成 A.Case 3=X=7 B.Case 3=X，X=7 C.Case 3 To 7 D.Case Is=7，Is=3 10.要使过程调用结束后返回两个结果，下面的过程语句正确的是 A.Sub Proc1(ByVal n，ByVal m) B.Sub Proc1(n，ByVal m) C.Sub Proc1(n，m) D.Sub Proc1((n)，m) 二、判断题（本大题共9小题，每小题1分，共9分） 判断下列各题，在答题纸相应位置正确的涂“A”，错误的涂“B”。 三、程序填空题（本大题共11小题，每小题2分，共22分） Private Sub Command1_Click() Dim a(4, 4) As Integer, b(4) As Integer Dim i As Integer, j As Integer, max As Integer For i = 1 To 4 For j = 1 To 4 a(i, j) = 20 Picture1.Print Right( Str(a(i, j)), 4); Next j Picture1.Print Next i For j = 1 To 4 For i = 1 To 4 b(i) = 21 Next i Next j max = b(1) For i = 2 To 4 If 22 Then