原题

高二年级VB期末试卷

 

一、单选题

1、可以在窗体上输出数据的方法的是 （  ）

   A、Print         B、Cls           C、Show           D、Hide

2、下列说法中错误的是（    ）

A、对象是具有某些特性的具体事物的抽象    B、在VB程序中，窗体（Form）不是对象

C、属性是对象所具有的特征           D、事件是发生在对象上且能被对象识别的动作

3、数据：“abcde”是（      ）数据

A、整型          B、长整型        C、字符型         D、日期型

4、以下各项中，可以作为VB变量名的是（    ）

A、13            B、 Stu23        C、22ab           D、cj98.3

5、以下各项中，不能作为VB变量名的是（    ）

A、A52B          B、if            C、Y_5            D、Pi

6、InputBox函数返回值的类型为（    ）

A、数值          B、字符串        C、变体    D、数值或字符串(视输入的数据而定)

7、表达式5 <> 2 Or 6<7的值是（    ）

A、Ture          B、False         C、－1            D、1

8、数学式sin30°写成VB表达式是（    ）

A、Sin30        B、Sin(30)        C、Sin(30°)      D、Sin(30*3.14/180)

9、决定控件上文字的字体、字形、大小、效果的属性是（       ）
A、Text         B、Caption        C、Name           D、Font

10、设a、b、c为整型变量，其值分别为1、2、3，以下语句的输出结果是（    ）

　Print a;b;c

A.1 2 3            B.2 3 1            C.3 2 1            D.2 3 2

11、Visual Basic程序中的注释所使用的字符是（   ）

A、'               B、:               C、\               D、_

12、若要求从文本框中输入密码时在文本框中只显示 * 号，则应在此文本框的属性窗口中设置（   ）。

A、Text 属性值为 *                 B、Caption 属性值为 *

C、Password 属性值为空             D、Passwordchar 属性值为 *

13、表达式“XYZ” + “487”的值是（   ）

A、“XYZ487”    B、“XYZ”            C、“487”          D、“487XYZ”

14、下面语句中，正确的是（    ）

A、If x<3*y And x>y Then y=x^3     B、If x<3*y And x>y Then y=3x

C、If x<3*y : x>3 Then y=x^3       C、If x<3*y : x>y Then y=x**3

15、下列程序段的执行结果为（    ）

     X=2

     Y=5

     If X*Y<1 Then Y=Y-1 Else Y=-1

     Print Y-X>0

A、Ture          B、False             C、－1            D、1

16、下列关于visual basic特点的描述，哪个是正确的（     ）

A、面向对象      B、可视化         C、事件驱动       D、以上都是

17、为了使标签中的内容靠右显示，应将alignment属性设置为（   ）

A、0             B、1              C、2              D、3

 

二、填空题（2分×9，共18分）

1、布尔型数据只有________和________两个值。

2、关系运算符有>、<、=、<>、________、________ 6种。

3、Visual Basic 的print方法具有           和         双重功能。

4、________________函数显示一个能接收用户输入数据的对话框，并返回用户在对话框中输入的消息。

5、_________方法可以清除Form或PictureBox中由Print方法在运行时所生成的文本或图形。

6、设a=6,b=3,c=5,则表达式Not a>c An c=b OR b<a+c的值为    。

7、假定一个文本框的Name属性为Text1,为了使该文本框获得焦点，应执行的语句是                                    。

8、执行print 9.4\3.7，9.4 MOD3.7 后，输出结果为           。

9、表达式Ucase(Mid(“abcdefgh”,3,4))的值是            。

三、把下列数学表达式改为VB表达式。（4分×3，共12分）

1、3(a-b)

 

2、1≤X≤5

 

3、

 

四、写出下列表达式的值（4分×3，共12分）

1、Abs(-100)+Sqr(100)

 

2、Not 3<=4 And 4 < > 5

 

3、3 ^ 2 - 8 > Abs (99-100)

 

五、阅读程序并填空(共24分)

