VB-1(10-11-1)试卷及答案.docVIP

VB-1（10-11-1）试卷 判断题（本大题共12小题，每小题1分，共12分） 使用Dim语句声明了一个之后，还可以使用Reim语句重新声明。ppend打开的一个不存在的文件，则会程序出错。 如果想要让时钟控件每秒钟发生一个Timer事件，其Interval属性应该设置为1 单选题（本大题共20小题，每小题1分，共20分） （A）Enabled （B）Visible （C）BackColor （D）Caption （ ）是算术运算符：（A）Imp （B）Mod （C）Not （D）Like 下列中，（）不属于合法变量名。（A）（B）_1 （C）123 （D） 条件“a不大于b与c之和的平方根”写作 VB 的表达式为（ ）（A）B）aInt(b+c)（C） （D）(Left(Hello,3))的返回值是（ ）（A） （B）hel （C） （D） 下面程序段运行后，输入156，显示的结果是（ ）。x = Val(InputBox(Input:))Select Case x Case Is 0 Print x Case Is 100 Print x – 100 Case Else Print ErrorEnd Select（A） （B） （C） （D）（A）（B）（C）（D） 有表达式200 200，运算的结果是（ ）。（A）400（B）200200（C）出错（D）结果不确定。UCase(s) = A And UCase(s) = Z（B）LCase(s) = A Or LCase(s) = Z（C）s = Asc(A) And s = Asc(Z)（D）UCase(s) = a Or UCase(s) = z 清空文本框Text1中的内容，使用的语句是（ ）。（A）（B）（C）（D）（A）（B）（C）（D）如果希望文件列表框只显示可执行文件，应该修改（）属性。（A）Pattern（B）Filter（C）Path（D）Filename（A）（B）（C）（D）（A）（B）（C）（D）（A）（B）（C）（D）Form1.ForeColor = vbRedForm1.FillColor = vbBlueForm1.FillStyle = 0Form1.Circle (1000, 2000), 500, vbGreen, 0.5, 2.8（A）（B）（C）（D）（A（B）（C）（D）已定义了坐标系统：Form1.Scale (-300, 200)-(300, -200) 要在窗体上画应使用下列哪语句。（A）Form1.Line (-300, 200)-(300, -200)Form1.Line (-300, -200)-(300, 200)（）Form1.Line (-300, 0)- (0, 00)  Form1.Line (0, -200)- (200, 0)（）Form1.Line (, 0)-(300, 200) Form1.Line (-300, -200)-(0, 0)（）Form1.Line (-300, 0)-(300, 0)Form1.Line (0, -200)-(0, 200) 将通用对话框以“对话框”的方式打开，应选择方法。（A）ShowOpen（）Show（）ShowFont（）ShowSave下列叙述中，不正确的是。（A）在过程中用Dim定义的变量是局部变量，其他过程不可以访问它（B）在过程中用Static定义的变量是静态变量，也是局部变量，其他过程不可以访问它（C）在中用Private定义的变量是窗体/模块级变量，可被本模块的任何过程访问，其他模块的过程不可以访问它（D）在“通用声明”段中用定义的变量是全局变量，可被本应用程序的任何过程访问程序填空题（本大题共小题，每空2分，共24分）  Public Sub PrintArray()输出一个右上三角元素（含对角线）为1，其余元素为0 的5×5矩阵Dim a(1 To 5, 1 To 5) As IntegerDim i As Integer, j As IntegerFor i = 1 To 5 For j = 1 To 5 If ________（）________ Then ________（）________ End If Next jNext iFor i = 1 To 5 For j = 1 To 5 Form1.Print ; a(i,