上海高中信息科技復(fù)習(xí)資料

教師：顧堅(jiān) 班級(jí): 姓名:教師：顧堅(jiān) 班級(jí): 姓名:教師：顧堅(jiān) 班級(jí): 姓名:教師：顧堅(jiān) 班級(jí): 姓名:20、下列程序中s=s+j 語(yǔ)句共執(zhí)行了多少次，最終 s的值為多少？()DimsAsInteger,iAsInteger,jAsIntegerFori=1To10Step2Forj=1To5Step2s=s+jNextjNextiA.12、36B.12 、20C.10 、20D.15 、45二、綜臺(tái)題:21、(浙江高考?2009)(每空2分)下列VB程序運(yùn)行時(shí)，在文本框 Text1中輸人數(shù)據(jù)6,在文本框Text2中輸入數(shù)據(jù)9,單擊命令按鈕Command后，文本框Text1中顯示的內(nèi)容是,文本框Text2中顯示的內(nèi)容是。PrivateSubCommand1_C1ick()DimAsInteger,bAsIntegera=Val(Text1.Text)b=Val(Text2.Text)a=a*b:b=a/b:a=a/bText1.Text=Str(a)Text2.Text=Str(b)EndSub22、填寫下面各程序段執(zhí)行之后對(duì)應(yīng)變量的值s22、填寫下面各程序段執(zhí)行之后對(duì)應(yīng)變量的值s=5Fori=3to5i=i+1s=s+1Nexti變量s的值為①（涉及的變量均已定義） （每空3分）X=5Fori=1to10Step2X=X+i\5NextI變量X的值為②DimchasStringch="A"ch=Chr(Asc(ch)+1)DimchasStringch="A"ch=Chr(Asc(ch)+1)字符變量ch的值為gDimx(3,5)asintegerFori=1to3Forj=1to5

x(i,j)=i+jNextjNexti2變量x(3,4)的值為④A=75IfA>60Theni=1IfA>70Theni=二2變量i的值為⑤ A=75IfA>90thenElselfA>80ThenElselfA>70ThenA=75IfA>60Theni=1IfA>70Theni=二2變量i的值為⑤ A=75IfA>90thenElselfA>80ThenElselfA>70Thena:=100b==20a==a+bb=二a-ba=二a-b變量a的值為6ElselfA>60ThenEndIf變量i的侑為⑦x=6y=3Ifx>yThent=xx=yy=tEndIf該程序的實(shí)現(xiàn)的功能是： 24、下面窗體模塊(如圖所示)的功能是：用隨機(jī)函數(shù)產(chǎn)生 50個(gè)不大于1000的整數(shù)存入一維數(shù)組a中，并找出這組數(shù)中最大數(shù)和最小數(shù)，分別存儲(chǔ)在變量max和min中。在橫線上填上適當(dāng)內(nèi)容。(每空4分)PrivateSubCommand1_Click()DimiAsInteger,maxAsInteger,minAsIntegerConstn=50Dima(1Ton)AsInteger' 定義數(shù)組a,大小為50個(gè)元素RandomizeFori=1Tona(i)=Int(Rnd*1000+1)' 隨機(jī)產(chǎn)生整數(shù)，并賦給數(shù)組 a(i)Nextimax=a(1)min=a(1)Fori=2TonIf Thenmax=a(i)If Thenmin=a(i)NextiTextl.Text=Str(max)Text2.Text=EndSub第24題圖VB基本運(yùn)算和語(yǔ)句專題測(cè)試參考答案選擇題（每題3分）題號(hào)12345678910答案AABCDAABCD題號(hào)11121314151617181920答案AABCDAABCD二、綜臺(tái)題：21、 9、6（每空2分）22、CD7、②8、③"B