2、.-1B.0C-1D.以上都不對(duì)5-67890屬于(）類型數(shù)據(jù)。A.整型B.單精度浮點(diǎn)數(shù)C.貨幣型D.長(zhǎng)柴型6?下列變量名中正確的是（A.3SB.PrintC-SelectMyNameD.Select17?下列賦值語(yǔ)句（）是有效的。D.A.sum=sum-sumlast=y/0B.x+2=x+2C-x+y=sum以卜?的控件或方法具有輸入和輸出雙重功能的為（9.A-PrintB.TextboxC.OptionbuttonD.Checkbox若要獲得列表框屮被選屮的列表項(xiàng)的內(nèi)容，町以通過訪問（）屈性來(lái)實(shí)現(xiàn)。A.Na
3、meB.ListlndexC.ListCountD.TextPrivateSubcommand1_click()Dimm(10)Fork=1To10m(k)=11-kNextkx=5Printm(2+m(x))EndSubA.2B.3C.4D.5二、填空題(10分)1.寫出整數(shù)n能同時(shí)被13和17整除的Basic表達(dá)式。2.代碼窗口屮有兩個(gè)下拉列表框：左側(cè)是列表框，右側(cè)是過程列表框。3.寫出在字符串"VisualBasic6.0”中截取”Visual”的Basic表達(dá)式。4.函數(shù)Len(“abcdef')的返回值
4、是。5.設(shè)a=2,b=5,c=-2,d=100,貝ija>b>=cANDa=d的值為。6.要使標(biāo)簽的人小白動(dòng)與所顯示的文本相適應(yīng)，可以通過設(shè)置屬性為True來(lái)實(shí)現(xiàn)。1.若要在一行書寫多條語(yǔ)旬，則各語(yǔ)旬間應(yīng)加分隔符，VisualBasic的語(yǔ)句分隔符為。&要強(qiáng)制顯式聲明變量，使用語(yǔ)句完成。9.在VB屮，用戶定義常量使用語(yǔ)句，聲明變量使用語(yǔ)句。三、將下列數(shù)學(xué)表達(dá)式轉(zhuǎn)換為VB表達(dá)式。（6分）1.a2+2ab+b22.3.8exln〔04.2sin（450）cos（450）5.6.四、判斷題,正確打％”，錯(cuò)誤打恢”
5、（10分）1.在VB屮，控件的事件只能通過用戶的操作觸發(fā)。（）2.字符型數(shù)據(jù)以雙引號(hào)作為定界符，輸出時(shí)雙引號(hào)本身不會(huì)顯示在屏幕上。（）3.保存工程時(shí)，窗休文件和工程文件的文件名不能相同。（）4.改變控件的大小，可以使用鼠標(biāo)和鍵盤，還可以通過修改代碼。（）5.同一過程中，數(shù)紐和簡(jiǎn)單變量可以同名。（）6.VB函數(shù)中的參數(shù)可以是常量、變量、表達(dá)式，還可以是另一個(gè)函數(shù)。（）7.代碼ConstNumber1=15：Number1=10合法。（）&允許將塊lf?Then語(yǔ)句結(jié)構(gòu)中的所有語(yǔ)句都寫在一行上（）9.定義數(shù)組語(yǔ)句Di
6、ma(b)AsInteger是正確的()10.在過程調(diào)川屮，“實(shí)參表”和“形參表”屮對(duì)應(yīng)的變量名不必相同，但是變量的個(gè)數(shù)必須相等，而且實(shí)際參數(shù)的類型必須與相應(yīng)形式參數(shù)的類型相符。()五、根據(jù)題意，將下列程序補(bǔ)充完整。(16分)1.產(chǎn)生20個(gè)［10,100］之間的隨機(jī)整數(shù)，每行輸岀10個(gè)數(shù)據(jù)。PrivateSubcommand1_click()Dima(1To20)AsIntegerRandomizei=0DoWhilei<20i=i+1a(i)=()If()ThenPrinta(i);EndIfIfi=10The
7、nPrinta(i)Ifi>10ThenPrinta(i);LoopEndSub2.打印九九乘法表PrivateSubcommand1_click()Fori=1To9Forj=1To9Print()NextjPrint()EndSub1.判斷一個(gè)數(shù)是否素?cái)?shù)PrivateSubcommand1_click()x=lnputBox(H請(qǐng)輸入一個(gè)整數(shù)”)flag=1Fori=2To()IfxModi=0Thenflag=0EndIfNextiIf()ThenPrintx;”是素?cái)?shù)”ElsePrintx;”不是素?cái)?shù)”E
8、ndSub2.利用數(shù)組輸出Fibonacci數(shù)列的前15項(xiàng)。該數(shù)列的第1項(xiàng)和第2項(xiàng)為1,其余各項(xiàng)均為其前兩項(xiàng)之和。PrivateSubCommand1_Click()f(1)=1:f(2)=1Listl.AddItemf(1):Listl.Addltemf(2)Fori=3To15f(i)=()Listl.Additemf(i)NextiEndSub六、寫出下面程序的輸出
