资源描述：
《vb操作题（vb operation questions）》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、vb操作题（VBoperationquestions）Sichuanhighschoolprogramoperations(36points)specialsimulationquestionsFirst,theorderstructureoftheprogram(1to8questionsintheexam)1,knownsquaresidelengthAis8,thefollowingproceduresfunctionistocalculatethesquareperimeter,L.Pleasecompletethemi
2、ssingpartoftheprogram.Function,func()DimAAsSingleDimLAsSingleA=8L=_______________Func="theperimeterofthesquare"&LEndFunction2,thevariableRistheradiuscalculationofcircumferenceL(PI3.14)DimRAsSingleDimLAsSingleR=5L=_____________3,fromthekeyboardinputradiusofthecircleR,
3、theoutputcircleperimeterLandareaS,completethefollowingprocedures.Dim,R,As,Single,L,As,Single,S,As,Single_______=InputBox("inputradiusR")L=2*3.14*RS=3.14*R*RPrint"thecircumferenceofthecircleis";LPrint"theradiusofthecircleis";S4,June2012,Listudentsparticipatedintheexam
4、,whichisatopicisknown:length10,width3,high5,volumeVforcuboid,Listudentstowriteoutthefollowingincompleteprocedures.DimAAsSingleDimBAsSingleDimHAsSingleDimVAsSingleA=10B=3H=5V=___________Func=volumeofcuboidV=&VIn5andJune2012,XiaoLitookpartinanexamination.Oneofthequesti
5、onswas:thevalueoftheknownvariableawas2011,thevalueofthevariableBwas2012,andthevaluesofthevariablesAandBwereexchanged.XiaoLi'sclassmatewrotetheincompleteprogramasfollows.Function,func()DimaAsSingleDimBAsSingleDimCAsSingleA=2011B=2012_____________A=bB=tFunc="a="&A&"b="
6、&BEndFunctionIn6andJune2012,XiaoLitookpartinanexamination.Oneofthequestionswas:thevalueoftheknownvariableawas2011,thevalueofthevariableBwas2012,andthevaluesofthevariablesAandBwereexchanged.XiaoLi'sclassmatewrotetheincompleteprogramasfollows.Function,func()DimaAsSingl
7、eDimBAsSingleDimCAsSingleA=2011B=2012T=a_______________B=tFunc="a="&A&"b="&BEndFunctionIn7andJune2012,XiaoLitookpartinanexamination.Oneofthequestionswas:thevalueoftheknownvariableawas2011,thevalueofthevariableBwas2012,andthevaluesofthevariablesAandBwereexchanged.Xiao
8、Li'sclassmatewrotetheincompleteprogramasfollows.Function,func()DimaAsSingleDimBAsSingleDimCAsSingleA=2011B=2012T=aA=b_________Func=