1、阅读以下程序段，写出运行结果：  (4分)

x = 1 :y=0

x = x + 1

y = y + 1

print  “x=” & Str(x); “y=” & Str(y)

运行结果：________________

2、阅读以下程序段，写出运行结果：  (4分)

  x=5

  y=-6

  If  x>0 Then x = y-3 Else y = x+3

  Print x - y ; y – x

运行结果：________________

3、下列程序可以实现在窗体上由用户任意输入一个整数，程序可以判断该数的奇偶。程序由一个文本框（Textbox）、两个标签（Label）、一个按钮（Command）组成。要求：奇或偶的结果在Label2内显示，请在空格处填入相应的语句，使之完成上述功能。  (6分)

Private Sub Form_Load ( )

  Text1.Text = “”

  Label1.Caption = “请输入一个整数”

  Label2.Caption = “”

  Command1.Caption = “判定”

End Sub

Private Sub Command1_Click( )

  Dim x As Integer

  x = Val(Text1.text)

  If                  Then

 label2.caption=＂该数是偶数＂

  Else

_________        _______

  End If

End Sub

4、阅读下面程序，并写出执行结果。（3分）

x=int(rnd+1) +2

if x^2>8 then y=x^2+1

if x^2=9 then y=x^2-2

if x^2<8 then y=x^3

print y

5、读程序，写结果。（4分）

private sub form_click( )

    x=2

    y=3

    x=y

 print”X=”;X,

 print”y=”;y

   x=x+1

print”X=”;X,

print”y=”;y

end sub

6、读程序，写结果。（3分）

 private sub form_click( )

   const pi as single=3.14

   a%=7

   if a mod 4 > pi then

       print”努力”

   else

      print”学习”

end if

end sub

 

老师给的答案（等我有时间重做一份）

 

 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　高二年级VB期末试卷

一、单选题

1、可以在窗体上输出数据的方法的是 （  ）

   A、Print         B、Cls           C、Show           D、Hide

2、下列说法中错误的是（    ）

A、对象是具有某些特性的具体事物的抽象    B、在VB程序中，窗体（Form）不是对象

C、属性是对象所具有的特征           D、事件是发生在对象上且能被对象识别的动作

3、数据：“abcde”是（      ）数据

A、整型          B、长整型        C、字符型         D、日期型

4、以下各项中，可以作为VB变量名的是（    ）

A、13            B、 Stu23        C、22ab           D、cj98.3

5、以下各项中，不能作为VB变量名的是（    ）

A、A52B          B、if            C、Y_5            D、Pi

6、InputBox函数返回值的类型为（    ）

A、数值          B、字符串        C、变体    D、数值或字符串(视输入的数据而定)

7、表达式5 <> 2 Or 6<7的值是（    ）

A、Ture          B、False         C、－1            D、1

8、数学式sin30°写成VB表达式是（    ）

A、Sin30        B、Sin(30)        C、Sin(30°)      D、Sin(30*3.14/180)

9、决定控件上文字的字体、字形、大小、效果的属性是（       ）
A、Text         B、Caption        C、Name           D、Font

10、设a、b、c为整型变量，其值分别为1、2、3，以下语句的输出结果是（    ）

　Print a;b;c

A.1 2 3            B.2 3 1            C.3 2 1            D.2 3 2

11、Visual Basic程序中的注释所使用的字符是（   ）

A、'               B、:               C、\               D、_

12、若要求从文本框中输入密码时在文本框中只显示 * 号，则应在此文本框的属性窗口中设置（   ）。

A、Text 属性值为 *                 B、Caption 属性值为 *

C、Password 属性值为空             D、Passwordchar 属性值为 *

13、表达式“XYZ” + 487 的值是（   ）

A、“XYZ487”    B、“XYZ”            C、“487”          D、“487XYZ”

14、下面语句中，正确的是（    ）

A、If x<3*y And x>y Then y=x^3     B、If x<3*y And x>y Then y=3x

