《vb模擬試題全套》word版

《《vb模擬試題全套》word版》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在工程資料-天天文庫。

1、第一套1．下列關(guān)于程序設計的說法正確的是（B）A、程序設計就是指示計算機如何去解決問題或完成一組可執(zhí)行指令的過程B、程序設計就是尋求解決問題的方法，并將其實現(xiàn)步驟編寫成計算機可以執(zhí)行的程序的過程C、程序設計語言的發(fā)展經(jīng)歷了機器語言、匯編語言到高級語言的過程，比較流行的高級語言是pascal、fortran、excel、c++等。D、程序設計語言和計算機語言是同一概念的兩個方面2．圖形符號“”在算法流程圖描述中表示（C）A、算法的開始或結(jié)束B、輸入輸出操作C、處理或運算的功能D、用來判斷條件是否滿足需求3．Inte

2、ger類型的變量可存的最大整數(shù)為（C）。A、256B、32768C、32767D、655364．代數(shù)表達式改成VB表達式后，錯誤的是（D）A、g*t^2/2B、g*t*t/2C、1/2*g*t^2D、gt^2/25．對于窗體，click（單擊）是它的一個（C）A、重要對象B、重要方法C、重要事件D、重要屬性6．下列變量名寫法錯誤的是（D）A、abcB、abc123C、abc_123D、123abc7．在VB中，下列（B）函數(shù)是求絕對值的。A、int（x）B、abs（x）C、sqr（x）D、gn（x）8．在VB中，

3、設置控件的大小，可改變下列（A）屬性A、height與widthB、heigth與topC、left與topD、left與width9．以下是一段vb程序：a=1b=a+1c=a+b它的基本結(jié)構(gòu)屬于（A）A、順序結(jié)構(gòu)B、選擇結(jié)構(gòu)C、循環(huán)結(jié)構(gòu)D、樹型結(jié)構(gòu)10、下列程序段運行后，Value的值為（A）x=20ifx>=10thenValue=5*xElseValue=4*xEndifA、100B、80C、90D、7011、下面是判斷變量x是不是能被5整除的偶數(shù)的程序，橫線上的邏輯表達式應為（A、B）PrivateSu

4、bCommand1_Click()DimxAsIntegerx=Val(text1.Text)If________________Thenlabel1.Caption="這個數(shù)是能被5整除的偶數(shù)"Elselabel1.Caption="這個數(shù)不是能被5整除的偶數(shù)"EndIfEndSubA、(xMod5)=0And(xMod2)=0B、xMod10=0C、xMod5=0D、xMod2=012、閱讀下面程序，單擊窗體后，在窗體上輸出的是（A）PrivateSubform_Click()DimiAsIntegerDim

5、sAsIntegers=0Fori=1To5s=s+iNextiPrints,iEndSubA、156B、s=15i=6C、65D、s=6i=513、閱讀下面程序，單擊窗體后，在文本框text1中顯示的內(nèi)容是（A）PrivateSubform_Click()Dimint1AsIntegerDimint2AsIntegerint1=1int2=0DoWhileint1<20int2=int1+int2int1=int1*(int1+1)LoopText1.Text=int2EndSubA、9B、8C、7D、614、

6、下列程序段中，循環(huán)體執(zhí)行的次數(shù)是（B）y=2dowhiley<=8y=y+yloopA、2B、3C、4D、515、設計一個程序，打印下面所示的圖案*********程序：PrivateSubForm_click()DimiAsInteger'定義i為整型變量DimjAsInteger'定義j為整型變量Fori=-3To3PrintTab(Abs(i)+5)'確定每行的起始位置Forj=1To(4-Abs(i))-1Print"*";NextjPrintNextiEndSub16、編寫程序，求的值。（x的值在程序中

7、調(diào)用inputbox函數(shù)，在彈出的標準輸入對話框中輸入）。完成所有操作后，按“ctrl+s”保存PrivateSubForm_click()DimxAsSingle'定義x為單精度型變量，由標準輸入對話框輸入DimyAsSingle'定義y為單精度型變量，值由窗體顯示x=Val(InputBox("請輸入變量x"))Ifx<=0Theny=x*x+1Elsey=x*x-x+1EndIfPrint"y=";yEndSub17、編程計算。PrivateSubForm_click()DimsAsSingle'定義s為單

8、精度型數(shù)DimiAsInteger'定義循環(huán)變量s=0Fori=1To100IfiMod2=1Thens=s+1/iElses=s-1/iEndIfNextiPrint"s=";sEndSub18、編程求：雞與兔在一個籠里，共有100條腿，40個頭，問雞有幾只？兔有幾只？PrivateSubForm_click()DimjiAsIntegerDimtuAsIntegerD