Visual Basic 程序設(shè)計(jì)智慧樹(shù)知到課后章節(jié)答案2023年下海南師范大學(xué)

VisualBasic程序設(shè)計(jì)智慧樹(shù)知到課后章節(jié)答案2023年下海南師范大學(xué)海南師范大學(xué)

緒論單元測(cè)試

以下敘述中錯(cuò)誤的是().

A:VisualBasic中控件的某些屬性只能在運(yùn)行時(shí)設(shè)置B:VisualBasic工具箱中的所有控件都具有寬度(Width)和高度(Height)屬性C:VisualBasic應(yīng)用程序不具有明顯開(kāi)始和結(jié)束語(yǔ)句D:VisualBasic是事件驅(qū)動(dòng)型可視化編程工具

答案:VisualBasic工具箱中的所有控件都具有寬度(Width)和高度(Height)屬性

VB的啟動(dòng)有多種方法，下面不能啟動(dòng)VB的是（

）.

A:使用“開(kāi)始”菜單中的“程序”命令B:在Ｗindows窗口中按下F5鍵C:使用“開(kāi)始”菜單中的“運(yùn)行”命令D:使用“我的電腦”，在VB所在硬盤(pán)驅(qū)動(dòng)器中找到相應(yīng)的VB文件夾

答案:在Ｗindows窗口中按下F5鍵

在VB中，應(yīng)用程序被稱(chēng)為(

)。

A:工程

B:對(duì)象C:屬性D:窗體

答案:工程

在VB中，用戶(hù)界面設(shè)計(jì)是在（

）窗口中進(jìn)行的。

A:代碼B:工程C:窗體D:屬性

答案:窗體

MSDN的作用是（

）。

A:提供各種控件及其代碼B:包括其余各選項(xiàng)功能C:自動(dòng)生成程序代碼D:提供程序示例代碼、技術(shù)文檔等

答案:提供程序示例代碼、技術(shù)文檔等

第一章測(cè)試

以下敘述中錯(cuò)誤的是(

)。

A:窗體文件包含該窗體及其控件的屬性B:

以.BAS為擴(kuò)展名的文件是標(biāo)準(zhǔn)模塊文件C:一個(gè)工程中可以含有多個(gè)標(biāo)準(zhǔn)模塊文件D:在工程資源管理器,窗口中只能包含一個(gè)工程以及屬于該工程的其他文件

答案:在工程資源管理器,窗口中只能包含一個(gè)工程以及屬于該工程的其他文件

VB工程文件的擴(kuò)展名是（）。

A:.vbg

B:.vbpC:.frm

D:.frx

答案:.vbp

在設(shè)計(jì)階段，當(dāng)雙擊窗體上某個(gè)對(duì)象時(shí)，所打開(kāi)的窗體是（

）。

A:屬性窗口B:工具箱窗口C:代碼窗體D:工程資源管理器窗口

答案:代碼窗體

VB6.0集成開(kāi)發(fā)環(huán)境有三種工作狀態(tài)，不屬于三種工作狀態(tài)之一的是（

）。

A:中斷狀態(tài)B:運(yùn)行狀態(tài)C:編寫(xiě)代碼狀態(tài)D:設(shè)計(jì)狀態(tài)

答案:編寫(xiě)代碼狀態(tài)

VB6.0是一種面向（

）的編程環(huán)境。

A:應(yīng)用B:對(duì)象C:過(guò)程D:機(jī)器

答案:對(duì)象

第二章測(cè)試

以下能夠觸發(fā)文本框Change事件的操作是（

）。

A:文本框獲得焦點(diǎn)

B:改變文本框的內(nèi)容

C:設(shè)置文本框?yàn)椴豢梢?jiàn)D:文本框失去焦點(diǎn)

答案:改變文本框的內(nèi)容

VisualBasic6.0中任何控件都有的屬性是(

)。

A:CaptionB:BackColor

C:NameD:BorderStyle

答案:Name

確定一個(gè)窗體或控件大小的屬性是(

)。

A:Top和LeftAB:Top和rightC:

Width和Height

D:Width和Top

答案:

Width和Height

剛建立一個(gè)新的標(biāo)準(zhǔn)EXE工程后，不在工具箱中出現(xiàn)的控件是（

）。

A:圖片框B:單選按鈕C:通用對(duì)話框D:文本框

答案:通用對(duì)話框

VB中對(duì)象的含義是（

）。

A:具有某些特性的具體事物的抽象B:創(chuàng)建對(duì)象實(shí)例的模板C:封裝了數(shù)據(jù)和方法的實(shí)體D:封裝的程序

答案:封裝了數(shù)據(jù)和方法的實(shí)體

第三章測(cè)試

表達(dá)式7+4\6*5/8MOD9的值是(

)。

A:7B:5C:6D:8

答案:8

表達(dá)式NOT("ABC"="ABK")OR("abc"="habc")的結(jié)果為(

)。

A:

0B:

"True"C:

"False"

D:

1

答案:

"True"

如果想在程序中反復(fù)使用一個(gè)數(shù)據(jù)“01/01/2000”，為了避免在編寫(xiě)程序時(shí)反復(fù)輸入這個(gè)數(shù)據(jù)，也為了一次能夠修改程序中所有用到這個(gè)數(shù)據(jù)的語(yǔ)句，可以采用：(

)

A:將這個(gè)數(shù)據(jù)聲明為字符串型常量，用一個(gè)常量標(biāo)識(shí)符代表它。B:將這個(gè)數(shù)據(jù)聲明為日期型變量，用一個(gè)變量標(biāo)識(shí)符表示它。C:將這個(gè)數(shù)據(jù)聲明為日期型常量，用一個(gè)常量標(biāo)識(shí)符代表它。D:將這個(gè)數(shù)據(jù)聲明為字符串型變量，用一個(gè)變量標(biāo)識(shí)符表示它。

答案:將這個(gè)數(shù)據(jù)聲明為日期型常量，用一個(gè)常量標(biāo)識(shí)符代表它。

下列符號(hào)中，哪一個(gè)是合法的變量名（）。

A:123_aB:1_1C:sinxD:integer

答案:sinx

表達(dá)式Mid$("一二三四五六",3,4)的結(jié)果是（）.

A:

"三四"B:"二三"C:

"三四五六"D:"二三四五"

答案:"二三"

第四章測(cè)試

a=3,b=5,c=IIF(a<b,10,12),則c=(

)。

A:10B:3C:5D:12

答案:10

"設(shè)有如下程序：PrivateSubForm_Click()

a=1

Fori=1To3

SelectCasei

Case1,3

a=a+1

Case2,4

a=a+2

EndSelect

Nexti

PrintaEndSub程序運(yùn)行后，單擊窗體，則在窗體上顯示的內(nèi)容是（）。

A:5B:3C:6D:4

答案:5

"下列程序段中，語(yǔ)句i=i+1執(zhí)行了（）次。Fori=1to5

i=i+1Nexti

A:3B:2C:5D:4

答案:3

在窗體中添加一個(gè)名稱(chēng)為Command1的命令按鈕，然后編寫(xiě)如下程序：PrivateSubCommand1_Click()Fori=1To4

a=1

Forj=1To3

a=2

Fork=1To2

a=a+6

Nextk

NextjNextiPrintaEndSub程序運(yùn)行后，單擊命令按鈕，則在窗體上顯示的內(nèi)容是（

）。

A:16B:15C:17D:14

答案:14

設(shè)a="VisualBasic"，下面使b="Basic"的語(yǔ)句是（

）。

A:b=Left(a,8,5)B:b=Mid(a,8,5)C:b=Left(a,8,12)D:b=Right(a,5,5)

答案:b=Mid(a,8,5)

第五章測(cè)試

若有數(shù)組說(shuō)明語(yǔ)句為:Dima(10),則數(shù)組a包含元素的個(gè)數(shù)是(

).

A:12B:8C:11D:10

答案:11

已知有數(shù)組聲明:Dima(-1To3,2To5)Asinteger,如下引用數(shù)組中的元素,正確的是

A:

a(4)

B:a(-1,2)C:a[-1,2]D:

a(0,6)

答案:a(-1,2)

在窗體上添加一個(gè)命令按鈕，編寫(xiě)如下代碼：Option

Base1PrivateSubCommand1_Click

Dim

a(10)AsInteger,p(3)As

Integer

k=5

Fori=1

To

10

a(i)=i

Nexti

Fori=1

To

3

p(i)=a(i*i)

Nexti

Fori=1

To3

k=k+p(i)*2

Nexti

PrintkEndSub程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是

A:37B:35C:33D:28

答案:33

如下數(shù)組聲明語(yǔ)句，正確的是

A:Dima(n,n)AsIntegerB:Dima[3,4]AsIntegerC:Dima(3,4)%D:Dima(3,4)AsInteger

答案:Dima(3,4)AsInteger

在窗體中添加一個(gè)命令按鈕,然后編寫(xiě)如下代碼:PrivateSubCommand1_Click()

ReDimthis(4)

Fori=1To4

this(i)=i*3

Next

ReDimthis(6)

Fori=1To6

this(i)=this(i)+i

Next

Printthis(3);this(6)EndSub

程序運(yùn)行后,則窗體上顯示的內(nèi)容為()

A:10

6

B:3

6

C:12

6

D:8

0

答案:3

6

第六章測(cè)試

下面的過(guò)程語(yǔ)句聲明中正確的是（

）

A:Subf1(ByValn%())B:Functionf1%(ByReff1%)C:Subf1(ByRefn%)AsIntegerD:Functionf1(Byvaln%)

答案:Functionf1(Byvaln%)