C、If x<3*y : x>3 Then y=x^3       C、If x<3*y : x>y Then y=x**3

15、下列程序段的执行结果为（    ）

     X=2

     Y=5

     If X*Y<1 Then Y=Y-1 Else Y=-1

     Print Y-X>0

A、Ture          B、False             C、－1            D、1

16、下列关于visual basic特点的描述，哪个是正确的（     ）

A、面向对象      B、可视化         C、事件驱动       D、以上都是

17、为了使标签中的内容靠右显示，应将alignment属性设置为（   ）

A、0             B、1              C、2              D、3

 

二、填空题（2分×9，共18分）

1、布尔型数据只有___true_____和_false_______两个值。

2、关系运算符有>、<、=、<>、___>=_____、_<=_______ 6种。

3、Visual Basic 的print方法具有     输出      和 计算        双重功能。

4、__inputbox()______________函数显示一个能接收用户输入数据的对话框，并返回用户在对话框中输入的消息。

5、___cls______方法可以清除Form或PictureBox中由Print方法在运行时所生成的文本或图形。

6、设a=6,b=3,c=5,则表达式Not a>c And c=b OR b<a+c的值为  true  。

7、假定一个文本框的Name属性为Text1,为了使该文本框获得焦点，应执行的语句是            text1.setfocus                        。

8、执行print 9.4\3.7，9.4 MOD 3.7 后，输出结果为   2    1    。

9、表达式Ucase(Mid(“abcdefgh”,3,4))的值是      CDEF      。

三、把下列数学表达式改为VB表达式。（4分×3，共12分）

1、3(a-b)

3*(a-b)

2、1≤X≤5

x>=1 and x<=5

3、      (x^3+y^3+z^3)/sqr(x+y+z)

   

 

四、写出下列表达式的值（4分×3，共12分）

1、Abs(-100)+Sqr(100)

110

2、Not 3<=4 And 4 < > 5

False

3、3 ^ 2 - 8 > Abs (99-100)

False

五、阅读程序并填空(共24分)

1、阅读以下程序段，写出运行结果：  (4分)

x = 1 :y=0

x = x + 1

y = y + 1

print  “x=” & Str(x); “y=” & Str(y)

运行结果：__x= 2  y= 1______________

2、阅读以下程序段，写出运行结果：  (4分)

  x=5

  y=-6

  If  x>0 Then x = y-3 Else y = x+3

  Print x - y ; y – x

运行结果：___-3  3_____________

3、下列程序可以实现在窗体上由用户任意输入一个整数，程序可以判断该数的奇偶。程序由一个文本框（Textbox）、两个标签（Label）、一个按钮（Command）组成。要求：奇或偶的结果在Label2内显示，请在空格处填入相应的语句，使之完成上述功能。  (6分)

Private Sub Form_Load ( )

  Text1.Text = “”

  Label1.Caption = “请输入一个整数”

  Label2.Caption = “”

  Command1.Caption = “判定”

End Sub

Private Sub Command1_Click( )

  Dim x As Integer

  x = Val(Text1.text)

  If     x mod 2=0             Then   

或x/2=int(x/2)

 label2.caption=＂该数是偶数＂

  Else

____ label2.caption=＂该数是奇数＂_____        _______

  End If

End Sub

4、阅读下面程序，并写出执行结果。（3分）

x=int(rnd+1) +2

if x^2>8 then y=x^2+1

if x^2=9 then y=x^2-2

if x^2<8 then y=x^3

print y   

7

5、读程序，写结果。（4分）

private sub form_click( )

    x=2

    y=3

    x=y

 print”X=”;X     x=3

 print”y=”;y     y=3

   x=x+1

print”X=”;X,    x=4

print”y=”; y    y=3

end sub

6、读程序，写结果。（3分）

 private sub form_click( )

   const pi as single=3.14

   a%=7

   if a mod 4 > pi then

       print”努力”

   else

      print”学习”

end if

end sub

学习