全國計算機二級考試VB語言考試試題

第頁共頁全國計算機二級考試VB語言考試試題全國計算機二級考試VB語言考試試題全國計算機二級考試VB語言考試試題1．在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_ClickDimnumAsIntegernum=1DoUntilnum》6Printnum;num=num+2.4Loop程序運行后，單擊命令按鈕，那么窗體上顯示的內(nèi)容是〔A〕13.45.8〔B〕135〔C〕147〔D〕無數(shù)據(jù)輸出2．有如下函數(shù)：FunctionFacn(xAsInteger)AsLongDimpAsLong,iAsIntegerp=1Fori=1Toxp=p*iNextiFacn=p調(diào)用它的.事件過程如下：PrivateSubCommand1_Click()i=Val(InputBox(“請輸入數(shù)據(jù)”))a=Facn((i))‘實參i用圓括號括起，那么強迫為值傳遞Printa假設輸入數(shù)據(jù)6，那么程序運行結果為〔【73】〕〔A〕60〔B〕120〔C〕600〔D〕7203．在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_ClickDimaAsInteger,sAsIntegera=8s=1Dos=s+aa=a－1LoopWhilea<=0Prints;a程序運行后，單擊命令按鈕，那么窗體上顯示的內(nèi)容是〔A〕79〔B〕340〔C〕97〔D〕死循環(huán)4．以下程序的執(zhí)行結果為〔【74】〕DimIntSumAsInteger,iAsIntegerIntSum=0Fori=30.2To1Step-5.3IntSum=IntSum+iNextiPrintIntSum〔A〕106〔B〕105〔C〕102〔D〕5．在窗體上畫一個命令按鈕，然后編寫如下事件過程，該過程執(zhí)行結果為〔【75】〕OptionBase1PrivateSubCommand1_Click()DimaAsVariant,sAsIntegera=Array(2,4,6,8)j=1Fori=1To4Step1s=s+a(i)*jj=j*10NextiPrints〔A〕0〔B〕1110〔C〕2468〔D〕8642設有如下通用過程：PublicFunctionf(xAsInteger)DimyAsIntegerx=20y=2f=x*y6．在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_ClickStaticxAsIntegerx=10y=5y=f(x)Printx;y程序運行后，假如單擊命令按鈕，那么在窗體上顯示的內(nèi)容是〔A〕105〔B〕205〔C〕2040〔D〕10407．對窗體編寫如下代碼：OptionBase1PrivateSubForm_KeyPress(KeyAsciiAsInteger)a=Array(123,86,57,248,32)m1=a(1)m2=1IfKeyAscii=13ThenFori=2To5Ifa(i)》m1Thenm1=a(i)m2=iNextiPrintm1,m2程序運行后，按回車鍵，輸出結果為〔【76】〕〔A〕325〔B〕2484〔C〕321〔D〕2485設有如下通用過程：PublicSubFun(a,ByValxAsInteger)Fori=1To5x=x+a(i)Next8．在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕，然后編寫如下的事件過程：PrivateSubCommand1_ClickDimarr(5)AsVariantFori=1To5arr(i)=iNextn=10CallFun(arr,n)Text1.Text=n程序運行后，單擊命令按鈕，那么在文本框中顯示的內(nèi)容是〔A〕10〔B〕15〔C〕25〔D〕249．閱讀程序：FunctionFunc(aAsInteger)b=1StaticcAsIntegerb=b+1c=c+1Func=a+b+cPrivateSubCommand1_Click()DimaAsIntegera=3Fori=1to3PrintFunc(a)Nexti運行上面的程序，單擊命令按鈕后，輸出結果為〔【77】〕〔A〕6〔B〕6〔C〕6〔D〕67681386102110．在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下代碼：OptionBase1PrivateSubCommand1_Clickd=0c=10x=Array(10,12,21,32,24)For