精品国产一级毛片大全,毛片一级在线,毛片免费观看的视频在线,午夜毛片福利

我要投稿 投訴建議

計(jì)算機(jī)二級(jí)vb上機(jī)題庫(kù)

時(shí)間:2022-11-06 12:57:30 計(jì)算機(jī)等級(jí) 我要投稿
  • 相關(guān)推薦

2016年計(jì)算機(jī)二級(jí)vb上機(jī)題庫(kù)

  在2016年計(jì)算機(jī)第一次等級(jí)考試來(lái)臨之前,小編為大家搜集了計(jì)算機(jī)二級(jí)vb考試題及答案,希望能幫助到大家!

  一、選擇題(每小題2分,共70分)

  下列各題A) 、B) 、C) 、D)四個(gè)選項(xiàng)中,只有一個(gè)選項(xiàng)是正確的。請(qǐng)將正確選項(xiàng)填涂在答題卡相應(yīng)位置上,答在試卷上不得分。

  (1)軟件是指

  A)程序        B)程序和文檔

  C)算法加數(shù)據(jù)結(jié)構(gòu)   D)程序、數(shù)據(jù)與相關(guān)文檔的完整集合

  (2)軟件調(diào)試的目的是

  A)發(fā)現(xiàn)錯(cuò)誤           B)改正錯(cuò)誤

  C)改善軟件的性能        D)驗(yàn)證軟件的正確性

  (3)在面向?qū)ο蠓椒ㄖ,?shí)現(xiàn)信息隱蔽是依靠

  A)對(duì)象的繼承             B)對(duì)象的多態(tài)

  C)對(duì)象的封裝             D)對(duì)象的分類

  (4)下列敘述中,不符合良好程序設(shè)計(jì)風(fēng)格要求的是

  A)程序的效率第一,清晰第二   B)程序的可讀性好

  C)程序中要有必要的注釋     D)輸入數(shù)據(jù)前要有提示信息

  (5)下列敘述中正確的是

  A)程序執(zhí)行的效率與數(shù)據(jù)的存儲(chǔ)結(jié)構(gòu)密切相關(guān)

  B)程序執(zhí)行的效率只取決于程序的控制結(jié)構(gòu)

  C)程序執(zhí)行的效率只取決于所處理的數(shù)據(jù)量

  D)以上三種說(shuō)法都不對(duì)

  (6)下列敘述中正確的是

  A)數(shù)據(jù)的邏輯結(jié)構(gòu)與存儲(chǔ)結(jié)構(gòu)必定是一一對(duì)應(yīng)的

  B)由于計(jì)算機(jī)存儲(chǔ)空間是向量式的存儲(chǔ)結(jié)構(gòu),因此,數(shù)據(jù)的存儲(chǔ)結(jié)構(gòu)一定是線性結(jié)構(gòu)

  C)程序設(shè)計(jì)語(yǔ)言中的數(shù)組一般是順序存儲(chǔ)結(jié)構(gòu),因此,利用數(shù)組只能處理線性結(jié)構(gòu)

  D)以上三種說(shuō)法都不對(duì)

  (7)冒泡排序在最壞情況下的比較次數(shù)是

  A)n(n+1)/2 B)nlog2 n C)n(n-1)/2 D)n/2

  (8)一棵二叉樹(shù)中共有70個(gè)葉子結(jié)點(diǎn)與80個(gè)度為1的結(jié)點(diǎn),則該二叉樹(shù)中的總結(jié)點(diǎn)數(shù)為

  A)219 B)221 C)229 D)231

  (9)下列敘述中正確的是

  A)數(shù)據(jù)庫(kù)系統(tǒng)是一個(gè)獨(dú)立的系統(tǒng),不需要操作系統(tǒng)的支持

  B)數(shù)據(jù)庫(kù)技術(shù)的根本目標(biāo)是要解決數(shù)據(jù)的共享問(wèn)題

  C)數(shù)據(jù)庫(kù)管理系統(tǒng)就是數(shù)據(jù)庫(kù)系統(tǒng)

  D)以上三種說(shuō)法都不對(duì)

  (10)下列敘述中正確的是

  A)為了建立一個(gè)關(guān)系,首先要構(gòu)造數(shù)據(jù)的邏輯關(guān)系

  B)表示關(guān)系的二維表中各元組的每一個(gè)分量還可以分成若干數(shù)據(jù)項(xiàng)

  C)一個(gè)關(guān)系的屬性名表稱為關(guān)系模式

  D)一個(gè)關(guān)系可以包括多個(gè)二維表

  (11)要使一個(gè)文本框可以顯示多行文本,應(yīng)設(shè)置為T(mén)rue的屬性是

  A)Enabled B)MultiLine C)MasLenfth D)Width

  (12)在窗體上有一個(gè)名為T(mén)ext1的文本框。當(dāng)光標(biāo)在文本框中時(shí),如果按下字母鍵“A”,則被調(diào)用的事件過(guò)程是

  A)Form_KeyPress() B)Text1_LostFocus()

  C)Text1_Click() D)Test1_Change()

  (13)設(shè)在窗體上有一個(gè)名稱為Command1的命令按鈕和一個(gè)名稱為T(mén)ext1的文本框。要求單擊Command1按鈕時(shí)可把光標(biāo)移到文本框中。下面正確的事件過(guò)程是

  A)Private Sub Command1_Click() B)Private Sub

  Text1.GotFocus Command1.GotFocus

  End Sub EndSub

  C)Private Sub Command1_Click() D)Private Sub

  Text1.SetFocus Command1.SetFocus

  End Sub End Sub

  (14)執(zhí)行以下程序后輸出的是

  Private Sub Command1_Click()

  Ch$=”AABCDEFGH”

  Print Mid(Righ(ch$,6),Len(left(ch$,4)),2)

  End Sub

  A)CDEFGH B)ABCD C)FG D)AB

  (15)設(shè)在窗體Form1上有一個(gè)列表框List1,其中有若干個(gè)項(xiàng)目。要求單擊列表框中某一項(xiàng)時(shí),把該項(xiàng)顯示在窗體上,正確的事件過(guò)程是

  A)Prvate Sub List1_Click() B)Private Sub Form1_Click()

  Print List1.Text Print List1.Text

  End Sub End Sub

  C)Private Sub List1_Click() D)Private Sub Form1_Click()

  Print Form1.Text List1.Print List1.Text

  End Sub End Sub

  (16)若窗體上的圖片框中有一個(gè)命令按鈕,則此按鈕的Left屬性是指

  A)按鈕左端到窗體左端的距離 B)按鈕左端到圖片框左端的距離

  C)按鈕中心點(diǎn)到窗體左端的距離 D)按鈕中心點(diǎn)到圖片框左端的距離

  (17)為使程序運(yùn)行時(shí)通用對(duì)話框CD1上顯示的標(biāo)題為“對(duì)話框窗口”,若通過(guò)程序設(shè)置該標(biāo)題,則應(yīng)使用的語(yǔ)句是

  A)CD1.DialogTitle=“對(duì)話框窗口” B)CD1.Action=“對(duì)話框窗口”

  C)CD1.FileName=“對(duì)話框窗口” D)CD1.Filter=“對(duì)話框窗口”

  (18)在窗體上有如右圖所示的控件,各控件的名稱

  與其標(biāo)題相同,并有如下程序:

  Private Sub Form_Load()

  Command2.Enabled=False

  Check1.value=1

  End Sub

  剛運(yùn)行程序時(shí),看到的窗體外觀是:

  (19)設(shè)在窗體中有一個(gè)名稱為L(zhǎng)ist1的列表框,其中有若干個(gè)項(xiàng)目(如圖)。要求選中某一項(xiàng)后單擊Command1按鈕,就刪除選中的項(xiàng),則正確的事件過(guò)程是

  A)Private Sub Command1_Click()

  List1.Clear

  End Sub

  B) Private Sub Command1_Click()

  List1.Clear List1.ListIndex

  End Sub

  C) Private Sub Command1_Click()

  List1.Removeltem List1.ListIndex

  End Sub

  D) Private Sub Command1_Click()

  List1.Removeltem

  End Sub

  (20)某人設(shè)計(jì)了如下程序用來(lái)計(jì)算并輸出7!(7的階乘)

  Private Sub Command1_Click()

  t=0

  For k=7 To 2 Step -1

  t=t*k

  Next

  Print t

  End Sub

  執(zhí)行程序時(shí),發(fā)現(xiàn)結(jié)果是錯(cuò)誤的,下面的修改方案中能夠得到正確結(jié)構(gòu)的是

  A)把t=0改為t=1

  B)把For k = 7 To 2 Step -1改為For k =7 To 1 Step -1

  C)把For k = 7 To 2 Stip-1改為Fork=1 To 7

  D)把Next改為Nexi k

  (21)若窗體中已經(jīng)有若干個(gè)不同的單選按鈕,要把它們改為一個(gè)單選按鈕數(shù)組,在屬性窗口中需要且只需要進(jìn)行的操作是

  A)把所有單選按鈕的Index屬性改為相同值

  B)把所有單選按鈕的Index 屬性改為連續(xù)的不同值

  C)把所有單選按鈕的Caption屬性值改為相同

  D)把所有單選按鈕的名稱改為相同,且把它們的Index屬性改為連續(xù)的不同值。

  (22)窗體上有文本框Text1和一個(gè)菜單,菜單標(biāo)題、名稱如表,結(jié)構(gòu)見(jiàn)圖。要求程序執(zhí)行時(shí)單擊“保存”菜單項(xiàng),則把其標(biāo)題顯示在Text1文本框中。下面可實(shí)現(xiàn)此功能的事件過(guò)程是:

  標(biāo)題 名稱

  文件 file

  新建 new

  保存 save

  A)Private Sub save_Click() B)Private Sub save_Click()

  Text1.Text=file.save.Caption Text1.Text=save.Caption

  End Sub End Sub

  C)Private Sub file_Click() D)Private Sub file_Click()

  Text1.Text=file.save.Caption Text1.Text=save.Caption

  End Sub End Sub

  (23)某人在窗體上畫(huà)了一個(gè)名稱為T(mén)imer1的計(jì)時(shí)器和一個(gè)名稱為L(zhǎng)ab

  的屬性設(shè)置為Enabled=True, Interval=0,并編程如下。希望在每2秒在標(biāo)簽上顯示一次系統(tǒng)當(dāng)前時(shí)間。

  Private Sub Timer1_Timer()

  Label1.Caption=Time$

  End Sub

  在程序執(zhí)行時(shí)發(fā)現(xiàn)未能實(shí)現(xiàn)上述目的,那么,他應(yīng)做的修改是

  A)通過(guò)屬性窗口把計(jì)時(shí)器的Interval屬性設(shè)置為2000

  B)通過(guò)屬性窗口把計(jì)時(shí)器的Enabled屬生設(shè)置為False

  C)把事件過(guò)程中的Label1.Caption=Time$語(yǔ)句改為T(mén)imer1.Interval=Tims$

  D)把事件過(guò)程中的Label1.Caption=Time$語(yǔ)句改為L(zhǎng)abel1.Caption=Timer1.Time

  (24)形狀控件的Shape屬性有6種取值,分別代表6種幾何圖形。下列不屬于這6種幾何圖形的是

  (25)下面關(guān)于文件的敘述中錯(cuò)誤的是

  A)隨機(jī)文件中各條記錄的長(zhǎng)度是相同的]

  B)打開(kāi)隨機(jī)文件時(shí)采用的文件存取方式應(yīng)該是Random

  C)向隨機(jī)文件中寫(xiě)數(shù)據(jù)應(yīng)使用語(yǔ)句Print#文件號(hào)

  D)打開(kāi)隨機(jī)文件與打開(kāi)順序文件一樣,都使用Open語(yǔ)句

  (26)設(shè)窗體上有一個(gè)圖片框Picture1,要在程序運(yùn)行期間裝入當(dāng)前文件夾下的圖形文件File1.jpg,能實(shí)現(xiàn)此功能的語(yǔ)句是

  A)Picture1.Picture=”Flie1.jpg

  B)Picture1.Picture=LoadPicture(“File1.jpg”)

  C) LoadPicture(“File1.jpg”)

  D)Call LoadPicture(“File1.jpg”)

  (27)下面程序執(zhí)行時(shí),在窗體上顯示的是

  Private Sub Command1_Click()

  Dim a(10)

  For k = 1 To 10

  a(k) = 11 – k

  Next k

  Print a(a(3)\a(7) Mod a(5))

  End Sub

  A)3 B)5 C)7

  (28)為達(dá)到把a(bǔ)、b中的值交換后輸出的目的,某人編程如下:

  Private Sub Command1_Click()

  a% = 10:b% = 20

  Call swap(a,b)

  Print a,b

  End Sub

  Private Sub swap(ByVal a As Integer,ByVal b As Integer)

  c= a:a=b:b=c

  End Sub

  在運(yùn)行時(shí)發(fā)現(xiàn)輸出結(jié)果錯(cuò)了,需要修改。下面列出的錯(cuò)誤原因和修改方案中正確的是

  A)調(diào)用swap過(guò)程的語(yǔ)句錯(cuò)誤,應(yīng)改為Call swap a,b

  B)輸出語(yǔ)句錯(cuò)誤,應(yīng)改為:Print ”a”,”b”

  C)過(guò)程的形式參數(shù)有錯(cuò),應(yīng)改為:swap(ByRef a As Integer,ByRef b As Integer)

  D)swap中3條賦值語(yǔ)句的順序是錯(cuò)誤的,應(yīng)改為a=b:b=c:c=a

  (29)有如下函數(shù):

  Function fun(a As Integer,n As Integer) As Integer

  Dim m As Integer

  While a >=n

  a=a-n

  m= m+1

  Wend

  fun=m

  End Function

  該函數(shù)的返回值是

  A)a乘以n的乘積 B)a加n的和

  C)a減n的差 D)a除以n的商(不含小數(shù)部分)

  (30)下面程序的輸出結(jié)果是

  Private Sub Command1_Click()

  ch$=”ABCDEF”

  proc ch

  Print ch

  End Sub

  Private Sub proc(ch As String)

  S=””

  For k=Len(ch) To 1 Step-1

  s=s&Mid(ch,k,1)

  Next k

  ch=s

  End Sub

  A)ABCDEF B)FEDCBA C)A D)F

  (31)某人編寫(xiě)了一個(gè)能夠返回?cái)?shù)組a中10個(gè)數(shù)中最大數(shù)的函數(shù)過(guò)程,代碼如下:

  Function Maxvalue(a() As Integer) As Integer

  Dim max%

  max=1

  For k = 2 To 10

  If a(k)>a(max) Then

  max = k

  End If

  Next k

  Maxvalue = max

  End Function

  程序運(yùn)行時(shí),發(fā)現(xiàn)函數(shù)過(guò)程的返回值是錯(cuò)的,需要修改,下面的修改方案中正確的是

  A)語(yǔ)句max = 1應(yīng)改為max = a(1)

  B)語(yǔ)句For k = 2 To 10應(yīng)改為For k = 1 To 10

  C)If語(yǔ)句中的條件a(k)>a(max)應(yīng)改為a(k)>max

  D)語(yǔ)句Maxvalue = max 應(yīng)改為Maxvalue = a(max)

  (32)在窗體上畫(huà)一個(gè)名稱為Command1的命令按鈕,并編寫(xiě)以下程序:

  Private Sub Command1_Click()

  Dim n%,b,t

  t = 1:b = 1:n = 2

  Do

  b = b*n

  t = t + b

  n = n +1

  Loop Until n>9

  Print t

  End Sub

  此程序計(jì)算并輸出一個(gè)表達(dá)式的值,該表達(dá)式是

  A)9! B)10! C)1!+2!+…+9! D)1!+2!+…+10!

  (33)有一個(gè)名稱為Form1的窗體,上面沒(méi)有控件,設(shè)有以下程序(其中方法Pset(X,Y)的功能是在坐標(biāo)X,Y處畫(huà)一個(gè)點(diǎn)):

  Dim cmdmave As Boolean

  Private Sub Form_MouseDown(Button As Integer,Shift As Integer, X As Single,Y As Single)

  cmdmave = True

  End Sub

  Private Sub Form_MouseMove(Button As Integer,Shift As Integer, X As Single, Y As Single)

  If cmdmave Then

  Form1.Pset(X,Y)

  End If

  End Sub

  Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single,Y As Single)

  cmdmave = False

  End Sub

  此程序的功能是

  A)每按下鼠標(biāo)鍵一次,在鼠標(biāo)所指位置畫(huà)一個(gè)點(diǎn)

  B)按下鼠標(biāo)鍵,則在鼠標(biāo)所指位置畫(huà)一個(gè)點(diǎn);放開(kāi)鼠標(biāo)鍵,則此點(diǎn)消失

  C)不按鼠標(biāo)鍵而拖動(dòng)鼠標(biāo),則沿鼠標(biāo)拖動(dòng)的軌跡畫(huà)一條線

  D)按下鼠標(biāo)鍵并拖動(dòng)鼠標(biāo),則沿鼠標(biāo)拖動(dòng)的軌跡畫(huà)一條線,放開(kāi)鼠標(biāo)鍵則結(jié)束畫(huà)線

  (34)某人設(shè)計(jì)了下面的函數(shù)fun,功能是返回參數(shù)a中數(shù)值的位數(shù)

  Function fun(a As Integer) As Integer

  Dim n%

  n = 1

  While a \ 10 >= 0

  n = n + 1

  a = a \ 10

  Wend

  fun = n

  End Function

  在調(diào)用該函數(shù)時(shí)發(fā)現(xiàn)返回的結(jié)果不正確,函數(shù)需要修改,下面的修改方案中正確的是

  A)把語(yǔ)句n = 1改為n = 0

  B)把循環(huán)條件a \ 10 >= 0改為a \ 10 > 0

  C)把語(yǔ)句 a = a \ 10改為a = a Mod 10

  D)把語(yǔ)句fun = n改為 fun = a

  (35)在窗體上有一個(gè)名稱為Check1的復(fù)選框數(shù)組

  (含4個(gè)復(fù)選框),還有一個(gè)名稱為T(mén)ext1的文本

  框,初始內(nèi)容為空。程序運(yùn)行時(shí),單擊任何復(fù)選

  框,則把所有選中的復(fù)選框后面的方字羅列在文

  本框中(見(jiàn)圖)。下面能實(shí)現(xiàn)此功能的事件過(guò)程是

  A)Private Sub Check1_Click(Indes As Integer)

  Text1.Text =""

  For k = 0 To 3

  If Check1(k).value = 1 Then

  Text1.Text = Text1.Text & Check1(k).Caption & " " '雙引號(hào)中是空格

  End If

  Next k

  End Sub

  B)Private Sub Check1_Click(Index As Integer)

  For k = 0 To 3

  If Check1(k).value = 1 Then

  Text1.Text = Text1.Text & Check1(k).Caption & " " '雙引號(hào)中是空格

  End If

  Next k

  End Sub

  C)Private Sub Check1_Click(Index As Integer)

  Text1.Text = ""

  For k = 0 To 3

  If Check1(k).value = 1 Then

  Text1.Text = Text1.Text & Check1(Index).Caption & " " '雙引號(hào)中是空格

  End If

  Next k

  End Sub

  D)Private Sub Check1_Click(Index As Integer)

  Text1.Text = ""

  For k = 0 To 3

  If Check1(k).value = 1 Then

  Text1.Text = Text1.Text & Check1(k).Caption & " " '雙引號(hào)中是空格

  Exit For

  End If

  Next k

  End Sub

  二、填空題(每空2分,共30分)

  請(qǐng)將每空的正確答案寫(xiě)在答題卡[1]~[15]序號(hào)的橫線上,答在試卷上不得分。

  (1)軟件需求規(guī)格說(shuō)明書(shū)應(yīng)具有完整性,無(wú)岐義性、正確性、可驗(yàn)證性、可修改性等特征,其中最重要的是【1】 。

  (2)在兩種基本測(cè)試方法中,【2】 測(cè)試的原則之一是保證所測(cè)模塊中每一個(gè)獨(dú)立路徑至少執(zhí)行一次。

  (3)線性表的存儲(chǔ)結(jié)構(gòu)主要分為順序存儲(chǔ)結(jié)構(gòu)和鏈?zhǔn)酱鎯?chǔ)結(jié)構(gòu)。隊(duì)列是一種特殊的線性表,循環(huán)隊(duì)列是隊(duì)列的【3】 存儲(chǔ)結(jié)構(gòu)。

  (4)對(duì)下列二叉樹(shù)進(jìn)行中序遍歷的結(jié)果為【4】 。

  (5)在E-R圖中,矩形表示【5】 。

  (6)窗體上有一個(gè)組合框,其中已輸入了

  若干個(gè)項(xiàng)目。程序運(yùn)行時(shí),單擊其中一

  項(xiàng),即可把該項(xiàng)與最上面的一項(xiàng)交換。

  例如:?jiǎn)螕魣D1中的“重慶”,則與“北

  京”交換,得到圖2的結(jié)果。下面是可

  實(shí)現(xiàn)此功能的程序,請(qǐng)?zhí)羁铡?/p>

  Private Sub Combo1_Click()

  Dim temp

  temp = Combo1.Text

  [6] = Combo1.List(0)

  Combo1.List(0) = temp

  End Sub

  (7)設(shè)窗體上有一個(gè)名稱為HScroIII的水平滾動(dòng)條,要求當(dāng)滾動(dòng)塊移動(dòng)位置后,能夠在窗體上輸出移動(dòng)的距離(即新位置與原位置的刻度值之差,向右移動(dòng)為正數(shù),向左移動(dòng)為負(fù)數(shù))。下面是可實(shí)現(xiàn)此功能的程序,請(qǐng)?zhí)顚?xiě)。

  Dim [7] As Integer

  Private Sub Form_Load()

  pos=HScroIII.value

  End Sub

  Private Sub HScroIII_Change()

  Print [8] -pos

  pos=HScroIII.value

  End Sub

  (8)設(shè)窗體上有一個(gè)名稱為CD1的通用對(duì)話框,一個(gè)名稱為T(mén)ext1的文本框和一個(gè)名稱為Command1的命令按鈕。程序執(zhí)行時(shí),單擊Command1按鈕,則顯示打開(kāi)文件對(duì)話框,操作者從中選擇一個(gè)文本文件,并單擊對(duì)話框上的“打開(kāi)”按鈕后,則可打開(kāi)該文本文件,并讀入一行文本,顯示在Text1中。下面是實(shí)現(xiàn)此功能的事件過(guò)程,請(qǐng)?zhí)羁铡?/p>

  Private Sub Command1_Click()

  CD1.Filter ="文本文件1*.txt(Word 文檔)*.doc"

  CD1.Filterinder = 1

  CD1.ShowOpen

  If CD1.FileName<>""Then

  Open [9] For Input As #1

  Line Input #1,ch$

  Close #1

  Text1.Text = [10]

  End If

  End Sub

  (9)下面的程序執(zhí)行時(shí),可以從鍵盤(pán)輸入一個(gè)正整數(shù),然后把該數(shù)的每位數(shù)字按逆序輸出。例如:輸入7685,則輸出5867,輸入1000,則輸出0001。請(qǐng)?zhí)羁铡?/p>

  Private Sub Command1_Click()

  Dim x As Integer

  x=InputBox(“請(qǐng)輸入一個(gè)正整數(shù)”)

  While x>__[11]___

  Print x Mod 10;

  x=x\10

  Wend

  Print__[12]__

  End Sub

  (10)有如圖所示的窗體。程序執(zhí)行時(shí)先在Text1文本框中輸入編號(hào),當(dāng)焦點(diǎn)試圖離開(kāi)Text1時(shí),程序檢查編號(hào)的合法性,若編號(hào)合法,則焦點(diǎn)可以離開(kāi)Text1文本框;否則,顯示相應(yīng)錯(cuò)誤信息,并自動(dòng)選中錯(cuò)誤的字符,且

  焦點(diǎn)不能離開(kāi)Text1文本框(見(jiàn)圖)。

  合法編號(hào)的組成是:前2個(gè)字符是大寫(xiě)英文

  字母,第3個(gè)字符是“-”,后面是數(shù)字字符

  (至少1個(gè))。下面程序可實(shí)現(xiàn)此功能,請(qǐng)

  填空。

  Private Sub Text1_Lostfocus()

  Dim k%,n%

  n=Len( [13] )

  For k=1 to if (n>3,n,4)

  c=Mid(Text1. Text,k,1)

  Select Case k

  Case 1,2

  If c<"A" Or c>"Z" Then

  MsgBox("第"&k&"個(gè)字符必須是大寫(xiě)字母!")

  SetPosition k

  Exit For

  End If

  Case 3

  If c<>"-" Then

  MsgBox("第"&k&"個(gè)字符必須是字符"'"-"'")

  SetPosition k

  Exit For

  End If

  Case Else

  If c<"0" Or c>"9" Then

  MsgBox("第"&k&"個(gè)字符必須是數(shù)字!")

  SetPosition k

  Exit For

  End If

  End Select

  Next k

  End Sub

  Private Sub SetPosition(pos As Integer)

  Text1.SelStart=pos-1

  Text.SelLength= [14]

  Text1. [15]

  End Sub

  【參考答案】

  一、選擇題

  1-5 DBCAA

  6-10 CCABA

  11-15 BDCCA

  16-20 BAACA

  21-25 DBABC

  26-30 BDCDB

  31-35 DCDBA

  二、填空題

  1、無(wú)歧義性

  2、白盒測(cè)試

  3、順序

  4、ACBDFEHGP

  5、實(shí)體集

  6、Combol1.List(Combol1.ListIndex)

  7、pos

  8、HScroll1.value

  9、CD1.FileName

  10、ch

  11、10

  12、x

  13、Text1.Text

  14、1

  15、SetFocus

【計(jì)算機(jī)二級(jí)vb上機(jī)題庫(kù)】相關(guān)文章:

計(jì)算機(jī)二級(jí)VB考試題07-16

計(jì)算機(jī)二級(jí)VB強(qiáng)化試題及答案07-20

計(jì)算機(jī)二級(jí)VB考點(diǎn):報(bào)表制作07-20

計(jì)算機(jī)二級(jí)VB考試重點(diǎn)知識(shí)08-15

計(jì)算機(jī)二級(jí)VB考試題及答案07-20

計(jì)算機(jī)二級(jí)VB考試題精選及答案07-21

計(jì)算機(jī)二級(jí)VB考試練習(xí)及答案07-21

計(jì)算機(jī)二級(jí)考試VB選擇題試題08-09

計(jì)算機(jī)等級(jí)考試二級(jí)VB考點(diǎn):程序調(diào)試11-08

計(jì)算機(jī)二級(jí)考試VB程序設(shè)計(jì)復(fù)習(xí)試題07-22