高二年級VB期末試卷

這張卷子我就不詳細解析了，因為有的題跟第一套題一樣

傳送門：VB（1）期末考試內容

一、單選題（2分×20，共40分）

1、可以在窗體上輸出資料的方法的是 （ A）

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

2、一隻白色的足球被踢進球門，則白色、足球、踢、進球門分別是（ B ）

A、屬性、物件、方法、事件 B、屬性、物件、事件、方法

C、物件、屬性、方法、事件 D、物件、屬性、事件、方法

3、資料：“abcde”是（ C ）資料

A、整型 B、長整型 C、字元型 D、日期型

4、以下各項中，可以作為VB變數名的是（ B ）

A、13 B、 Stu23

5、下列運算子中優先順序最高的是（ C ）

A、Not B、 And C、 ／ D、 Or

6、InputBox函式返回值的型別為（B）

A、數值B、字串C、變體D、數值或字串(視輸入的資料而定)

7、表示式5 <> 2 Or6<7的值是（A）

A、 True B、 False C、 0 D、 1

8、數學式sin30°寫成VB表示式是（ D ）

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

9、決定文字框的文字不能被修改的屬性為（ C ）
A、SelLength B、SelStart C、Locked D、SelText

10、設a、b、c為整型變數，其值分別為1、2、3，以下語句的輸出結果是（A）

　Print a;b;c

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

11、Visual Basic程式中的註釋所使用的字元是（A）

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

12、若要求從文字框中輸入密碼時在文字框中只顯示* 號，則應在此文字框的屬性視窗中設定（D）。

A、Text 屬性值為* B、Caption 屬性值為*

C、Password 屬性值為空D、Passwordchar 屬性值為*

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

A、“XYZ487” B、“XYZ” C、“487” D、型別不匹配

14、如果使用Print方法將資料輸出到窗體上，一般應先使用什麼方法，否則輸出資料不可見。（ D ）

A、PrintB、ClsC、ShowD、Hide

15、在下面四個變數中，單精度變數是（ B ）

A、X$ B、 X! C、 X# D、 X%

16、 使文字框能多行輸入文字應設定它的哪個屬性（ D ）

A、ScrollBars=1 B、ScrollBars=2

C、MultiLine=False D、MultiLine=True

17、為了使標籤中的內容靠右顯示，應將alignment屬性設定為（ B ）

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

18、在程式碼編輯器中，續行符是換行書寫同一個語句的符號，用以表示續行符的是（ A ）

A、 一個空格加一個下劃線“_” B、 一個下劃線“_”

C、 一個連字元 “-” D、 一個空格加一個連字元“-”

19、函式Int(Rnd()*10)的產生值的範圍（ C ）公式：{int（最大值-最小值+1)*rnd+最小值），但是，最小值沒給，rnd公式為乘以最大值減去最小值加一，所以10-1=9，確定最大值減去最小值為9，但是最小值沒給，預設為0.那麼0-？=9呢？也就是最大值為9，也就是0~9

A、 （0，1） B、 [1,10] C、 [0,9] D、 (1,9)

20、要將窗體中的某個命令按鈕設定成無效狀態，應設定命令按鈕的哪個屬性（ C ）

A、 Value B、 Visible C、 Enabled D、 Default

二、填空題（2分×10，共20分）

1、布林型資料只有True和（False）兩個值。

2、關係運算符有>、<、=、<>、（<=）、（>=）6種。

3、Visual Basic 的print方法有兩種輸出格式，分割槽格式和 （緊湊）格式。

4、（msgbox）函式用來顯示一些簡單的資訊如警告或錯誤等訊息。

5、（cls）方法可以清除Form或PictureBox中由Print方法在執行時所生成的文字或圖形。

6、設a=6,b=3,c=5,則表示式Not a>c And c=b OR b<a+c的值為（true）。

7、語句: Text1.setfocus的功能是（使text1獲得焦點）。

8、 函式val(“student12”)的值為（0）。

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

10、表示式INT(100*RND()+8)的最小值是（9）。

三、按要求寫出VB表示式。（3分×5，共15分）

1、 (a-b)÷3

（a-b）/3

2、 1≤X≤5

x>=1 and x<=5

3、

Sqr(abs(a*b-c^3))

4、用VB表示式表示出出生日期（用變數csrq）在1997年1月1日以前出生的

Csrq< #01/01/1997#

5、 a/(b+c/sqr(d))(寫出數學表示式)

四、寫出下列執行結果（3分×5，共15分）

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

110

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

false

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

false

4、 ？ “800”>“1000”

true

5、

x=5

y= -6

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

Print x - y ; y –x x-y=-9-(-6)=-3 y-x=-6-(-9)=3

執行結果：（-3 3）

五、閱讀程式並填空(共10分)

下面是一簡單計算器實現介面。3個標籤（Label1~Label3）的標題分別是運算元1、運算元2、運算元3，3個文字框（text1~text3）可輸入運算元1、運算元2和顯示運算結果，5個命令按鈕（Command1~Command5）的功能分別完成加法、減法、乘法、清除和退出操作。

要求：程式裝載時Label3的背景為紅色、單擊“清除”按鈕時各文字框清空並使得text1獲得焦點。請補充完整。（每空2分，共10分）

（1）建立如圖介面

Private Sub Form_Load()

text1.text= “ ” : text2.text= “ ” : text3.text= “ ”

label3.backcolor=vbred

End Sub


Private Sub Command1_Click()

text3.text=val(text1.text)+val(text2.text)

End Sub


Private Sub Command2_Click()

text3.text=val(text1.text)-val(text2.text)

End Sub


Private Sub Command3_Click()

text3.text=val(text1.text)*val(text2.text)

End Sub


Private Sub Command4_Click()

text1.text= “ ” : text2.text= “ ” : text3.text= “ ”

text1.setfocus

End Sub


Private Sub Command5_Click()

unload me'或者end

End Sub