浙江技術學考vb試題及答案姓名：____________________

一、選擇題（每題2分，共20分）

1.在VisualBasic中，以下哪個不是有效的數(shù)據(jù)類型？

A.Integer

B.String

C.Date

D.Object

2.以下哪個是VB中定義數(shù)組的正確語法？

A.Dim數(shù)組名(下標1To下標2)As數(shù)據(jù)類型

B.Dim數(shù)組名(下標1..下標2)As數(shù)據(jù)類型

C.Dim數(shù)組名(下標1,下標2)As數(shù)據(jù)類型

D.Dim數(shù)組名[下標1To下標2]As數(shù)據(jù)類型

3.在VB中，以下哪個關鍵字用于聲明一個變量？

A.Public

B.Dim

C.As

D.End

4.以下哪個函數(shù)可以返回字符串的長度？

A.Length()

B.StrLen()

C.Len()

D.Lengths()

5.以下哪個函數(shù)可以判斷一個字符串是否為空？

A.IsEmpty()

B.IsEmptyString()

C.IsNull()

D.IsEmptyChar()

6.以下哪個方法可以將一個字符串轉換為大寫？

A.ToUpper()

B.ToUpperCase()

C.Upper()

D.ToUppercase()

7.在VB中，以下哪個是正確的注釋方法？

A.//注釋內容

B./*注釋內容*/

C.'''注釋內容'''

D.'注釋內容

8.在VB中，以下哪個是正確的邏輯運算符？

A.&&

B.|||

C.==>

D.>=>

9.以下哪個是VB中的循環(huán)結構？

A.If-Then

B.For-Next

C.While-Do

D.Select-Case

10.在VB中，以下哪個是正確的條件語句？

A.If(條件)Then

B.If(條件)Else

C.If(條件)ThenElse

D.IfThen(條件)

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

1.在VB中，聲明一個整型變量，使用的關鍵字是____________________。

2.要將字符串轉換為數(shù)字，可以使用____________________函數(shù)。

3.在VB中，字符串的長度可以通過____________________屬性來獲取。

4.以下代碼段創(chuàng)建了一個整型數(shù)組，數(shù)組名為numArray，長度為5，正確的代碼是____________________。

5.以下代碼段輸出字符串"HelloWorld"，正確的代碼是____________________。

6.在VB中，要判斷兩個字符串是否相等，可以使用____________________運算符。

7.在VB中，以下代碼段將變量x賦值為10，正確的代碼是____________________。

8.在VB中，以下代碼段輸出變量x的值，正確的代碼是____________________。

9.在VB中，以下代碼段輸出變量x和y的和，正確的代碼是____________________。

10.在VB中，以下代碼段將變量x的值加1，正確的代碼是____________________。

四、編程題（每題20分，共40分）

1.編寫一個VB程序，該程序包含一個名為“CalculateSum”的函數(shù)，該函數(shù)接收兩個整數(shù)參數(shù)，并返回它們的和。在主程序中，調用該函數(shù)并顯示結果。

```vb

PublicClassForm1

PrivateSubForm1_Load(senderAsObject,eAsEventArgs)HandlesMyBase.Load

'在此處調用CalculateSum函數(shù)并顯示結果

EndSub

'在此處編寫CalculateSum函數(shù)

EndClass

```

2.編寫一個VB程序，該程序包含一個名為“Fibonacci”的函數(shù)，該函數(shù)接收一個整數(shù)參數(shù)n，并返回Fibonacci數(shù)列的第n項。在主程序中，調用該函數(shù)并顯示結果。

```vb

PublicClassForm1

PrivateSubForm1_Load(senderAsObject,eAsEventArgs)HandlesMyBase.Load

'在此處調用Fibonacci函數(shù)并顯示結果

EndSub

'在此處編寫Fibonacci函數(shù)

EndClass

```

五、簡答題（每題10分，共20分）

1.簡述在VB中如何聲明一個全局變量。

2.簡述在VB中如何處理異常。

六、綜合應用題（每題20分，共20分）

編寫一個VB程序，該程序包含一個名為“Student”的類，該類具有屬性“Name”和“Age”。編寫一個名為“MainForm”的主窗體，該窗體包含一個文本框用于輸入學生姓名，一個數(shù)字輸入框用于輸入學生年齡，以及一個按鈕用于創(chuàng)建學生對象并顯示其信息。

