阅读程序写结果题型总结与解法小议

阅读程序写结果题型总结与解法小议

ID:35510105

大小:56.52 KB

页数:10页

时间:2019-03-25

阅读程序写结果题型总结与解法小议_第1页
阅读程序写结果题型总结与解法小议_第2页
阅读程序写结果题型总结与解法小议_第3页
阅读程序写结果题型总结与解法小议_第4页
阅读程序写结果题型总结与解法小议_第5页
资源描述:

《阅读程序写结果题型总结与解法小议》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库

1、阅读程序写结果题型总结与解法小议阅读程序写出结果是VB等级考试中的一种重要题型,考察的实际是正向思维,即给出程序,然后模拟程序执行,最后分析出结果。相对于补充代码这种考察逆向思维的题型,难度应该是比较小的。综合历年考题,我们可以将阅读程序写结果考察的知识侧重点不同分为四类,题型一:分支与循环1.单击窗体后在窗体上显示的内容是:;若将程序中的A语句与B语句位置互换,再次执行程序,单击窗体后在窗体上显示的内容是:OptionExplicitPrivateSubForm_Click()DimSumAsInteger,iAsIntegerFori=7To4Step-1SelectCaseiC

2、ase4,7Sum=Sum+i4A语句Case3,5Sum=Sum+26B语句CaseElseSum=Sum+1EndSelectNextiPrintnSum=n;SumEndSub2.在过程中有语句:ForI=N1toN2StepN3,在该循环体内有下列四条语句,其中会影响循环执行的次数。①N1=N1+I②N2=N2+N3③I=I+N3④N3=2*N3A.①②B.①②③C.③D.①②③④3.执行下面的程序,在窗体上显示的输出结果的第一行:,第二行是:OptionExplicitPrivateSubForm_Click()DimMAsInteger,NAsInteger,KAsInt

3、egerN二・3ForM=6To1StepNM=M+1N=N・MK=K+1NextMPrintKPrintNEndSub题型二:字符串处理1.执行下面的程序,在窗体上显示的输出结果的第一行是OOptionExplicitPrivateSubForm_Click()DimsAsString,iAsInteger,flagAsBooleans=nTHISISABOOK.”s=LCase(s)Printsflag=TrueFori=1ToLen(s)IfMid(s,i,1)=…Thenflag=TrueElselfflagThens=Left(s,i・1)&UCase(Mid(s,i,1)

4、)&Right(s,Len(s)・i)flag=FalseEndIfNextiPrintsEndSubKey:thisisabook.ThisIsABook.2.执行下面程序,单击命令按钮Commandl,则窗体上显示的第一行是:第二行是:,第三行是:。OptionExplicitPrivateSubCommandl_Click()DimsAsString,tAsStringDimkAsInteger,mAsIntegers=nBASICYnk=1:m=kFork=1ToLeiKs)Stepm+1t=t&Chr(Asc(Mid(s,m,1))+k)k=k+1IfMid(s,k,1)=

5、MYHThenExitForPrinttNextkPrintmEndSubKey:CCW8题型三:数组1.执行下面的程序,在窗体上显示的输出结果的第二行是:,第五行是:,第六行是:OOptionExplicitPrivateSubForm_Click()Dima(3,3)AsInteger,iAsInteger,jAsIntegerDimkAsIntegerFori=1To3Forj=1To3a(i,j)=(i・1)*3+jPrinta(i,j);NextjPrintNextiPrintk=(i・1)*3Fori=1To3Forj=1To3a(i,j)=kk=k・1Printa(i,

6、j);NextjPrintNextiEndSubKey:4569876542.运行下面的程序,从键盘上输入3,程序运行结束后,A(l,l)的值是,A(2,2)的值是,A(2,3)的值是。PrivateSubForm_Click()DimIAsInteger,JAsInteger,KAsIntegerDimA()AsInteger,NAsIntegerN=InputBox(n输入N”)ReDimA(N,N)ForI=1ToNForJ=1ToNK=K+1A(I,J)=K+10NextJNextICallSubl(A,N)PrintA(l,1);A(2,2);A(2,3)EndSubPri

7、vateSubSubl(A()AsInteger,NAsInteger)DimIAsInteger,JAsIntegerDimTAsInteger,KAsIntegerK=N+1ForI=1ToInt(N/2)ForJ=1ToN・1T=A(I,J)A(I,J)=A(K・J,I)A(K・J,I)=A(K・I,K・J)A(K=I,N+1・J)=A(J,K・1)A(J,K・1)=TNextJNextIEndSubKey:171512题型四:过程(含嵌套调用、静态

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。