在一個(gè)過(guò)程中定義的變量，若希望該過(guò)程外還能保存過(guò)程中局部變量的值，則應(yīng)使用關(guān)鍵字（）在過(guò)程中定義過(guò)程級(jí)變量。

A:DimB:Static

C:PublicD:Private

答案:Static

下面過(guò)程運(yùn)行后顯示的結(jié)果是（）

PublicSubF1(ByRefn%,ByValm%)

n=nMod10

M=m\10EndSubSubCommand1_Click()

Dimx%,y%

X=12:y=34

CallF1(x,y)

MsgBox(x&““&y)EndSub

A:

12

3B:

2

3

C:2

34D:12

34

答案:2

34

如下程序的運(yùn)行結(jié)果是（）SubCommand1_Click()

MsgBox(p1(3.0,7))EndSubPublicFunctionp1!(ByValx!,ByValn%)

Ifn=0Thenp1=1

Else

IfnMod2=1Then

p1=x*p1(x,n\2)

Else

P1=p1(x,n\2)\xEndifEndifEndFunction

A:18B:27C:14D:7

答案:27

如下程序運(yùn)行后各變量的值依次為（）PublicSubProc(ByRefa%())Statici%Do

a(i)=a(i)+a(i+1)

I=i+1LoopWhilei<2EndSub

SubCommand1_Click()

Dimm%,i%,x%(10)

Fori=0To4:x(i)=i+1:Nexti

Fori=1To2:CallProc(x):Nexti

Fori=0To4:Printx(i);:nextiEndsub

A:

4

5

6

7

8B:3

4

7

5

6

C:2

3

4

4

5D:

3

5

7

4

5

答案:

3

5

7

4

5

第七章測(cè)試

將數(shù)據(jù)項(xiàng)“China”添加到列表框List1中成為第二項(xiàng)應(yīng)使用()語(yǔ)句。

A:List1.AddItem2,“China”B:List1.AddItem1,“China”

C:List1.AddItem“China”,2

D:List1.AddItem“China”,1

答案:List1.AddItem“China”,1

引用列表框List1最后一個(gè)數(shù)據(jù)項(xiàng)，應(yīng)使用(

)語(yǔ)句。

A:List1.List(ListCount)

B:List1.List(List1.ListCount-1）C:List1.List(List1.ListCount）D:List1.List(ListCount-1)

答案:List1.List(List1.ListCount-1）

執(zhí)行了下面的程序后，列表框中的數(shù)據(jù)項(xiàng)有(

)。

PrivateSubForm_Click()

Fori=1to6

List1.AddItemi

Nexti

Fori=1to3

List1.RemoveItemi

Nexti

EndSub

A:1，5，6

B:1，3，5

C:2，4，6

D:4，5，6

答案:1，3，5

在窗體上畫(huà)一個(gè)名稱(chēng)為T(mén)ext1的文本框，然后畫(huà)一個(gè)名稱(chēng)為HScroll1的滾動(dòng)條，其Min和Max屬性分別為0和100，程序運(yùn)行后，如果移動(dòng)滾動(dòng)框，則在文本框中顯示滾動(dòng)條的當(dāng)前值。以下能實(shí)現(xiàn)上述操作的程序段是(

).

A:PrivateSubHScroll1_Change()

Text1.Text=HScroll1.Caption

EndSub

B:PrivateSubHScroll1_Dblclick()

Text1.Text=HScroll1.ValueEndSub

C:PrivateSubHScroll1_Change()

Text1.Text=HScroll1.Value

EndSub

D:PrivateSubHScroll1_Click()

Text1.Text=HScroll1.Value

EndSub

答案:PrivateSubHScroll1_Change()

Text1.Text=HScroll1.Value

EndSub

設(shè)置計(jì)時(shí)器的時(shí)間間隔可以通過(guò)(

)屬性來(lái)實(shí)現(xiàn)。

A:TextB:MaxC:InterValD:Value

答案:InterVal

第八章測(cè)試

下面關(guān)于順序文件的說(shuō)法中正確的是（）

A:可通過(guò)編程對(duì)文件中的某條記錄進(jìn)行修改B:文件的組織結(jié)構(gòu)復(fù)雜C:每條記錄的長(zhǎng)度必須相同D:數(shù)據(jù)只能以ASCII碼形式存放在文件中，可通過(guò)文本編輯軟件顯示

答案:數(shù)據(jù)只能以ASCII碼形式存放在文件中，可通過(guò)文本編輯軟件顯示

如果從數(shù)據(jù)文件INPUT.DAT中讀取數(shù)據(jù)時(shí),以下打開(kāi)文件方式中,正確的是（）

A:OPENINPUT.DATFOROUTPUTAS#1B:OPEN"I",#1INPUT.DATC:OPEN"INPUT.DAT"FORINPUTAS#1D:OPENINPUT.DATFORINPUTAS#1

答案:OPEN"INPUT.DAT"FORINPUTAS#1

執(zhí)行語(yǔ)句Open"Tel.dat"

ForRandomAs#1Len=50后