點(diǎn)擊查看:2018年12月計(jì)算機(jī)二級(jí)VB考試提分試題及答案匯總
1.設(shè)有如下程序段:
x=2
For c=1 To 4 Step 2
x=x+c
Next c
運(yùn)行以上程序后,x的值是(A)
A.6
B.7
C.8
D.9
2.以下敘述中錯(cuò)誤的是(A)
A.在KeyPress事件過(guò)程中不能識(shí)別鍵盤(pán)鍵的按下與釋放
B.在KeyPress事件過(guò)程中不能識(shí)別回車鍵
C.在KeyDown和KeyUp事件過(guò)程中,從鍵盤(pán)輸入的字母"A"和字母"a"對(duì)應(yīng)的KeyCode視作相同的字母
D.在KeyDown和KeyUp事件過(guò)程中,從大鍵盤(pán)上輸入的"1"和從右側(cè)小鍵盤(pán)上輸入的"1"被視作不同的字符
3.執(zhí)行如下兩條語(yǔ)句,窗體上顯示的是(C)
A=9.8596
Print Format(a,"000.00")
A.0,009.86
B.9.86
C.009.86
D.0,009.86
4.在窗體上畫(huà)一個(gè)名稱為CommandDialog1 的通用對(duì)話框,一個(gè)名稱為Command1的命令按鈕。然后編寫(xiě)如下事件過(guò)程:
Private Sub Command1_Click( )
CommonDialog1.FileName =""
CommonDialog1.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"
CommonDialog1.FilterIndex=1
CommonDialog1.DialogTitle="VBTest"
CommonDialog1.Action=1
End Sub
對(duì)于這個(gè)程序,以下敘述中錯(cuò)誤的是(D)
A.該對(duì)話框被設(shè)置為"打開(kāi)"對(duì)話框
B.在該對(duì)話框中指定的文件名為空
C.該對(duì)話框的標(biāo)題為VBTest
D.在該對(duì)話框中指定的默認(rèn)文件類型為文本文件(*.Txt)
5.設(shè)一個(gè)工程由兩個(gè)窗體組成,其名稱分別為Form1和Form2,在Form1上有一個(gè)名稱為Command1的命令按鈕。窗體Form1的程序代碼如下:
Private Sub Command1_Click( )
Dim a As Integer
a=10
Call g(Form2,a)
End Sub
Private Sub g(f As Form,x As Integer)
y=Iif(x>10,100,-100)
f.Show
f.Caption=y
End Sub
運(yùn)行以上程序,正確的結(jié)果是(B)
A.Form1的Caption屬性值為100
B.Form2的Caption屬性值為-100
C.Form1的Caption屬性值為-100
D.Form2的Caption屬性值為100
6.在窗體上畫(huà)一個(gè)名稱為Command1的命令按鈕,并編寫(xiě)如下程序:
Private Sub Command1_Click( )
Dim x As Integer
Static y As Integer
x=10
y=5
Call f1(x,y)
Print x,y
End Sub
Private Sub f1(ByRef x1 As Integer, y1 As Integer)
x1=x1+2
y1=y1+2
End Sub
程序運(yùn)行后,單擊命令按鈕,在窗體上顯示的內(nèi)容是(D)
A.10 5
B.12 5
C.10 7
D.12 7
7.Option Base 1
Private Sub Command1_Click( )
Dim a(10) As Integer
Dim n As Integer
n=3
If n<10 Then
Call GetArray(a,n)
End If
End Sub
Private Sub GetArray(b( ) As Integer,n As Integer)
Dim c(10) As Integer
j=0
For t=1 To n
b(t)=Rnd*100
If b(t)/2=b(t)\2 Then
j=j+1
c(j)=b(t)
End If
Next t
Print j
End Sub
以下敘述中錯(cuò)誤的是(C)
A.數(shù)組b中的數(shù)范圍為0-100
B.c數(shù)組下標(biāo)的下界從1開(kāi)始
C.GetArray過(guò)程的參數(shù)n是按值傳送的
D.語(yǔ)句If b(t)/2=b(t)\2 Then 是判斷數(shù)組b中元素的值是否為整數(shù)
8.在窗體上畫(huà)一個(gè)名稱為Command1的命令按鈕,然后編寫(xiě)如下事件過(guò)程:
Option Base 1
Private Sub Command1_Click( )
Dim a
a= Array(1,2,3,4,5)
For c=1 To Ubound(a)
a(c) = a(c)+c-1
Next c
Print a(3)
End Sub
程序運(yùn)行后,單擊命令按鈕,則在窗體上顯示的內(nèi)容是(B)
A.4
B.5
C.6
D.7
9.閱讀程序:
Option Base 1
Private Sub Form_Click( )
Dim arr
Dim Sum%
Sum = 0
arr = Array(1, 3, 5, 7, 9)
For t = 1 To 5
Sum = Sum + arr(t)
Next t
Print Sum
End Sub
程序運(yùn)行后,單擊窗體,輸入結(jié)果為(B)
A.5
B.9
C.25
D.15
10.在窗體上畫(huà)一個(gè)名稱為File1的文件列表框,并編寫(xiě)如下程序:
Private Sub File1_DblClick( )
x=Shell(File1.FileName,1)
End Sub
以下關(guān)于該程序的敘述中,錯(cuò)誤的是(A)
A.x沒(méi)有實(shí)際作用,因此可以將該語(yǔ)句寫(xiě)為:Call Shell(File1,FileName,1)
B.雙擊文件列表框中的文件,將觸發(fā)該事件過(guò)程
C.要執(zhí)行的文件的名字通過(guò)File1.FileName指定
D.File1中顯示的是當(dāng)前驅(qū)動(dòng)器、當(dāng)前目錄下的文件
11.在窗體上畫(huà)一個(gè)名稱為L(zhǎng)abel1、標(biāo)題為"VisualBasic考試"的標(biāo)簽,兩個(gè)名稱分別為Command1和Command2、標(biāo)題分別為"開(kāi)始"和"停止"的命令按鈕,然后畫(huà)一個(gè)名稱為T(mén)imer1的計(jì)時(shí)器控件,并把其Interval屬性設(shè)置為500。編寫(xiě)如下程序:
Private Sub Form_Load( )
Timer1.Enabled=False
End Sub
Private Sub Command1_Click( )
Timer1.Enabled=True
End Sub
Private Sub Timer1_Timer( )
If Label1.Left< Form1.Width Then
Label1.Left = Label1.Left + 20
Else
Label1.Left=0
End If
End Sub
程序運(yùn)行后,單擊"開(kāi)始"按鈕,標(biāo)簽在窗體中移動(dòng)。 對(duì)于這個(gè)程序,以下敘述中錯(cuò)誤的是(A)
A.標(biāo)簽的移動(dòng)方向?yàn)樽杂蚁蜃?/P>
B.單擊"停止"按鈕后再單擊"開(kāi)始"按鈕,標(biāo)簽從停止的位置繼續(xù)移動(dòng)
C.當(dāng)標(biāo)簽全部移出窗體后,將從窗體的另一端出現(xiàn)并重新移動(dòng)
D.標(biāo)簽按指定的時(shí)間時(shí)隔移動(dòng)
12.規(guī)范地說(shuō),VB是一種(A)的開(kāi)發(fā)工具
A.面向?qū)ο?/P>
B.面向用戶
C.面向屏幕
D.面向窗體
13.VB6設(shè)計(jì)界面包含多個(gè)視窗,控制這些視窗顯示或關(guān)閉的命令包含在(D)下拉菜單中
A.文件
B.工程
C.編輯
D.視圖
14下面(D)操作不是激活或顯示屬性列表框的操作
A.按快捷鍵F4
B.點(diǎn)擊工具欄中的"屬性列表框"按鈕
C.選擇"視圖"下拉菜單的"屬性窗口"項(xiàng)
D.雙擊窗體中的某一對(duì)象
15.Visual Basic程序中分隔各語(yǔ)句的字符是(B)
A.′
B.:
C.\
D._
16.假定窗體的名稱(Name屬性)為Form1,則把窗體的標(biāo)題設(shè)置為"VB Test"的語(yǔ)句為(B)
A.Form1 = "VB Test"
B.Caption ="VB Test"
C.Form1.Text = "VB Test"
D.Form1.Name ="VB Test"
17.下列不能打開(kāi)代碼窗口的操作是(D)
A.雙擊窗體上的某個(gè)控件雙擊
B.雙擊窗體
C.按F7鍵
D.單擊窗體或控件
18.Visual Basic程序中語(yǔ)句行的續(xù)行符是(D)
A.′
B.:
C.\
D. _
19.Visual Basic程序中的注釋所使用的字符是(A)
A.′
B.:
C.\
D._
20.下列說(shuō)法中正確的是:為了保存一個(gè)Visual Basic應(yīng)用程序,應(yīng)當(dāng)(D)
A.只保存窗體模塊文件(.frm)
B.只保存工程文件(.vbp)
C.分別保存工程文件和標(biāo)準(zhǔn)模塊文件(.bas)
D.分別保存工程文件、窗體文件和標(biāo)準(zhǔn)模塊文件
21.為了使窗體的大小可以改變,必須把它的BorderStyle屬性設(shè)置為(B)
A.1
B.2
C.3
D.4
22.下列說(shuō)法中正確的是:為了載入一個(gè)只有一個(gè)工程(此工程下有三個(gè)窗體)的Visual Basic應(yīng)用程序,應(yīng)當(dāng)(B)
A.只裝入窗體模塊文件(.frm)
B.先裝入工程文件(.vbp)即可
C.分別裝入工程文件和標(biāo)準(zhǔn)模塊文件(.bas)
D.分別裝入工程文件、窗體文件和標(biāo)準(zhǔn)模塊文件
23.要使一個(gè)標(biāo)簽?zāi)軌蝻@示所需要的文本,應(yīng)設(shè)置該標(biāo)簽的(A)屬性的值
A.Caption
B.Name
C.Text
D.AutoSize
24.要使一個(gè)命令按鈕上有圖形,應(yīng)該設(shè)置該按鈕的(A)屬性值,同時(shí)設(shè)置它的style屬性為1
A.Picture
B.Style
C.DownPicture
D.DisabledPicture
25.為使計(jì)時(shí)器對(duì)象每隔5秒鐘產(chǎn)生一個(gè)時(shí)鐘事件(Timer事件),則其Interval屬性值應(yīng)設(shè)置為(D)
A.5
B.300
C.500
D.5000
26一個(gè)標(biāo)準(zhǔn)的VB應(yīng)用程序至少要包含一個(gè)(C)對(duì)象
A.文本框
B.標(biāo)簽框
C.窗體
D.命令按鈕
27.要使一個(gè)文本框?qū)ο竽軌蝻@示多行文字,應(yīng)設(shè)置該對(duì)象的(B)屬性值為T(mén)rue
A.Text
B.MultiLine
C.Style
D.Visible
28.下列的(A)對(duì)象支持KeyPress事件
A.文本框
B.命令按鈕
C.標(biāo)簽框
D.圖像框
29.若要將窗體從內(nèi)存中卸載,其實(shí)現(xiàn)的方法或語(yǔ)句是(B)
A.Show
B.Unload
C.Load
D.Hide
30.以下選項(xiàng)中,不是VB標(biāo)準(zhǔn)控件的是(C)
A.命令按鈕
B.定時(shí)器
C.通用對(duì)話框
D.單選框
微信搜索"考試吧"了解更多考試資訊、下載備考資料
相關(guān)推薦:
2018年全國(guó)計(jì)算機(jī)等級(jí)考試必做試題匯總(各科目)
2018年全國(guó)計(jì)算機(jī)等級(jí)考試復(fù)習(xí)知識(shí)點(diǎn)匯總(各科目)
2018全國(guó)計(jì)算機(jī)等級(jí)考試備考經(jīng)驗(yàn)及應(yīng)試技巧匯總
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |