求高手解決vb程式試題,vb程式設計選擇題 求高手解答 !

時間 2021-10-22 09:03:43

1樓:匿名使用者

選擇題:

1.c 2.a 3.a

填空題:

1,連字元 (-)

2,rgb(255, 0, 0)

3,34,3

分析題:

b改錯題:

1, 2.

dim n as integer

n = 120

if n mod 2 = 0 then

print"它是偶數"

endif

選擇題:

1,c2,c

3,a4,d

5,a6,a

7,a8,b

9,a10,c

2樓:匿名使用者

先把你自己會做的做了,把不會做的貼出來吧。

如果這些題一題都不會做,那勸你還是先自學瞭解一下,再參加考試吧。

3樓:匿名使用者

子是getdata()

暗淡wb為工作簿

昏暗的ws表

暗淡了()作為雙

暗淡我作為整數

暗淡snum的整數

套裝wb = excel**中需要讀取的資料路徑「的workbooks.open

集ws = wb.worksheets(工作表名」)snum =「= counta(ws! c)」--- ---------------目標工作表中列出多少資料

redim a(總和)作為雙

為i = 1的snum

(i)= ws.cells(i)------------------目標工作表的c列中的資料寫入到陣列

接下來,我

高階子您可以使用mschart控制元件陣列畫成曲線。

4樓:湛覓兒

1.f1

2。順序結構,迴圈結構選擇結構

3。方法事件

4.picture1.picture = lodpicture(,放置在mypic.jpg的絕對路徑)

5 -6.passwordchar

7.multiline

標題 8.unload顯示

9.rgb(0,255,0)bf

10.100 100

11.0

12.123456

13.len(st)中(st, 1)

14.int(6 * rnd)+1(6 * rnd)+1 n(p)+ 1

15.false

16.c

17.5

18.9

19.change

20.additem

1。正確的**

尺寸a,b為整數,只要

當a <= 100

a = a + 1

b = b + a * a br />環b?2階乘函式

函式f(雙)由於雙

如果n> 0,則

f =?* f(n - 1)

其他f = 1

如果末頁功能

>計算2 +22 +222 + ...一個2222222的值m = 2222222

點心n為雙

對於i = 0?6

n = n + val(左(米,長度(m) - 我))接下來,我

答案在vb執行成功

5樓:匿名使用者

cda-33

bcca

baabdc

6樓:匿名使用者

1-3. c,a,a

1-4. -(減號) , vbred , 3 , 3

1. b

1-10 c,c,a,d,a,a,b,c,a,c

vb程式設計選擇題 求高手解答~!

7樓:悠悠__z醠

1. 如果未選定專案,那麼combobox組合框控制元件的listindex屬性值是( c )。 a.

0 b. 1 c. -1 d.

隨機數 2. 可通過下列何種屬性來設定或返回list列表框控制元件中當前選定專案的索引( a )。 a.

listindex b. listcount c. listtext d.

lisitem 3. 數學式子sin30°寫成vb表示式是( b )。 a.

sin30 b. sin(30) c. sin(30°) d.

sin(30*3.14/180) 4. 以下哪一種結構不是visual basic語言的迴圈控制結構是( b )。

a. for結構 b. select case結構 c.

while結構 d. do結構 5. 結構化程式設計由3種基本結構組成,下面屬於3種基本結構之一的是( b )。

a. 遞迴結構 b. 選擇結構 c.

過程結構 d. 輸入、輸出結構 6. 能夠實現「窗體總在最前端」介面效果的api函式是( a )。

a. setwindowpos b. setwindowapi c.

setwindowshape d. declareapi 7. 在窗體上畫兩個文字框(其name屬性分別為text1和tex12)和一個命令按鈕(其name屬性為command1),然後編寫如下事件過程:

private sub command1_click() x = 1:n=0 do while x < 100 x = x * 10 n = n + 1 loop text1.text = str(n) text2.

text = str(x) end sub 程式執行後,單擊命令按鈕,在兩個文字框中顯示的值分別為( b )。 a. 10 和0 b.

2和100 c. 3和50 d. 4和168 8.

