vb試卷002期末題

2023-01-17 01:18:02 字數 4037 閱讀 9862

《vb程式設計》期末考試卷

語言基礎題(40分)

判斷題(10分)

1. 窗體的標題必須在程式啟動前確定,在程式執行過程中,窗體標題是不能改變的。

2. 變數尾部的%符號隱式宣告變數為整型。

3. 物件的top和left屬性值都必須大於或等於零。

4. 控制項陣列的每個元素都有相同的name屬性值和不同的index屬性值。

5. 框架是乙個控制項容器,可以引入圓形控制項,但不能用circle方法畫圓。

6. commondialog 物件的shows**e方法能儲存使用者指定的檔案。

7. 滾動條、文字框、inputbox函式都可用於資料輸入。

8. 當拖曳滾動條中的滾動框時,便發生滾動條scroll事件。

9. 乙個選單項也是乙個物件,它不能和當前窗體中的任何物件同名。

10. 執行語句將清除**框pic中用繪圖語句繪製的圖形。

單選題(10分)

1. 命令按鈕command1設定為不可見,應修改該命令按鈕的______屬性。

[a] visible 對 [b] valuec] caption [d] enabled

2. 通用對話方塊控制項commondialog1顯示為開啟檔案對話方塊,可以改變該控制項的哪個屬性?

[a] open [b] filename [c] action [d] filter

3. 以下哪個控制項不能做為容器控制項?

[a] formb] picturebox [c] frame [d] image

4.當設定了定時器的有關屬性後,使窗體自動向下移動的語句是哪條?

[a] move left, top + 100b] move top + 100

[c] move , top + 100d] move top = top + 100

5.水平滾動條hscroll1的largechange屬性值為100,表示________為100。

[a] 該滾動條值的最大值

[b] 拖動滾動框時滾動條值的變化量

[c] 單擊滾動箭頭和滾動框之間某位置時的滾動條值的變化量

[d] 單擊滾動箭頭時的滾動條值的變化量

6. sub 過程與function 過程最根本的區別是:

[a] 前者可以使用call 或直接使用過程名呼叫, 後者不可以.

[b] 後者可以有引數, 前者不可以.

[c] 兩種過程引數的傳遞方式不同.

[d] 前者無返回值,但後者有

7.要將shape控制項的形狀設定為圓,應該設定shape控制項的什麼屬性?

[a] nameb] caption

[c] shaped] circle

8.哪一條語句執行後將會刪除文字框text1中的文字?

[a][c]9. 以下哪個物件不能響應click事件

[a] 列表框 [b] **框 [c] 窗體d] 定時器

10. 要將窗體設定為固定大小,應該設定窗體什麼屬性?

[a] scalewidth和scaleheightb] borderstyle

[c] autosized] scalemode

填空題(20分)

1. 將數學式寫成vb表示式

2. 語句option explicit的作用是

3. 宣告乙個值為3.14的常量pi的語句為

4. 已知a=2,b=3,c=4,d=5 求表示式not a<=c or 4*c=b^2 and b<>a+c的值

5. 設x為乙個兩位數,寫出將x的個位數與十位數交換後所得兩位數的vb表示式。:

6. 命令按鈕的快捷鍵設計,可以在標題中特定的英文本母前加上符號這樣使用者通過按住alt+此字母就相當於單擊命令按鈕。

7. 在窗體**畫乙個半徑為1000的圓周為紅色的圓形,語句為 :

8. 如果在模組的宣告段中有 option base 1 語句, 則在模組中使用 dim a (5, 3 to 5 )宣告的

陣列有個元素。

9.對於檔案系統控制項,當驅動器列表框drive1中的驅動器符改變時,要使目錄列表框dir1中顯示的資料夾也作相應的改變,可以在drive1中的change事件中執行

語句。10.寫出列表框list1的下標值的取值範圍

二、程式閱讀題(20分):請在程式**的右邊寫出程式執行結果。

1.private sub form_click()

for i = 10 to 1 step -2

print space(10 - i);

for j = 1 to 2 * i-1

print "*";

next j

print

next i

end sub

寫出單擊窗體後程式的執行結果。

2.private sub form_click()

dim x as integer

static s as integer

x = val(inputbox("x="))

do while x>=0

s=s+x

x=x-1

loop

print "s=" ;s

end sub

寫出連續單擊窗體三次,第一次輸入3,第二次輸入-2,第三次輸入1,窗體上顯示的結果。

3.dim x as integer

private sub form_click()

dim z as integer

static y as integer

z=1 call abc(y,z)

print "x="; x, "y="; y, "z="; z

end sub

public sub abc(a as integer,b as integer)

a=a+1

b=b*a

x=x+1

end sub

寫出連續單擊窗體兩次後程式執行結果。

4.private sub form_click()

dim a as string,b as integer

dim sum as integer,**e as single

dim count as integer

open "c:\" for input as #1

do while not eof(1)

input #1, a, b

if left(a, 1) = "李" then

print a, b

sum=sum+b

count=count+1

end if

loop

**e=sum/count

**e=int(**e*10+0.5)/10

print 「**e=」;**e

close #1

end sub

已知在c:\檔案中資料如下:

張寇,78,李琳,80,王瀾,56,司馬,38,李曉,90,劉召,50,李名,45

寫出單擊窗體後程式的執行結果。

三、程式填空題(20分):直接在橫線上填寫遺漏的語句。

1.下列程式段是計算1+2+3!+4!+...+20!,並列印出來。

option explicit

private sub form_click()

dim s as single, j as integer

for j = 1 to 20

nfactor

s = s + f

next j

"s = "; s

end sub

sub nfactor(byval n as integer)

dim i as integer

dim temp as single

fortemp = temp* i

next i

end sub

2.下列程式段實現在標籤中自動依次顯示"中國","浙江","杭州","西湖"。

private sub form_load()

= true: = 24

= 1000

2019期末製圖試卷

2016年度第二學期期末試題 16 1 機械製圖 姓名 一 填空題 每1空1分,共25分 1 機械製圖中基本圖幅有哪五種其中a4圖紙幅的尺寸為 2 機械製圖中常用的線型有等,可見輪廓線採用 尺寸線採用線,中心線採用 3 機械製圖當中的漢字應寫成 4 圖樣中的尺寸以為單位。5 在標註直徑時,在數字前面...

2019期末試卷

2014 2015學年度第一學期素質教育期末試卷 一 填空。20分 1 第五次人口普查結果公布,中國總人口 人,改寫成以 萬 作單位的數是 人,省略 億 位後面的尾數約是 人。2 乙個八位數,最高位上是9,十萬位上是7,萬位上是1,百位上是5,其它數字上都是0,這個數寫作 讀作 3 線段有 個端點,...

2019期末試卷分析

六年級上學期期末數學試卷分析 1 試卷所依綱本及命制思路.試卷是以義務教育課程標準實驗教材六年級上冊數學課本為綱本 以基礎知識為主,沒有偏 怪 難 超崗題。總體來說,大部分試題難易適中,可以說,為這次期末測試提供了乙份相當有份量的考卷。二 題型及分值 3 題型分析.1 填空題 7 比60千克多20 ...