高級(jí)語(yǔ)言程序設(shè)計(jì)(VB)(模擬試題及答案).doc

高級(jí)語(yǔ)言程序設(shè)計(jì)VB（模擬試題）答案在后面顯示模擬試題一、 判斷題(如正確打，否則，打)1控制臺(tái)應(yīng)用程序至少有一個(gè)Main過(guò)程。2. 學(xué)校$ 是正確的變量名。3. 把a(bǔ), b之中的最大值存放于max，使用的語(yǔ)句為:If ab Then max=a Else max=b End If4判別ch是否為小寫(xiě)字母，若是，輸出“yes”；否則，輸出“No”的塊結(jié)構(gòu)條件語(yǔ)句為If Asc(ch)=97 And Asc(ch)=122 ThenWriteLine (“Yes”)ElseWriteLine(“No”)End If5. 輸入結(jié)構(gòu)變量的值就是輸入該變量的各個(gè)元素的值。6.若某個(gè)模塊中以關(guān)鍵字public定義子過(guò)程，則只能在該模塊中可以調(diào)用該過(guò)程。7. 事件是由VB.Net系統(tǒng)預(yù)先設(shè)置好或者在程序中由編程者自己設(shè)計(jì)的，它能夠被對(duì)象識(shí)別的動(dòng)作。8.在程序中能像調(diào)用普通函數(shù)那樣顯式調(diào)用構(gòu)造函數(shù)。9在程序運(yùn)行期間，用戶可以用文本框顯示信息。10.從文件取出一組數(shù)據(jù)以流的方式存放到程序中的變量或數(shù)組中稱為向流寫(xiě)入數(shù)據(jù)。二、單項(xiàng)選擇題1VB.NET是一種( )程序設(shè)計(jì)語(yǔ)言。A. 面向事件 B. 面向?qū)傩?C. 面向?qū)ο?D. 面向過(guò)程2. 執(zhí)行目標(biāo)程序時(shí)出現(xiàn)的錯(cuò)誤稱為( ) 錯(cuò)誤。 A. 語(yǔ)法或編譯 B. 運(yùn)行 C. 邏輯 D. 計(jì)算3. 單精度浮點(diǎn)型數(shù)據(jù)占用( )個(gè)存儲(chǔ)字節(jié)。A. 1 B. 2 C. 4 D. 84下列選項(xiàng)中，把r定義為雙精度型變量的是（ ）。A. r% B. r! C. r# D. r$5100% 表示100為（ ）型數(shù)據(jù)。A. 整 B. 單精度浮點(diǎn) C. 貨幣 D. 字符6設(shè)X為整型變量,不能正確表達(dá)1 X 5的邏輯表達(dá)式是( )。A. 1 X 5 B. X=2 or X=3 or X=4C. 1X And X 5 D. Not (X=5)7. 下列程序段的執(zhí)行后顯示的結(jié)果是( )。 X=10 :Y=3 WriteLine(0 ，(x*y)/5)A. 10 B. 3 C. 5 D. 68執(zhí)行下面語(yǔ)句后，輸出結(jié)果為( )。 A=10 : B=30 : C=20 WriteLine(012，A，B，C)A. 0、1和2 B. 10、20和30 C. 20、10和30 D. 10、30和209執(zhí)行下面語(yǔ)句后，輸出結(jié)果為( )。 A=10:B=30 If AB Then WriteLine(01，A，B)A. 10 B. 30 C. 10和30 D. 30和1010下列程序段執(zhí)行后窗體上顯示（ ）。i = 0While i = 2i = i + 1End WhileWrite(i)A. 0 B. 1 C. 2 D. 311. 運(yùn)行如下程序段后，x的值是（ ）。 x=2 For i=1 to 8 step 2 x=x+i next iA. 2 B. 18 C. 27 D. 3812 在Sub過(guò)程體內(nèi)可以用( )語(yǔ)句強(qiáng)制退出Sub過(guò)程的執(zhí)行。 A. Exit DoB. Exit For C. Exit Function D. Exit Sub13下列一維數(shù)組說(shuō)明語(yǔ)句正確的是（ ）。A. Dim b(2) AS Integer =1,2,3B. Dim b(0 To 2) AS Integer=1,2,3C. Dim b( ) AS Integer=1,2,3D. Dim b(2) AS String =one, two, Three14設(shè)有數(shù)組說(shuō)明語(yǔ)句：Dim c( 10) AS Integer，則下面表示數(shù)組c的元素選項(xiàng)中（）是錯(cuò)誤的。A. c(i-1) B. c(5+0.5) C. c(0) D. c(11)15設(shè)有數(shù)組說(shuō)明語(yǔ)句：Dima（3，3），則數(shù)組a中包含元素的個(gè)數(shù)是（ ）。A. 3 B. 6 C. 9 D. 1616以關(guān)鍵字Function定義的過(guò)程是（ ）。 A. 子過(guò)程 B. 函數(shù)過(guò)程 C. 屬性過(guò)程 D. 事件過(guò)程17在過(guò)程的形式參數(shù)前面加上關(guān)鍵字（ ），則該參數(shù)說(shuō)明為傳值參數(shù)。 A. Val B. ref C. Byref D. ByVal18設(shè)已定義Sub過(guò)程p，有3個(gè)數(shù)值型傳值參數(shù)；設(shè)a為實(shí)型變量，調(diào)用該Sub過(guò)程的錯(cuò)誤語(yǔ)句為（ ）。A. p(c,b,a) B. call p 0.5, a, 100C. call p( 0.5, cos(0.1), a+10 ) D. p( 0.5, 1.2, 100 )19在類定義的外部，可以被訪問(wèn)的成員有( )。A. 所有類成員 B. private或protected的類成員C. public的類成員 D. public或private的類成員20當(dāng)鼠標(biāo)在窗體上移動(dòng)時(shí)，會(huì)發(fā)生（ ）事件。A. MouseDown B. MouseUpC. MouseMove D. KeyDown三、簡(jiǎn)答題1. 程序設(shè)計(jì)語(yǔ)言的語(yǔ)句按功能可以分成哪幾類語(yǔ)句?它們的作用是什么？2若有數(shù)組定義語(yǔ)句：Dim c%() = 76, 80, 75，則數(shù)組c有多少個(gè)元素？這些元素是什么？它們的初值是多少？3.什么是文件？文件操作可以分為哪些步驟?四、程序閱讀題1寫(xiě)出執(zhí)行下列程序的輸出結(jié)果。Imports System.ConsoleModule Module1 Sub Main() Dim i%, y! y = 1 : i = 1 Do While i 6 y = y * i - 1 i = i + 2 WriteLine(y=0, y) Loop End SubEnd Module2. 寫(xiě)出執(zhí)行下列程序的輸出結(jié)果。Imports System.ConsoleModule Module1 Sub Main() Dim f(5) As Integer, i As Integer f(0) = 0 : f(1) = 1 For i = 2 To 5 f(i) = 2 * f(i - 2) + 4 * f(i - 1) Next i For i = 0 To 5 If i Mod 2 = 0 Then WriteLine() Write(0 , f(i) Next i WriteLine() End SubEnd Module3寫(xiě)出執(zhí)行下列程序的輸出結(jié)果。Imports System.ConsoleModule Module1 Sub Main() Dim m%, n%, p%, s# s = f(5) WriteLine(s=0 , s) End Sub Private Function f(ByVal x%) As Long Dim i As Integer, t As Long t = 1 For i = 1 To x t = t * i Next i Return t End FunctionEnd Module五、程序填空題1. 下面程序代碼的功能是：求的值，在橫線上填上適當(dāng)內(nèi)容。 Imports System.ConsoleModule Module1 Sub Main() Dim i, n%, s! Write(n=) n = ReadLine() i = 1 : s =(1) While (2) s = s + (3) i = i + 1 End While WriteLine(s=0,(4) End SubEnd Module2下面程序代碼的功能是：從鍵盤(pán)上輸入x，y和z的值，按如下公式求f (x，y，z)的值的程序，在橫線上填上適當(dāng)內(nèi)容。f(x,y,z)=sin(x)/(sin(x-y)*sin(x-z)+sin(y)/(sin(y-z)*sin(y-x)+sin(z)/(sin(z-x)*sin(z-y)其中x、y和z互不相等。Imports System.ConsoleImports System. (5)Module Module1 Sub Main() Dim x!, y!, z!, s! Write(x=) : x = ReadLine() Write(y=) :(6)= ReadLine() Write(z=) : z = ReadLine() If xy And yz And (7)Then s = f(x, x-y, x-z) + f(y, y-z, y-x) + f(z, z-x, z-y) WriteLine(s=0, s) Else WriteLine(數(shù)據(jù)輸入錯(cuò)誤!) End If End Sub Private Function f(ByVal a As Single, ByVal b As Single, ByVal c As Single) As Single (8)= Sin(a) / (Sin(b) * Sin(c) End FunctionEnd Module參考答案一.、判斷題(如正確打，否則，打)1. 2. 3. 4. 5 6. 7. 8. 9. 10. 二、單項(xiàng)選擇題題 號(hào)12345678910答 案CBCCAADDCD題 號(hào)11121314151617181920答 案BDCDDBDBCC三、簡(jiǎn)答題1. 程序設(shè)計(jì)語(yǔ)言的語(yǔ)句按功能可以分成哪幾類語(yǔ)句?它們的作用是什么？答: 按功能可以分成3類語(yǔ)句:聲明語(yǔ)句、操作語(yǔ)句和控制語(yǔ)句。聲明語(yǔ)句不是執(zhí)行語(yǔ)句，它用于命名變量、常數(shù)或過(guò)程，或定義數(shù)據(jù)類型。操作語(yǔ)句用于描述對(duì)數(shù)據(jù)的處理?？刂普Z(yǔ)句用于控制程序的執(zhí)行流程。2若有數(shù)組定義語(yǔ)句：Dim c%() = 76, 80, 75，則數(shù)組c有多少個(gè)元素？這些元素是什么？它們的初值是多少？答:數(shù)組c共有3個(gè)元素c(0)、c(1)和c(2)，它們的初值分別為76, 80和75，即c(0)=76，c(1)=80和c(2)=75。3.什