```vb

PublicClassStudent

Private_nameAsString

Private_ageAsInteger

PublicPropertyNameAsString

Get

Return_name

EndGet

Set(valueAsString)

_name=value

EndSet

EndProperty

PublicPropertyAgeAsInteger

Get

Return_age

EndGet

Set(valueAsInteger)

_age=value

EndSet

EndProperty

PublicSubNew(nameAsString,ageAsInteger)

_name=name

_age=age

EndSub

PublicSubDisplayInfo()

Console.WriteLine("Name:"&Name&",Age:"&Age)

EndSub

EndClass

PublicClassMainForm

PrivateSubbtnCreateStudent_Click(senderAsObject,eAsEventArgs)HandlesbtnCreateStudent.Click

'在此處創(chuàng)建Student對象并顯示信息

EndSub

EndClass

```

試卷答案如下：

一、選擇題答案及解析：

1.B。在VB中，String是有效的數(shù)據(jù)類型，而Integer、Date和Object也都是有效的數(shù)據(jù)類型，但題目要求選擇“不是”的數(shù)據(jù)類型。

2.A。在VB中，聲明數(shù)組的正確語法是使用Dim關鍵字，并指定下標范圍。

3.B。在VB中，使用Dim關鍵字來聲明變量。

4.C。在VB中，使用Len()函數(shù)可以返回字符串的長度。

5.A。在VB中，使用IsEmpty()函數(shù)可以判斷一個字符串是否為空。

6.B。在VB中，使用ToUpper()函數(shù)可以將字符串轉換為大寫。

7.B。在VB中，使用/*注釋內容*/來注釋代碼。

8.A。在VB中，邏輯運算符&&表示邏輯與。

9.B。在VB中，F(xiàn)or-Next是循環(huán)結構之一。

10.A。在VB中，If(條件)Then是條件語句的正確格式。

二、填空題答案及解析：

1.Dim

2.CInt()或Val()

3.Length

4.DimnumArray(1To5)AsInteger

5.MsgBox("HelloWorld")

6.==

7.x=10

8.MsgBox(x)

9.MsgBox(x+y)

10.x=x+1或x+=1

四、編程題答案及解析：

1.計算Sum函數(shù)代碼如下：

```vb

PublicClassForm1

PrivateSubForm1_Load(senderAsObject,eAsEventArgs)HandlesMyBase.Load

DimsumAsInteger=CalculateSum(5,10)

MsgBox("Thesumis:"&sum)

EndSub

PrivateFunctionCalculateSum(ByValaAsInteger,ByValbAsInteger)AsInteger

Returna+b

EndFunction

EndClass

```

2.Fibonacci函數(shù)代碼如下：

```vb

PublicClassForm1

PrivateSubForm1_Load(senderAsObject,eAsEventArgs)HandlesMyBase.Load

DimnAsInteger=10

DimfibonacciAsInteger=Fibonacci(n)

MsgBox("The"&n&"thFibonaccinumberis:"&fibonacci)

EndSub

PrivateFunctionFibonacci(ByValnAsInteger)AsInteger

Ifn<=1Then

Returnn

Else

ReturnFibonacci(n-1)+Fibonacci(n-2)

EndIf

EndFunction

EndClass

```

五、簡答題答案及解析：

1.在VB中，聲明一個全局變量使用Public關鍵字，例如：Public變量名As數(shù)據(jù)類型。

2.在VB中，處理異常使用Try-Catch語句，例如：

```vb

Try

'可能拋出異常的代碼

CatchexAsException

'異常處理代碼

EndTry

```

六、綜合應用題答案及解析：

```vb

PublicClassStudent

Private_nameAsString

Private_ageAsInteger

PublicPropertyNameAsString

Get

Return_name

EndGet

Set(valueAsString)

_name=value

EndSet

EndProperty

PublicPropertyAgeAsInteger

Get

Return_age

EndGet

Set(valueAsInteger)

_age=value

EndSet

EndProperty

PublicSubNew(nameAsString,ageAsInteger)

_name=name

_age=age

EndSub

PublicSubDisplayInfo()

Console.WriteLine("Name:"&Name&",Age:"&