vb模擬試題全套word版-資料下載頁
2025-01-09 17:40本頁面
【正文】 第五套 以下哪個(gè)是算法的描述方法？（ ） A、枚舉法 B、列表法 C、流程圖描述法 D、順序法 VB中數(shù)據(jù)類型 integer表示整型數(shù)，存儲(chǔ)為（ ）字節(jié) A、 8 B、 6 C、 4 D、 2 在 VB中，以下關(guān)于符號常量的聲明，聲明正確的是：（ ） A、 dim tag as string B、 const tag as string=”visual”+”basic” C、 const tag as string=”visual basic” D、 const tag as string 在 VB中，表達(dá)式 21 mod 4的結(jié)果是（ ） A、 5 B、 1 C、 15 D、 25 設(shè) a=2， b=3，在 VB中，表達(dá)式 ab or b=3的值是（ ） A、 false B、 true C、 1 D、 1 數(shù)字式子 2a(7+b)在 VB中的正確寫法是（ ） A、 2*a(7+b) B、 2*a*(7+b) C、 2a*(7+b) D、 2*a*7+b 在 VB中，假定有以下程序段： for I=3 to 1 print “VB” next I 則語句 print “VB”的執(zhí)行次數(shù)是（ ） A、 1 B、 2 C、 0 D、出錯(cuò) 在 VB中，以下程序段： x=0 do while x50 x=(x+2)*(x+3) loop 執(zhí)行后， x的值是（ ） A、 50 B、 72 C、 168 D、 0 在 VB中，要設(shè)置文本框的缺省文字，應(yīng)使用屬性：（ ） A、 name B、 caption C、 text D、 font 下列 VB程序運(yùn)行后，變量 x的值為（ ） x=2 print x+1 print x+2 A、 5 B、 8 C、 3 D、 2 1如要完成：從鍵盤輸入一個(gè)正整數(shù)，判斷是否是偶數(shù)，如是就在屏幕上顯示。比較好的算法是（ ） A、①輸入的數(shù)存入變量 n ② f=（ n/2=int（ n/2））③如果 f的值是 true就顯示 n的值 B、①輸入的數(shù)存入變量 n ② f=（ n/2=int（ n/2））③如果 f的值是 false就顯示 n的值 C、①輸入的數(shù)存 入變量 n ②如果 n/2=int（ n/2）成立，就顯示 n的值 D、①輸入的數(shù)存入變量 n ②如果 n/2=int（ n/2）不成立，就顯示 n的值 1求 2！ +3！ +4！ +?? +10！的值，能完成此運(yùn)算，并且比較好的算法是（ ） A、①定義求階乘的函數(shù)用 jc（ n）②主程序中用一個(gè)循環(huán) 9次調(diào)用 jc（ n）函數(shù)進(jìn)行累加 B、用一個(gè)程序完成：每一項(xiàng)階乘用一個(gè) for/next循環(huán)完成，整個(gè)程序包括 9個(gè)循環(huán) C、用解析法： s=1*2+1*2*3+?? +1*2*3*4*5*6*7*8*9*10 D、不必定義函數(shù)，只要用一個(gè)單重 循環(huán)就能完成 1向 x變量中輸入任意一個(gè)小寫字母，再將 x變量中的小寫字母轉(zhuǎn)成大寫字母。正確的算法是（ ） A、①輸入字母到 x ② x=asc（ x） 32 ③ x=chr（ x）④ print x B、①輸入字母到 x ② x=asc（ x） +32 ③ x=chr（ x）④ print x C、①輸入字母到 x ② x=val（ x） 32 ③ x=chr（ x）④ print x D、①輸入字母到 x ② x=val（ x） +32 ③ x=chr（ x）④ print x 1要求計(jì)算機(jī)打印出 100到 200之間所有偶數(shù)的平方根值，正確的算法 是（ ） A、① I=100 ② do while I200 :print I,sqr(i)。 loop B、① I=100 ② do while I200 :print I,sqr(i):I=I+1。 loop C、 for I=100 to 200 step 2:print I,sqr(i):next I D、 for I=100 to 200:print I,sqr(i):next I 1完善“判斷”按鈕的 click 程序，使當(dāng)從 text1 中輸入一個(gè)數(shù)時(shí)，當(dāng)該數(shù)大于或等于 60時(shí)在 label1中顯示“及格 ”，該數(shù)小于 60時(shí)在 label1中顯示“不及格”。 Private Sub mand1_click() Dim a As Single a = Val() If a = 60 Then = 及格 End If If a 60 Then = 不及格 End If End Sub 1請將按鈕“計(jì)算 1+2+?? +100”的 click事件程序中“常量”和“變量”換成正確的“常量”和“變量”，當(dāng)單擊命令按鈕 時(shí) text1顯示 1+2+?? +100的值。 Private Sub mand1_click() Dim a As Integer Dim i As Integer a = 0 For i = 1 To 100 a = a + i Next i = a End Sub 1對窗體 form1進(jìn)行如下修改： 1．在窗體中增加一個(gè)標(biāo)簽 2．設(shè)置標(biāo)簽的對齊方式為“居中對齊” 3．完善“顯示”按鈕程序，使當(dāng)單擊該按鈕時(shí)標(biāo)簽標(biāo)題改為“算法與程序設(shè)計(jì)”； private sub mand1_click() =”算法與程序設(shè)計(jì) ” end sub 1在已打開的窗體 form1 中，在窗體中增加一個(gè)文本框 text3，在完整按鈕中的程序，使 當(dāng)單擊“計(jì)算”按鈕時(shí)，計(jì)算 b*b4*a*c的值，并在 text3中顯示出來。 Private Sub mand1_click() Dim b As Single Dim c As Single Dim x As Single b = c = x = b * b 4 * 1 * c = x End Sub
試題試卷相關(guān)推薦
鄂ICP備17016276號-1