《2024浙江选考信息技术Vb基础专题.docx》由会员分享，可在线阅读，更多相关《2024浙江选考信息技术Vb基础专题.docx（19页珍藏版）》请在课桌文档上搜索。
1、Vb基础专题一、学问要点VisualBasic基本概念1、工程与窗体一个应用程序的总称。工程文件名的后缀是.丫比。应用程序垃终面对用户的窗口。窗体文件名的后缀是.窗体是VB设计时的名称，当它在Windows下运行后就称为窗旦。2、对象及对象的三要素1）常见的控件指针（不是控件）标签框架检一组合框水平滚动条时钟Fbli列表保形状图像财象链接与嵌入-Ir三-Zj-J-qe三11nt3口FM:OO-J-*图形枢文本框命令按钿卓选按钮列我枢在直滚动条骡动器列表枢文件列衣框直线教他控制序号控件名控件简介11.abcK静态标签）显示用户不能干脆变更的文本，般与其他控件协作运用，或者作为提示内容出现02Te
2、xtBox（文本枢）供用户输入数据，主要应用其“Text”属性，例如：Text1.Text=欢迎运用”。3Commandbutton（按钮控件）用户可以干脆更改按钮显示文本,主要事务为CliCk（鼠标单击）。4Image（图像框）用户可以在属性窗口中自定义大小与默认加载图像位置。也可以在程序运行阶段运用函数1.oadPictureO来实现。SIreICh属性值为TrUe时，图像会自动调整大小以适应图像控件的尺寸。51.istBox（列表框）用户可以从列表框中的一系列的选项中选择一个或多个选项。假如选项的数坡超过可显示的区域，列表框会自动增加滚动条。列表框可以是单列或多列的。主要事务为：DbIC
3、IiCk（鼠标双击）。（2）常用控件简介6Timer（计时器）作用是定时产生一个时钟（TilneJr）事务,利用这个事务可以定期地做一些程序处理。用户可以自行设置每个计时器的时间间隔（Interal）.一般设置计时器控件的Enabled属性为True或False来打开或关闭Timer事务的产生.（3）对象的属性对象的属性是标识一个对象的全部特征，它事实上就是对软所个类的成员变特。常用的公共属性序号属性名1Name（名称）用于设置控件的名称，这个名称是用来标识该控件。2Fon1（字体）用丁设置控件中文字的所用的字体样式，字号和特别显示方式等。3Texl（文本）用于设置可接受输入的控件中输入或显示
4、的字符串.4CaPtiOn（标题）用于设置控件的显示标题“5BaCkCOIor（背景色）背景颜色。6Width（宽度）用于设置控件的宽度。7Height（S）用于设置控件的高度。8interval（左边距）用于设置计时器的时间间隔，单位为至秒9enabled（顶边距）用于设置是否可用10ViSibIe（可视）设置控件是否可见，假如设置为FaISe则控件会消逝。属性的调用：对象名.属性名=屈性值（4）对象的方法对象的方法是指对象可以进行的操作,也就是对象的动作常见方法：print、clear、additem（5）对象响应的事务（事务驶动）事务是在某种特定状态下由系统触发的方法。事务骈动是指用VB
5、开发的应用程序的运行，是通过事务来浜动的。事务过程的一般格式如卜丁PrivateSub对象名称_事务名称（）事务响应程序代码，我们写的EndSub3、VB常量、变量:、数蛆及定义常用函数（1）常用的数据类型数据是信息的一种记录形式。在VB中,数据可以根据本身的特性分为若干种不同的类型，常见类型见下表：数据类型名说明性质Integer整数型-3276832768内的整数1.ong长整数型-2147483648-2147483647内的整数Single单精度实数型绝时值在1.401298E453.402823E38内的任何实数,有效数字约67位Double双精厦实败型绝封他在1OE-3241.79
6、E308内的（E何实数,有效数字约1415位String字符甲型一段文字与符号Boolean逻辑型判断的结果：其值为TnIC或FalsCDate日期型日期和时间（2）常量数据总是以:Ml或姬的形式出现在程序中。常量是在程序运行过程中值不变的存储单元或数据。在YB中，常量有整数括量、实数常量、字符串常量和逻辑常旬等类型.常证的定义方法：CQnSt常量名=数值假如：Consipi=3.14”，就是定义了一个常量pi,在这个程序中出现的全部pi都会被VB自动转换成3.14（3）变量变*是用来表示数据的存储区，也就是存放幽的容VB变量定义的方法：DiIn变量名As数据类型例如：DimUASlnlege
7、r,即聘a定义为整数型变量。假如定义两个或两个以上的同类型变量，可以用语句：Di三a,bAsInteger,就是定义了a,b两个整数型变量.变量定义时，变量的取名有肯定的限制，变量的名称跟对象名取名规则相同，都是由生理、数字和下划线组成,必需是字母开头,YB系统中已运用的字符不能作为变皆名，比如：DiInString.*sInteger.该语句错误，因为String是数据类型名，不能再作为变量名了4）数组变量数据是由一批同类型的变圻构成的一个序列,组成数俎的每一个变员被称为数组的元素，也称为下标变量，下标是个整数,用来指出某个元素在数组中的位置。维数组变量定义的常用形式为：Dim数组变量名（a
8、lToa2）As元素的类型二维数组变量定义的常用形式为：Dim数组变量:名（alToa2,blTob2）As元素的类型一般状况下，数的变量都接受循环语句进行赋初值.留意：注释是以英文单引号（）开头的一串文字，可以出现在程序中须要说明的位置上，通过这一串文字，对旁边的程序段进行简要的说明，增加程序的可读性.注拜对程序的执行效果没有任何彩响，程序运行时自动跳过注释.(5)常用仔标准函数愚数名函数功能应用举例函数返回值Abs(x)求绝对值Abs(-3.5)3.5lnt(x)求不大于X的圾大整数lnt(4.1)4Sqr(X)求X的算术平方根Sqrt100)IOAsc(X)字符转换为ASCIl编码Asc
9、CA)65Chr(X)ASCll编码转换为字符CM65)AVaI(X)将数字字符申转换为数值Vai(“-170”)-170Str(x)将数值转换为字符小Str(-170)4-70m(x)计一字符串的长度1.Cnrabc)3Mid(x.n.k)去字符申X中第n个字符起长度为k的子串Mid(*abcde*.3.2)CdRndO求0.D之间的一个随机数，使用之前需用RandomiZe语句初始化RandomizeA=Rnd()100+1产生一个100以内的随机数6、VB表达5:C及基本运算个表达式中可能包括更术运和、去朝篁和逻辑运算等名种基本运算，以及运郛所涉及的数捱(变量和常量)、及用标准函及等。各
10、种基本运算的符号及优先级别见下表：基本运V运W符号优先级表达式举例示例表达式的值算术运甄乘MAI2A38取负2-aa的相反值乘法33*2.57.5实效除法/35/22.5明除IH522取余数Mod55Mod2I加法+6ababftjJft减法一6a-bab的值关系运算相等=71=2False不相等O71o2True小于7I712Fakc小于等于=7IOMod2=7IO=7Fakc留意：关系运算和逗辑运算的结果只有TrUe或False,其中逻辑运算中“非”运算就是取反，比如NotTrue的结果就是False.“与”运算只有运算符的两边都是True,结果才是True.就是说表达式aAndb,只有a
11、和b都是TrUe的状况下结果才是TrUe,否则络果为Fake.“瑰”运算只要运算符的两边有一边的值是TrUe,则结果就是TrUe比如表达式aOrb,只要a、b中有一个是True,则结果就是TrUe,只有a和b都是False,结果才是False.7、依次语句、选择语句、循环语句(1)依次语句依次结构的执行依次是包上面工，依次执行。大多数状况下依次结构都是作为程序的一部分，与其他结构一起构成一个困难的程序。赋值语句赋值语句的作用是把JR值号(等号)右边表达式的计算结果存储到赋值号左边的变量或某个特定的对象属性中，其格式如下：变置名=表达式或对象名.属性名=表达式例如有语句:A=1+2*3,执行完该
12、语句就将等号右边表达式结果赋值给变留意，VB程序中，可以在一行上写一个语句，也可以在一行上写多个语句，一行上相邻两个语句之间用置曼G)分隔.(2)选择语句a、行If语句行If语句必需在行内写完.行If语句格式如下：If条件表达苴Then语句1Elso语句2或If条件表达式Then语句b,块If语句If条件表达式1Then语句块1Else语句块OEndIf多条件：If条件表达式1Then语句块1ElseIf条件表达式2Then语句块2ElseIf条件表达式nThen语句块nElse语句块OEndIf（3）循环语句a、For循环语句通过次数限制循环的计算过程。For语句主要用于循环次数已知的状况,
13、因次，也被称为计数循环。For语句的一般格式如下：For循环变量=初值To终值Step步长循环体语句块NeXt循环变量Kor语句中步长可以是正数,也可以是负数，但不行为0。默认的步长为UStepE1.gXeXt后面的循环变侬与For语句中的循环变量必福样,执行该语句时循环变显的值增加个步长值。留意,一般不要在循环体内修改循环变量的值,否则会造成循环次数的不精确，而且程序调试也特别困难.假如在循环体内强行退出循环，可用-ExitFgrw语句.b、DO循环语句通过条件限制循环的计算过程。般状况下,For语句都可以用Do语句来代替，而且在某些状况下，假如事先不知道循环应当执行的次数.但知道在什么条件
14、下须要循环，则不能用For语句而必需用DO语句。因此，Do语句的适用面比For语句要广。【）。语句的常用格式如下：DoWhile条件表达式循环体语句块l.oOP留意：假如想在Do循环语句中强行退出循环，可用“ExitDo”语句.8、解析算法解析算）是指用解析的方法找出问题的前提条件与所求结果之间关系的数学表达式，并通过.表达式的计算来实现问题求解。例如：计算以速度作匀速直线运动的一个物体，在t秒内经过的距离S,可通过公式S=Yt得到。9、枚举算法枚举算:也称穷举狂怯，就是根据问题本身的性质，一一列举该问题全部可能的解，并在逐列举的过程中，拉验每个可能解是否问题真正的解。若是，就接受这个解否则就
15、抛弃它。在列举的过程中，既不能遗漏.也不能重复.比如，要求一个二元一次不定方程的全部正整数解，就可以接受枚举算法。V-Commendl回I母序I按分Sy1(&)CMauvll*AppttrtACtI-JDBtchColorCtnctlaJooooooFtPdstOptionC4WWliCussVaTnMDfultFdj4V4t遨回/设置对象网5度，第1题-2图第1题T图1,（2024年10月.编写VB程序，实现如下功能:在文本框TeXIl和Tex12中分别输入一个整数，堆击吩咐按钮Command1.在列表框1.iStI中显示结果，运行效果如第14题T图所示。结果包含两列数据，第1列为两数之间的
16、摄氏温度值（间隔1度、升序），第2列为对应的华氏温度（1）要使吩咐按钮ConUnandl上显示的文本改为“转换”，可在其属性窗口（第14题-2图）中符属性的属性值修改为“转换（2）为实现上述功能，请在划线处填入合适代码或选项。PrivateSubCommandlClickODimtlAsInteger,t2AsIntegerDimiAsInteger,tAsIntegerDimfAsSingle1.isll.Clear11=Val（Textl.Text）t2=Val（Text2.Text）IfThen（选填字地从下列A、B,C,D四个选项中选取一项）I=tl:tl=12:12=IEndIfi=
17、tlDoWhile（选填字母,从下列A,B、C、D四个选项中选取一项）f=i*9/5+32摄氏温度转换为华氏温度1.isl1.AddItemSlr（i）+Slr（f）（填程序代码）1.oopEndSub划线、处的选项：A.i=12B.ft2D.if2,（2024年4月）编写YB程序，实现如卜功能：在文本框TeXtI中输入某一年份，单击“天干地支与生肖”按钮Commandl,在列表框1.istl中输出该年份起先的12个年份及对应的“天干地支”与“生肖”，运行界面如图所示，程序代码如下。0天干地文与生肖天干地支生肯EECAEelE=IEcr-一,一1.l-E33333333333SS蓊籁器患III
18、I22222222输入年份1995(1)代码PrivateSubCommand1_C1ick()”中的CliCk是(单选,填字母：.A.对缴名/B.屈性名/C.事务名)(2)为实现上述功能，请在划线处填入合适的代码PrivateSubComInand1.CliCkobAsIntegernAsIntegersiAsSirings2AsStrings3AsStringDimaAsInteger,DimiAsInteger,DimclsString,Dimc2AsString,Dimc3sString.1.istl.Clearsi=甲乙丙丁戊己庚辛壬癸s2=子丑寅卯辰巳午未申酉戌亥s3=鼠牛虎兔龙蛇
19、马羊猴鸡狗猪”n=Val(Text1.Text)Fori=nToa=(i+6)Mod10b=(i+8)Mod12cl=Mid(sl,a+1,1)c2=Mid(s2,b+1,1)c3=Mid(s3,b+1,1)1.isll.AddIteni+年+cl+c2+”+c3NextiEndSub(3)由上述算法可知,2024年对应的“大干地支”为3、(2024年10月)编写“加法练习题生成器”程序，实现如下功能：在文本框Textl中输入题数n.单击生成按钮Conmand1.在列表框1.istl中显示n个两数之和小于100的加法练习题。程序运行界而如图a所示。图a图b（1）在设计程序界面时，应运用图b所示
20、“限制工具箱”中的（填写相应编码）添加“生成”按钮.（2）实现上述功能的VB程序如下，请在划线处填写合适的代码。PrivateSubCOnUDand1.CliCk（）DimnsInteger,iAsInteger,aAsInteger,bAsIntegerRandomizen-Val(Text1.Text)i=DoWhilei0a=nMod2n=n2t=s=Str（八）+s待校蛉我：,7二递制值：F位值：11.oopV=tMod2Text2.Text=S1.abe13.Caption=校验位值,：”+EndSub5、（2024年11月）编“字符串生成”程序，实现如下功能：在文本框TeXtl中（
21、字符位置）输入多个正整数（以“，”为分割符和结束符），单击“生成按钮Co三三andl,程序以这些整数为位置信息，依次从文本框Text2中（字典内容）提取字符并连接成字符串，量终将字符串显示在标签1.abell中（生成内容）程序运行界面如下图所示.(1)要使程序运行时，窗体Forml标题显示“字符串生成”,可在Form1.oad事务过程中添加语句(单选，填字母：A.Forml=字符串生成/=字符串生成./C.Form1.CaPtion=字符串生成”)。(2)实现上述功能的VB程序如下，请在划线处填入合适的代码。PrivateSubCOunandlClickODimsAsString,tAsStr
22、ing,cAsStringDimiAsInteger,PAsIntegerS=:t=Fori=1To1.en(Textl.Text)c=Mid(Text1.Text,i,1)Ifc=,Thenp=Val(t)s=s+Mid(Text2.Text,p,1)Elset=EndIfNexti1.abell.Caption=EndSub（3）若文本框TeXtI中输入内容的结束符缺失（即输入内容为1,18,9.9）,单击“生成”按钮后，标签1.abCIl中显示的内容是,Jm6,（2024年4月）某种编码以4位二进制码为一组，每组前两位表示方向，后两位表示距离。编写一个程序,将编码翻译成方向和距离，距离值
23、为每组编码后两位二进制码转换为十进制数的值，详细功能如下：在文本框TeXtI中输入连续多组编码,单击“翻译”按钮COmmand1,结果显示在列表框1.iStl中。程序运行界面如右图所示。编码翻译一口X*“一(1)要使程序运行时,文本框Textl的Width属性值为2024,可在FormJoad事务过程中添加语句(单选，填字母：.Width=2024B.Text1.Width=2024/C.Width.Text1=2024).(2)实现上述功能的VB程序如下，请在划线处填入合适的代码。PrivateSubCommand1ClickODimssString,csString,dAsStringDi
24、mnAsInteger,blAsInteger,b2AsInteger,vAsInteger,iAsIntegerS=Textl.Text:n=1.en(三):i=IDoWhilei=nc=Mid(s,i,2)Ifc=00Thend=东.ElsoIfc-01Thend=询ElseIfc=10Thend=西Elsed=北EndIfbl=Val(Mid(s,i+2,1)b2=Val(Mid(s,i+3,1)v=(D1.istl.ddltemd+Str(v)I-oopEndSub1、运行下列VB程序,在文本框Textl中输入15.,界面如图所示。单击“起先”按钮Commandl后,标签1.abell
25、中显示的内容是.文本框Text2中显示的内容是.1.l_1匚口PrivateSubCommandlClickOConstX-转换成八进制数为DimyAsIntegerDimSAsStringDimrAsInteger用于存储输入的十进制自然数用于存储转换后的结果DoWhileyO0接受除八取余法y=Val(Text1.Text)r=yMod8s=Str(r)+sy=y81.oop1.abell.Ciiption=Texl1.Text+xText2.Text=sEndSub2,某地出租车计价方式如F：3公里内(包括3公里)起步价10元：超过3公里，但10公里内，则3公里内收费10元，超出部分每公
26、里2元：假如超过10公里,则10公里内收费24元,超出部分每公里3元.其程序实现如下：PrivateSubCommandlClick()x=Val(Text1.Text)Ifx=3Theny=IOElseIf(1)Theny=10+(-3)*2Elsey=(2)(21.1.abell.Caption=Str(y)EndSub请把上面程序补充完整。3、体质指数(BMl)是目前国际上常用的衡量人体胖瘦程度以及是否健康的个参考标准，其计匏公式是：体质指数(IHI)=体重身高体质指数18.518.5-26226结果偏瘦正常肥胖现耍求编写VB程序(运行界面如图所示)，实现如下功能：在文本框TeXlI中输
27、入体重(kg),文本框Text2中输入身高(m),单击“判定”按钮Command1,在标签1.abe11中输出推断结果“相应的ViSUaIBasic程序如下，请在画线处填入适当的语句或表达式，把程序补充完整：PrivateSubCommandlClickODimwAsSingle,hAsSingle,bAsSinglevr=Val(Textl.Text)h=l)b=_Ifb=26Then1.abell1Caption=肥胖”EndSub4、有如下VB程序:PrivateSubCommandlClickODimSlAsString,s2AsString,iAsInteger,chAsString
28、si=TextI.TextFori=1To1.en(si)ch=Mid(sl,i,1)IfAsc(ch)=65AndAsc(ch)0s=xMod2X=Int(x/2)y=_1.1.oopText2.Text=yEndIfEndSub(2)rtComandlClickOv中的“Click”是(选填：对象名/属性名/事务名)。9、编写VB程序，实现如下功能：在文本框TeXtI中输入一个不大于100oO的正整数n,单击“分解”按钮Cmd1,在标签1.abel2中显示n的质因数分解结果.运行界面如图a所示，程序代码如下。图a(1)代码“PrivateSubCmdlClickO”的事务过程名是五51葭虹
29、后访能，请筱西起填入合适的代码。PrivateSubCm1IfnModm=0Thenn=(DIfstl-Thenstl=Str(m)ERQ2：stl=stl+X+Str(m)EndTjElseEndIf1.oop1.abcl2.Caption=stlEndSub(3)若将程序中虚线框处代码改为stl=Str(m)+X+stl”，在文本框Textl中输入“70”,单击“分解”按钮，则在标签1.abeI2中显示的内容为10、编写VB程序,实现如卜功能：在文本框TeXtI中输入自然数n,单击“产生n个个机数,并求和与与大数计算”按钮Commandl,则在列表框1.istl中输出n个小ro的随机整数，
30、并输出n个随机数的和与最大值，界面如下图所示。（1）视察运行界面，选项中没有用到的控件是（选项A.AB.阅C.&D.国）。（2）设计该窗体界面时，须要将窗体forml的属性设置为“最大随机数”.最大的机数回x715458293178277殿78ForlForn按字母序分类序（名称）FornlAppearMCQO-FlatAutoRedrovFalseBackColorAH800000BorderStyle2-SizaUtCaPtion员大随机数ClipControlsTrue(3)请完善下列程序代码：PrivateSubConnandlClickODima(lTo10)AsIntegerDim
31、sAsIntegerDimmaxsIntegern=YaI(TeXl1.Text)i=1DoWhiIeimaxThenNexti1.ist1.AddItem”和为：”+1.istl.AddItem”最大值为：+Str(max)巩固练习1 .15转换成八进制数为172 .x=18.5andbMid(y,i,l)EndIf(3) elaeh6 .(1)Caption(2)Val(“19”+Mid(Sf,7,2)tlmod2=1(3)Text3.Text=Str(sex)7. (2)i100mod10 i=aA4+bA4+cA4+dA4 Str(COUnl)8. (1)Val(TeXt1.TeXt)0s+y(2)事务名9. (1)Cmd1.Click(2)nmm=m+l(3) 7x5x210. (1)C(2) Caption(3) i=i+l max=a(i) Str(三)
