



全文預(yù)覽已結(jié)束
下載本文檔
版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1.VB提供了結(jié)構(gòu)化程序設(shè)計(jì)的三種基本結(jié)構(gòu),三種基本結(jié)構(gòu)是( )2.下面程序段運(yùn)行后,顯示的結(jié)果是( )Dim xif x then print x else print x+1(A)1 (B)0 (C)-1 (D)顯示出錯(cuò)信息3.對(duì)于語(yǔ)句if x=1 then y=1,下列說(shuō)法正確的是( )(A)x=1和y=1均為賦值語(yǔ)句(B)x=1和y=1均為關(guān)系表達(dá)式(C)x=1為關(guān)系表達(dá)式,y=1為賦值語(yǔ)句(D)x=1為賦值語(yǔ)句,y=1為關(guān)系表達(dá)式4.用If語(yǔ)句表示分段函數(shù)f(x)=sqr(x+1),x=1; f(x)=x*x+3,x=1 then f= sqr(x+1) f=x*x+3 (B) if x=1 then f= sqr(x+1) if x=1 then f=sqr(x+1) Else f= x*x+3 end if (D) if xy,x,y) (B) If xy then Max =x else Max=y(C)Max=x if y=x then max =y(D)Ify=xthenmax=y max = x8.下面if語(yǔ)句統(tǒng)計(jì)滿足性別為男、職稱為副教授以上、年齡小于40歲條件的人數(shù),不正確的語(yǔ)句是( )A If sex=”男” and age 0 then n=n+1 B If sex=”男” and age 40 and (duty=“教授”or duty=“副教授”) then n=n+1 CIf sex=”男” and age 40 and Right(duty,2)=“教授” then n=n+1 DIf sex=”男” and age 40 andduty=“教授”Andduty=“副教授”then n=n+1 9.在窗體上畫一個(gè)名稱為Command1的命令按鈕和兩個(gè)名稱分別為Text1,Text2的文本框,然后編寫如下事件過(guò)程: Private Sub Command1_clickn=Text1.textSelect case n Case 1 to 20 X=10 Case 2,4,6 X=20 Case Is10 (C)Case Is10 and Is1011.在窗體上畫一個(gè)名稱為Command1的命令按鈕,然后編寫如下事件過(guò)程:Private Sub Command1_Click() X=InputBox(“Input”) Select Case xCase 1,3 Print “分支1”Case Is4 Print “分支2”Case Else Print “Else 分支” End SelectEnd程序運(yùn)行后,如果在輸入對(duì)話框中輸入2,則窗體上顯示的是( )12.執(zhí)行下面的程序段后,變量C的值為a=29b=33Select case b10 Case 0C=a*10+b Case 1 To 9C=a*100+b Case 10 to 99C=a*1000+bEnd SelectPrint C13下列程序段所代表的函數(shù)關(guān)系式為( )X=InputBox(“Input a number”)Select case x Case 1 to6 Y=x3+5*x2 Case Is6 Y=x+6 Case else Y=-x+5End select14. 編一程序輸入上網(wǎng)的時(shí)間計(jì)算上網(wǎng)費(fèi)用,計(jì)算的方法如下: 同時(shí)為了鼓勵(lì)多上網(wǎng),每月收費(fèi)最多不超過(guò)150元。15. 輸入三角形三條邊a,b,c的值,根據(jù)值,判斷能否構(gòu)成三角形。若能夠構(gòu)成三角形還需要顯示三角形的性質(zhì):等邊三角形、等腰三角形、直角三角形、任意三角形。完成下列程序填空,并上機(jī)調(diào)試成功sub command1_click( )dim x%,y%,z%x=val(inputbox(“input x”)y=val(inputbox(“input y”)z=val(inputbox(“input z”)if then msgbox(“能構(gòu)成三角形”) if then msgbox(“是等邊三角形”) elseif then msgbox(“是等腰三角形”) elseif sqr(x*x+y*y)=z or sqr(y*y+z*z)=x or sqr(x*x+z*z)=y then msgbox(“是直角三角形”) else endifelse msgbox(“不能構(gòu)成三角形”)endifend sub16.稅務(wù)部門征收所得稅,規(guī)定如下:(1)收入在2000元以內(nèi)的免征(2)收入在20004000之間的超過(guò)2000部分納稅3(3)收入超過(guò)4000元的,超過(guò)4000部分納稅4(4)收入達(dá)到或超過(guò)5000元的,超過(guò)5000的部分納稅5編寫一個(gè)程序,通過(guò)文本框輸入工資,計(jì)算應(yīng)繳稅費(fèi),將結(jié)果輸出到界面上。17.通過(guò)InputBox輸入一年份,判斷它是否
溫馨提示
- 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 新質(zhì)生產(chǎn)力推動(dòng)無(wú)償獻(xiàn)血事業(yè)的高質(zhì)量發(fā)展
- 化妝品市場(chǎng)未來(lái)發(fā)展趨勢(shì)預(yù)測(cè)與規(guī)劃
- 供銷職工餐廳管理辦法
- 醫(yī)療資質(zhì)銷售管理辦法
- 土壤污染治理技術(shù)
- 古詩(shī)詞賞析教學(xué)方案
- 河南酒店采購(gòu)管理辦法
- 農(nóng)業(yè)貿(mào)易采購(gòu)管理辦法
- 北京自制車位管理辦法
- 區(qū)塊鏈技術(shù)在高等職業(yè)教育中的應(yīng)用與課程體系設(shè)計(jì)
- 衛(wèi)生室安全管理制度
- 低碳生活綠色環(huán)保演示文稿
- 過(guò)盈配合壓入力計(jì)算公式
- 第八章-材料工程-倫理問(wèn)題-全
- 婚前協(xié)議(保護(hù)女方利益)
- 奉賢區(qū)教育系統(tǒng)師德師風(fēng)建設(shè)學(xué)習(xí)測(cè)試附有答案
- 扶貧農(nóng)產(chǎn)品購(gòu)銷合同協(xié)議(農(nóng)產(chǎn)品購(gòu)銷合同模板)
- 汽車維修高級(jí)工考試試題及參考答案
- GB/T 5782-2016六角頭螺栓
- GB/T 23445-2009聚合物水泥防水涂料
- GB/T 13451.2-1992著色顏料相對(duì)著色力和白色顏料相對(duì)散射力的測(cè)定光度計(jì)法
評(píng)論
0/150
提交評(píng)論