應用程式打包後,其包檔案的字尾是( a )。 a. .

cab b. .exe c.

.ocx d. .

vbp 9. 下列可以用來儲存影象供其他物件使用的控制元件是( c )。 a.

******* b. statursbar c. imagelist d.

treeview 10. 如果僅需要得到當前系統時間,則可以使用哪個函式( a )。 a.

time b. year c. now d.

date 11. 鍵盤事件的執行順序是( b )。 a.

keypress、keydown、keyup b. keydown、keypress、keyup c. keyup、keydown、keypress d.

keyup、keypress、keydown 12. dim a(6, 6) as integer定義的陣列包含的元素個數是( b )。 a.

36 b. 49 c. 42 d.

動態變化 13. dim i as integer,則執行時變數i的初始值是( a )。 a.

0 b. 1 c. -1 d.

空值 14. 如果希望以模態方式顯示窗體form1,下列正確的語句是( c )。 a.

form1.show 0 b. form1.

show c. form1.show 1 d.

form1.show 0,1 15. 要使窗體在執行時不可改變窗體的大小並沒有最大化和最小化按鈕,通過設定可達到此要求的屬性是( b )。

a. maxbutton b. borderstyle c.

width d. minbutton 16. 在窗體上畫兩個文字框,(其name 屬性分別為text1和text2)和一個命令按紐(其name屬性為command1),然後編寫如下事件過程( b )。

private sub command1_click() x = 0 do while x < 50 x = (x + 2) * (x + 3) n = n + 1 loop text1.text = str(n) text2.text = str(x) end sub a.

1和0 b. 2和72 c. 3和50 d.

4和168 17. dim a(1 to 6, 6) as string定義的陣列包含的元素個數是( c )。 a.

36 b. 49 c. 42 d.

50 18. 將資料項「china」新增到列表框(list1中成為第一項,應使用的語句是( a )。 a.

list1.additem"china",0 b. list1.

additem"china",1 c. list1.additem"china", d.

list1.additem"1,china" 19. 在visual basic中,變數的預設型別是( a )。

a. integer b. double c.

variant d. currency 20. 與load form2等效的語句是( c )。

a. form2.load b.

form2.visible=false c. form2.

show d. form2.visible=true 21.

可通過何種屬性判斷list列表框控制元件的專案總數目( b )。 a. listindex b.

listcount c. listtext d. lisitem 22.

從一個字串中的第3個字元開始,獲取5個字元,應使用( b )。 a. len函式 b.

mid函式 c. left函式 d. right函式 23.

timer控制元件可用於後臺程序中,可在timer事件內程式設計,要停止觸發timer事件,需要設定的屬性是( a )。 a. interval=0或enabled=false b.

interval=0或visible=false c. visible=false =false 或enabled=false d. interval=0且enabled=false 24.

關於語句行,下列說法正確的是( b )。 a. 一行只能寫一條語句 b.

一條語句可以分多行書寫 c. 每行的首字元必須大寫 d. 長度不能超過255個字元 25.

按照變數的作用域可將變數劃分為( b )。 a. 公有、私有、系統 b.

全域性變數、模組級變數、過程級變數 c. 動態、常數、靜態 d. public、 private、 protected

vb試題,求高手解答,VB試題,求高手解答

速採納,答題進行中!private sub command1 click 第一題 2 1 2n 2n 1 dim i as long,n as integerdo while true n inputbox 請輸入一個整數,數值請小於5 if isnumeric n then exit doloop...

求VB試題答案 1 ,求VB考試答案

試試,不知道能答對幾道題 呵呵 2c4a 5b6d 7c8a 9a11d 12d13c 14b17b 18c19a 20a22a 24d25a 求vb 一1 對 2 錯3 兩者bai都是合法的,但du含義不zhi同 4 dao錯 5 是6 對 7 錯8 錯專 9 錯10 錯 二 屬 1 c fram...

關於VB程式設計的問題 高手請進,急求一個VB的問題!高手請進。

加一個文字框text1,一個按鈕command1private sub command1 click if trim text1.text thenmsgbox 請輸入數字 text1.setfocus else msgbox val trim text1.text 100 米 left cstr ...