1、 函式len(str(val("123.4")))的值為___6___。
2、當乙個picturebox控制項的autosize屬性為true時，在該控制項中載入乙個比控制項的高度與寬度都大的**時，**的大小與控制項的大小相比是__相等___。
3、執行下列程式段，輸出結果為 _____出錯_____。
dim a() as integer
dim i as integer
redim a(10)
for i = 1 to 10
a(i) = 2 * i - 1
next i
print a(4);
erase a
print a(4)
4、以下關於動態陣列的語句中，正確的是____c___。
a redim a(3,4)：redim preserve a(4,7)
b dim a() as integer：redim a(5) as single
c redim a(k+1)：redim preserve a(10)
d dim a() as integer：redim a(5) ：redim a(3,4)：a(4)=a(3)+1
5、剛建立乙個新的標準exe工程後，不在工具箱**現的控制項是___通用對話方塊 _____。
6、在下面的程式段中，迴圈體將執行___6___次。
for v=20 to 10 step -2
print v
next v
7、在下面的程式段中，迴圈體將執行____0__次。
for v=10 to 20 step -2
print v
next v
8、下面程式執行後，單擊command1後螢幕顯示是_____25 7____。
private sub command1_click()
for i = 1 to 4
if i > 3 then exit for
next i
for j = 1 to 6
i = i + j
next j
print i, j
end sub
9、在窗體上畫乙個命令按鈕，名稱為command1。單擊命令按鈕時，執行如下事件過程：
private sub command1_click()
a$ = "microsoft visual basic"
b$ = right(a$, 5)
c$ = mid(a$, 1, 9)
msgbox a$, , b$, c$, 1
end sub
則在彈出的資訊框的標題欄中顯示的資訊是___b___。
a microsoft b basic c microsoft visual basic d 1
10、在文字框text1中輸入數字12，text2中輸入數字34，執行以下語句，只有________可使文字框text3中顯示46。
a & val(
b +val(
c +
d &
11、以下敘述中錯誤的是___窗體或控制項的事件的名稱可以由程式設計人員確定____。
12、在窗體上畫乙個名稱為commondialog1 的通用對話方塊，乙個名稱為command1的命令按鈕。然後編寫如下事件過程:
private sub command1_click()
= ""
= "all file|*.*|(*.doc）|*.doc|(*.txt)|*.txt"
= 2= "vbtest"
= 1end sub
對於這個程式，以下敘述中錯誤的是
a 在該對話方塊中指定的預設檔名為空
b 該對話方塊被設定為"開啟"對話方塊
c 該對話方塊的標題為vbtest
d 在該對話方塊中指定的預設檔案型別為文字框（*.txt）
13、函式int(rnd(0)*100)是下列______範圍內的整數。
a (0,10) b [0,99] c (1,100) d [1,99]
14、\、/、mod、*四個算術運算符號中，優先順序最低的是___mod___。
15、以下關於函式過程的敘述中，正確的是
a 函式過程形參的型別與函式返回值的型別沒有關係
b 在函式過程中，過程的返回值可以有多個
c 如果不指明函式過程引數的型別，則該引數沒有資料型別
d 當陣列作為函式過程的引數時，既能以傳值方式傳遞，也能以傳址方式傳遞
16、以下關於**框控制項的說法中，錯誤的是_______。
a 可以通過print方法在**框中輸出文字
b 清空**框控制項中圖形的方法之一是載入乙個空圖形
c 用stretch屬性可以自動調整**框中圖形的大小
d **框控制項可以作為容器使用
17、設選單中有乙個選單項為"open"。若要為該選單命令設計訪問鍵，即按下alt及字母o時，能夠執行"open"命令，則在選單編輯器中設定"open"命令的方式是__把caption屬性設定為&open____。
18、程式設計輸出所有滿足下列條件的三位正整數，它除以11所得的商等於各位數字的平方和。
option explicit
private sub command1_click()
dim n as integer, r as integer, s as integer
dim p as integer, m as integer
for n = 100 to 999
p = n \ 11
m = n
s=0_________
dor = m mod 10
s = s + r * r
m=m\10_______
loop until m = 0
if ____s=p______ then print n;
next n
end sub
19、閱讀下面程式，當單擊窗體後，窗體上輸出的是___17 13 3______。
private sub form_click()
dim i as integer, k as integer
dim a as integer, b as integer
a = 5: b = 1
for i = 1 to a + b step b
i = i + 1
a = a + i
b = b + i
k = k + 1
next i
print a; b; k
end sub
20、有如下程式
a = 100
dos = s + a
a = a + 1
loop while a > 120
print a
執行後的輸出結果為___101___。
21、若形參前預設byval和byref關鍵字，系統預設為按_____位址或址或byref______遞。
22、完善下列程式，要求實現按每行5個輸出1到100之間所有的素數。
private sub form_click()
dim n as integer, i as integer
dim k as integer, flag as boolean
for n = 2 to 100
for i = 2 to sqr(n)
if n mod i = 0 then
exit for
end if
next i
if i>sqr(n) then
print n;
k=k+1
if k mod 5 = 0 then print
end if
next n
end sub
23、private sub command1_click()
dim a(20) as integer, i as integer
dim j as integer, temp as integer
print "排序前："
for i = 1 to 20
a(i) = int(rnd * 100) + 1
print a(i);
next i
for i = 1 to 19
for j = ___i+1_____ to 20
if ____a(j)>=a(i)____ then
t = a(i)
a(i) = a(j)
a(j)=t___
end if
next j
next i
print "排序後："
for i = 1 to 20
print a(i);
next i
end sub
24、執行以下程式段， 第一行輸出結果是__6 5 4 3_____，第二行輸出結果是____123___。
private sub form_click()
dim a
dim i as integer
a = array(1, 2, 3, 4, 5, 6, 7, 8, 9)
計算機VB基礎教程
vb程式設計基礎 程式語言 計算機的工作原理 儲存程式 儲存程式和程式控制 計算機只能執行預先由程式安排它去做的事情 要利用計算機來解決問題，就必須採用程式語言來編制程式 程式語言大致有三類 機器語言，組合語言，高階語言 vb概述 vb的發展過程 windows的產生，推動了windows應用程式的...
計算機二級VB
計算機二級分值分布 選擇題 40分 三道操作題 60分 考試時間 120分鐘 要求 三道操作題的得分必須在36以上且總分在60分以上，才算通過了計算機二級。選擇題 有一部分是大學計算機基礎上的知識，且做選擇題的時候，一旦交卷，不可能再檢查且也不可能調出程式而得出答案，只能靠自己演算。操作題 一般前兩...
計算機試題
一 單項選擇題 共25道試題，共100分。1.選購顯示器應優先考慮顯示器的 b 效能指標選 a.顯示器的防輻射指標 b.顯示器的頻寬 c.顯示器的重新整理率 d.顯示器的尺寸 滿分 4分 2.乙個聲音檔案採用雙聲道8位取樣精度 22k取樣頻率錄音，它的大小是5m，如果採用單聲道16位取樣精度 44k...