Visual Basic本科样卷一、 单项选择题（请将答案写到题后的括号内，每小题2分，共30分）。1. 下面4个选项，不是窗体属性的是（ ）A. minbutton B. borderstyle C. load D. caption2. 下列选项中合法的visual basic标识符是（ ）A. DoWhile B.Const C.8a D.a#x3. 表达式2*32+2*8/4+32的值是（ ）。A64 B31 C49 D424. 要退出ForNext循环，可使用的语句是( )。AExit BExit Do C Exit For D End Do5. 已知a=3,b=4,c=5,表达式ab and not ca or cb and c10 C.Case Is10 and Is109.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（） x=InputBox（请输入整数） Select Case x Case 1，3 Print 分支 1 Case Is 4 Print 分支 2 Case Else Print Else 分支 End SelectEnd Sub程序运行后,如果在输入对话框中输入2,则窗体上显示的是( )A.分支1 B.分支2 C. Else分支 D. 程序出错10. 下述程序的运行结果是( )。 j = 0Do While j30 j = （j+1）*（j+2） k=k+1LoopPrint k; jA.0 1 B.3 182 C. 30 30 D. 4 3011. 以下叙述中正确的是（ ）A一个Sub过程至少要一个Exit Sub语句B. 一个Sub过程至少要一个End Sub语句C可以在Sub过程中定义一个Function过程，但不能定义Sub过程 D. 调用一个Function过程可以获得多个返回值12. 当一个单选按钮被选中时，它的value属性的值是( )。A.1 B.0 C.True D.False13. 执行语句Dim X, Y As Integer后（ ）A. X和Y均被定义为整型变量B. X和Y均被定义为变体类型变量C. X被定义为整型变量，Y被定义为变体类型变量D. X被定义为变体类型变量，Y被定义为整型变量14.若要删除窗体上的文字信息，要采用下列哪个方法（ ）。 A.clear B.clean C.cls D.remove15. 以下语句用来定义过程subP其中正确的是（ ）ADim Sub subP(x,y) B. Public subP(x,y)CPrivate Sub subP(x,y) As integer D. Sub subP(x,y)二、 填空题（请将答案写在题中的横线上，每空2分，共20分）。1. VB提供了结构化程序设计的三种基本结构，分别是顺序结构、_和循环结构。2. 表达式5mod3+523的值为_。3. MsgBox()函数的返回值类型为_。4.Print Spc(20);”Hello”语句表示在窗体的第_列输出字符串”Hello”。5.若要将图片框中加载的图片删除，可以使用语句_。6.Dim A(1 To 4)定义的数组包含的元素的个数是_。7.定义数组时，若希望下标从1开始，可以在模块的通用部分使用_语句将其设为1。8使用代码向VB6.0列表框添加项目，使用的方法是_ 。9. 为了通过传值方式来传送过程参数，应使用的关键字为_。10假定程序中有以下语句：answer=InputBox(“hello”,”world”,”good”,30),执行该语句后，将显示一个信息框，此时如果单击确定按钮，则answer的值为_。三、简答题（请将答案写在题后的空白处，每题5分，共20分）。1. 简述创建Visual Basic应用程序的基本步骤。2. 图片框和图像框有什么区别？3. 简述动态数组的定义步骤。4. Visual Basic中常用的键盘事件有哪些？分别在何时触发？四、 读程序写结果（请将答案写在题中的横线上，第1小题3分，第2小题3分，第3小题4分，共10分）。1. 在窗体上放置一个名称为command1的命令按钮和一个名称为text1的文本框，并编写如下事件代码Private Sub Command1_Click() Dim j As Integer j = 5 Call proc(j)End SubPrivate Sub proc(n As Integer) k = 1 For i = 1 To n Step 1 k = k * i Next i Text1.Text = kEnd Sub当单击该命令按钮时，文本框中显示的内容为_。2. 有如下事件代码：Private Sub Form_Click() Dim A(1 To 3) As String Dim c As Integer Dim j As Integer A(1) = 4 A(2) = 8 A(3) = 12 c = 1 For j = 1 To 3 c = c + Val(A(j) Next j Print cEnd Sub当单击窗体后程序运行时，窗体Form1上显示的结果为_。3. 下面程序运行后的输出结果是_。x = “a”y = “b”z = “c”For i = 1 to 2x = y y = zz = xNext iPrint x + y + z五、 编程题（请将代码写在题后的空白处，每题10分，共20分）。1.在窗体上放置两个文本框，名称分别为txtX和txtY，再放置一个按钮（cmdCal），在第一个文本框txtX中输入一个数值x，当单击按钮时，按以下公式计算出y值，并将计算结果显示在文本框txtY中。2. 在窗体上放置一个按钮（名称为cmdCnt），单击该按钮时，通过InputBox函数输入若干个字符，以？结束，分别统计其中字母、数字和其他字符的个数，将结果以以下格式输出：“字母个数为：m，数字个数为：n，其他字符个数为：p”（其中m,n,p分别为具体数值）。本科样卷参考答案及评分标准 一、单项选择题1-5 CABCA6-10 DACCC11-15 BCDCD评分标准：每小题2分，共30分，选错或不选均不给分。二、填空题1选择结构2103整型或（Integer型）4215LoadPicture(“”)647Option Base 18addItem9ByVal10good评分标准：每小题2分，共20分，写错或不写均不给分。三、简答题1. 创建VB应用程序可分为以下四个步骤：（1）在窗体上建立对象；（1分）（2）设置对象的属性；（1分）（3）编写对象事件过程；（1分）（4）保存和运行程序。（2分）2. 2图像框和图片框的区别如下：（1）图片框是容器控件，而图像框不能作为容器；（1分）（2）图片框可以通过Print方法显示文本，图像框则不能；（1分）（3）图像框比图片框占用内存少，显示速度快；（1分）（4）在图片的自适应问题上，图片框用AutoSize属性控制图片框的尺寸自动适应图片的大小，而图像框用Stretch属性对图片进行大小调整。（2分）3. 动态数组的定义通常分两步完成：（1）在窗体、标准模块和过程中用Dim或Public声明一个没有下标的数组（括号不能省略）；（2分）（2）数组重定义。在过程中需要使用该数组前，用Redim语句定义数组大小，下标可为常量、变量或表达式，但变量或表达式必须有值。（3分）4常用键盘事件过程有三个（1分），分别为：KeyPress事件：用户按下并释放一个能产生ASC码的键时被触发。（2分）KeyUp事件：用户释放任一键时被触发。（1分）KeyDown事件：用户按下任意键时被触发。（1分）评分标准：每小题5分，共20分，请按参考答案中给出的要点给分，若回答不准确或不完整，可酌情扣分。四、读程序写结果11202253cbc评分标准：第1小题3分，第2小题3分，第3小题4分，共10分，写错或不写均不得分。五、编程题1Private Sub cmdCal_click() （1分） Dim x as double,y as double x=val(txtX.Text) （1分） if x=0 and x2 then （1分）y=x （1分） elseif x6 then （1分）y=x*x+1 （1分） elseif x10 then （1分）y=sqr(x+1) （1分） else y=1/(x*x+1) （1分）end if txtY.text