需要答案請加QQ：296856541  微信：aopopengzs 

可做奧鵬全部院校在線作業(yè)、離線作業(yè)、畢業(yè)論文

《VB程序設(shè)計》課程在線作業(yè)1
試卷總分:100    得分:100
第1題,在窗體中添加一個命令按鈕然后編寫如下程序
PrivateSubCommand1Click
DimaAsIntegerbAsInteger
a=InputBox"EntertheFirstinteger"
b=InputBox"EntertheSecondinteger"
Printb+a
EndSub
程序運(yùn)行后單擊命令按鈕先后在兩個輸入框中分別輸入123和123則輸出結(jié)果是
A、246
B、123
C、456
D、123123
正確答案:


第2題,在窗體上畫一個名稱為Command1的命令按鈕和兩個名稱分別為Text1、Text2的文本框然后編寫如下事件過程
PrivateSubCommand1Click
n=Text1Text
SelectCasen
Case1To20
x=10
Case246
x=20
CaseIs10
x=30
Case10
x=40
EndSelect
Text2Text=x
EndSub
程序運(yùn)行后如果在文本框Text1中輸入10然后單擊命令按鈕則在Text2中顯示的內(nèi)容是
A、10
B、20
C、30
D、40
正確答案:


第3題,指出下面哪個語句不是寫文件語句
A、Print
B、Output
C、Write
D、Put
正確答案:


第4題,窗體上有一組合框Combol窗體加載時的代碼如下PrivateSubFormLoadCombolAddItem"電視機(jī)"CombolAddItem"錄像機(jī)"CombolAddItem"VCD"CombolAddItem"組合音響"EndSub要在文本框Textl中顯示列表中的第三個項目則正確的語句的是
A、Textl.Text=Combol.List(0)
B、Textl.Text=Combol.List(1)
C、Textl.Text=Combol.List(2)
D、Textl.Text=Combol.List(3)
正確答案:


答案來源：（www.）,設(shè)組合框Combo1中有三個項目則以下能刪除最后一項的語句是
A、Combo1.RemoveItem Text
B、Combo1.RemoveItem 2
C、Combo1.RemoveItem 3
D、Combo1.RemoveItem Combo1.Listcount
正確答案:


第6題,設(shè)有如下通用過程
PublicSubFunaByValxAsInteger
Fori=1To5
x=x+ai
Next
EndSub
在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕然后編寫如下的事件過程
PrivateSubCommand1ClickDimarr5AsVariant
Fori=1To5
arri=i
Next
n=10
CallFunarrn
Text1Text=n
EndSub
程序運(yùn)行后單擊命令按鈕則在文本框中顯示的內(nèi)容是
A、10
B、15
C、25
D、24
正確答案:


第7題,為了把一個記錄型變量的內(nèi)容寫入文件中指定的位置要使用語句
A、Get文件號，記錄號，變量名
B、Get文件號，變量名，記錄號
C、Put文件號，變量名，記錄號
D、Put文件號，記錄號，變量名
正確答案:


第8題,在下列動作中不能引發(fā)命令按鈕Click事件的是
A、在按鈕上單擊鼠標(biāo)左鍵
B、在按鈕上單擊鼠標(biāo)右鍵
C、把焦點轉(zhuǎn)移到按鈕上，然后按回車
D、如果按鈕有快捷字母鍵，按Alt+快捷字母鍵
正確答案:


第9題,在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕然后編寫如下事件過程
PrivateSubCommand1Click
Dimarray11010AsInteger
DimIjAsInteger
ForI=1To3
Forj=2To4
array1Ij=I+j
Nextj
NextI
Text1Text=array123+array134
EndSub
程序運(yùn)行后單擊命令按鈕在文本框中顯示的值是
A、12
B、13
C、14
D、15
正確答案:


答案來源：（www.）,設(shè)有如下程序
OptionBase0
PrivateSubFormClick
Dima
DimIAsInteger
a=Array123456789
ForI=0To3
Printa5I
NextI
EndSub
程序運(yùn)行后單擊窗體則在窗體上顯示的是
A、4321
B、5432
C、6543
D、7654
正確答案:


第11題,在調(diào)用"打開"或"保存"文件對話框時如果需要指定文件列表框列出的文件類型是doc文件則正確的描述格式是
A、CommonDialog1.Filter="*.DOC|*.doc"
B、CommonDialog1.Filter="文本文件（.doc）|（*.doc）"
C、CommonDialog1.Filter="text(.doc)||(*.doc)"
D、CommonDialog1.Filter="text(.doc)(*.doc)"
正確答案:


答案來源：（www.）,如果要在菜單中添加一個分隔線則應(yīng)將其Caption屬性設(shè)置為
A、*
B、=
C、&
D、-
正確答案:


第13題,下列哪個屬性設(shè)置文本框中文字的對齊方式
A、SelLength
B、Alignment
C、Multiline
D、ScrollBars
正確答案:


第14題,以下能判斷是否到達(dá)文件尾的函數(shù)是
A、BOF
B、LOC
C、LOF
D、EOF
正確答案:


答案來源：（www.）,下面敘述錯誤的是
A、驅(qū)動器列表框DriveListBox顯示當(dāng)前系統(tǒng)中有效磁盤驅(qū)動器
B、目錄列表框DirListBox顯示當(dāng)前驅(qū)動器分層目錄樹
C、文件列表框FileListBox顯示選定目錄中的所有文件
D、文件列表框FileName屬性是設(shè)定允許顯示文件名的文件類型
正確答案:


第16題,設(shè)a=10b=5c=1執(zhí)行語句Printabc后窗體上顯示的是
A、True
B、False
C、1
D、出錯信息
正確答案:


第17題,在窗體上畫一個名稱為Command1的命令按鈕然后編寫如下事件過程
PrivateSubCommand1Click
DimnumAsInteger
num=1
DoUntilnum6
Printnum
num=num+24
Loop
EndSub
程序運(yùn)行后單擊命令按鈕則窗體上顯示的內(nèi)容是
A、1 3.4 5.8
B、1 3 5
C、1 4 7
D、無數(shù)據(jù)輸出
正確答案:


第18題,以下關(guān)于焦點的敘述中錯誤的是
A、如果文本框的TabStop屬性為False，則不能接收從鍵盤輸入的數(shù)據(jù)
B、當(dāng)文本框失去焦點時，觸發(fā)LostFocus事件
C、當(dāng)文本框的Enabled屬性為False時，其Tab順序不起作用
D、可以用TabIndex屬性改變Tab順序
正確答案:


第19題,執(zhí)行語句Open"Teldat"ForRandomAs1Len=50后對文件Teldat中的數(shù)據(jù)能夠執(zhí)行的操作是
A、只能寫，不能讀
B、只能讀，不能寫
C、既可以讀，也可以寫
D、不能讀，不能寫
正確答案:


答案來源：（www.）,Sub過程與Function函數(shù)的最根本區(qū)別是
A、Function過程可以有參數(shù)，而Sub過程不可以
B、兩種過程參數(shù)的傳遞方式不同
C、Sub過程無返回值，但Function過程有返回值
D、Sub過程是語句級調(diào)用，可以使用Call或直接使用過程名，但Function過程是在表達(dá)式中調(diào)用
正確答案: