計(jì)算機(jī)二級(jí)vb考試試題

本文格式為Word版，下載可任意編輯——計(jì)算機(jī)二級(jí)vb考試試題在2022年9月計(jì)算機(jī)考試之前，我為大家推舉的是計(jì)算機(jī)二級(jí)VB考試題，夢想對大家有所扶助!

1.根本操作2小題，每題15分，共計(jì)30分

PrivateSubC2_Click

C1.SetFocus

EndSub

2在名稱為Form1的窗體上畫一個(gè)文本框，名稱為Text1，其寬度為1000;再畫一個(gè)滾動(dòng)條，名稱為HS1。其刻度值的范圍是1000-2000。請編寫滾動(dòng)條的Change事情過程，程序運(yùn)行后，假設(shè)移動(dòng)滾動(dòng)框，那么可按照滾動(dòng)條的刻度值變更文本框的寬度。運(yùn)行時(shí)的窗體如下圖。程序中不能使用任何變量，事情過程只能寫一條語句。

PrivateSubHS1_Change

Text1.Width=HS1.Value

EndSub

2.簡樸應(yīng)用2小題，每題20分，計(jì)40分

1在考生文件夾下有一個(gè)工程文件sjt21.vbp，窗體上有兩個(gè)列表框，名稱分別為List1、List2，在List2中己經(jīng)預(yù)設(shè)了內(nèi)容，還有兩個(gè)命令按鈕，名稱分別為C1、C2，標(biāo)題分別為“添加”、“除掉”。如下圖2022年計(jì)算機(jī)二級(jí)vb考試試題2022年計(jì)算機(jī)二級(jí)vb考試試題。程序的功能是在運(yùn)行時(shí)，假設(shè)選中右邊列標(biāo)框中的一個(gè)列表項(xiàng)，單擊“添加”按鈕，那么把該項(xiàng)移到左邊的列表框中;若選中左邊列標(biāo)框中的一個(gè)列表項(xiàng)，單擊“除掉”按鈕，那么把該項(xiàng)移回右邊的列表框中。文件中已經(jīng)給出了全體控件和程序，但程序不完整，請去掉程序中的解釋符，把程序中的?改為正確的內(nèi)容。但不能修改程序中的其他片面，也不能修改控件的屬性。結(jié)果把修改后的文件按原文件名存盤。

PrivateSubForm_Load

List1.AddItem性別

List1.AddItem班號(hào)

List1.AddItem簡歷

List2.AddItem學(xué)號(hào)

List2.AddItem姓名

List2.AddItem年齡

List2.AddItem照片

EndSub

PrivateSubC1_Click

List2.AddItemList1.Text

List1.RemoveItemList1.ListIndex

EndSub

PrivateSubC2_Click

DimkAsInteger

k=0

WhilekList2.ListCount

IfList2.Selectedk=TrueThen

List1.AddItemList2.Text

List2.RemoveItemk

EndIf

k=k+1

Wend

EndSub

2在考生文件夾下有一個(gè)工程文件sjt22.vbp，請?jiān)贔orm1窗體上建立一個(gè)名稱為Op1的單項(xiàng)選擇按鈕數(shù)組，含有三個(gè)單項(xiàng)選擇按鈕，其標(biāo)題分別為“10!”“11!”“12!”，Index屬性分別為0、1、2;再畫一個(gè)名稱為C1的命令按鈕，標(biāo)題為“計(jì)算”;畫一個(gè)名稱為Text1的文本框，如下圖。程序的功能是在選定一個(gè)單項(xiàng)選擇按鈕并單擊“計(jì)算”按鈕后，可以計(jì)算出相應(yīng)的階乘值，在Text1中顯示該階乘值。請畫出上述控件并編寫程序。

PrivateSubC1_Click

DimnAsInteger,kAsInteger

DimfactAsLong

Fork=0To2

IfForm1.Op1k.ValueThen

n=ValLeft$Form1.Op1k.Caption,2

EndIf

Nextk

fact=1

k=1

DoWhilekn

fact=fact*k

k=k+1

Loop

Text1.Text=fact

EndSub

PrivateSubForm_UnloadCancelAsInteger

unload_sub

EndSub

PrivateSubunload_sub

DimfnAsString

fn=App.Pathdataout.txt

OpenfnForOutputAs#1

Print#1,Text1.Text

Close#1

EndSub

3.綜合應(yīng)用1小題,計(jì)30分

在考生文件夾下有一個(gè)工程文件sjt31.vbp，其窗體上有一個(gè)文本框，名稱為Text1,可以多行顯示;有一個(gè)名稱為CD1的通用對話框;還有三個(gè)命令按鈕，名稱分別為C1、C2、C3，標(biāo)題分別為“開啟文件”、“轉(zhuǎn)換”、“存盤”，如下圖

命令按鈕的功能是：“開啟文件”——彈出開啟文件對話框，默認(rèn)開啟文件的類型為“文本文件”2022年計(jì)算機(jī)二級(jí)vb考試試題計(jì)算機(jī)等級(jí)。選擇考生文件夾下的in5.txt文件后，該文件中的內(nèi)容顯示在Text1中;“轉(zhuǎn)換”——把Text1中的全體小寫英文字母轉(zhuǎn)換成大寫;“存盤”——把Text1中的內(nèi)容存入考生文件夾下的out5.dat文件中。在窗體中已經(jīng)給出了片面程序，要求：

1請去掉程序中的解釋符，把程序中的?改為正確的內(nèi)容，但不能修改程序中的其他片面，也不能修改控件的屬性。

2編寫“轉(zhuǎn)換”按鈕的Click事情過程。結(jié)果把修改后的文件按原文件名存盤。

PrivateSubC1_Click

DimaAsString

CD1.Filter=全體文件?*.*?文本文件?*.txt?Word文件?*.doc

CD1.FilterIndex=2

CD1.Action=1

OpenCD1.FileNameForInputAs#1

Input#1,a

Close#1

Text1.Text=a

EndSub

PrivateSubC2_Click

Text1.Text=UCaseText1.Text

EndSub

PrivateSubC3_