下载
加入VIP
  • 专属下载特权
  • 现金文档折扣购买
  • VIP免费专区
  • 千万文档免费下载

上传资料

关闭

关闭

关闭

封号提示

内容

首页 VB程序设计第三版习题答案(1-4)

VB程序设计第三版习题答案(1-4).doc

VB程序设计第三版习题答案(1-4)

song文生
2017-10-17 0人阅读 举报 0 0 暂无简介

简介:本文档为《VB程序设计第三版习题答案(1-4)doc》,可适用于高等教育领域

VB程序设计第三版习题答案()《VB程序设计基础》,第三版,习题标准答案参考答案:、简述VisualBasic的特点。答:基于对象的可视化设计工具事件驱动的编程机制提供易学易用的应用程序集成开发环境结构化的程序设计语言强大的网络、数据库、多媒体功能完备的联机帮助功能、VisualBasic有学习版、专业版和企业版~怎样知道所安装的是哪个版本,答:在启动VB的启动封面上~能显示对应的版本~见教材例、VisualBasic有多种类型的窗口~若想在设计时看到代码窗口~怎样操作,答:选择“视图代码窗口”命令或“工程资源管理器”窗口的“查看代码”按钮。叙述建立一个完整的应用程序的过程。答:a)建立用户界面的控件对象。b)控件属性的设置。c)控件事件过程及编程。d)运行和调试程序。e)保存程序。当建立好一个简单的应用程序后~假定该工程仅有一个窗体模块。试问该工程涉及多少个要保存的文件,若要保存该工程中的所有文件~应先保存什么文件~再保存什么文件,若不这样做~系统会出现什么信息,答:涉及两个文件要保存。先保存窗体文件,frm,~再保存工程文件(vbp)。若先保存工程文件~系统也会先弹出“文件另存为”对话框~要求先保存窗体文件。保存文件时~若不改变目录名~则系统默认的目录是什么,答:系统的默认目录是VB。习题二参考答案:、属性与方法的区别是什么,答:对象中的数据保存在属性中~VB程序中的对象都有许多属性~它们是用来描述和反映对象特征的参数。可以通过两种方法来设置属性:,,在设计阶段利用属性窗口直接设置对象的属性值,,,在程序运行阶段通过赋值语句实现。方法是附属于对象的行为和动作~也可以理解为指使对象动作的命令。面向对象的程序设计语言~为程序设计人员提供了一种特殊的过程~称为方法供用户直接调用~这给用户的编程带来了很大的方便。因为方法是面向对象的~所以在调用时一定要指明对象~如果省略指当前对象~一般指窗体。、如果文本框要显示多行文字~应对什么属性设置为何值,答:将该文本框的Multiline属性设置为True、标签和文本框的区别是什么,答:标签和文本框共同点都可以在窗体上显示文字。不同点在于:标签的内容在Caption属性内~在窗体上只能显示文字~不能编辑,文本框内容在Text属性内~在窗体上可直接对内容进行编辑。、要让文本框获得焦点的方法是什么,答:SetFocus、当某文本框输入数据后,按了回车键,~经判断后认为是数据输入错~应怎样删除原来文本框中的数据,答:文本框text=””在程序运行前~对某些控件设置属性值~除了在窗体中直接设置外~还可以通过代码设置~这些代码一般存放在什么事件中,如果要将命令按钮定位在窗体的中央~试写出事件过程代码。答:这些代码一般放在FormLoad()事件过程中。要将按钮定位在窗体的中央~事件过程如下:PrivateSubFormLoad()CommandLeft=FormScaleWidthCommandWidthCommandTop=FormScaleHeightCommandHeightEndSub其中~ScaleWidth、ScaleHeight表示窗体的相对宽度和高度。习题三下列哪些是VB的合法常量~分别指出其类型。,,单精度型,,非法,,E单精度型,,D双精度型,,,非法,,整型,,”ASDF”字符型,,“”非法,,##日期型,,,#双精度型,,非法,,O八进制整型,,O非法,,H十六进制整型,,True逻辑型,,T非法,,Hag非法,,!单精度型下列符号中~哪些是VB的合法变量名,,,a合法,,a合法,,a非法,,a非法,,Integer非法,,XYZ合法,,False非法,,sin(x)非法,,sinx合法,,变量名合法,,abcdefg合,法,,非法把下列算术表达式写成VB表达式。|xy|z()答:Abs(xy)z^(xy),,答:(x*y,^xy,,xy答:(*xSqr(*y))xy,,bbac()a答:(–bsqr(b^*a*c))(*a),,rrr答:(rrr)eln,()sinxy答:sin(*)(exp()log())sqr(xy)根据条件写出相应的VB表达式。,,产生”C”~”L”范围内的一个大写字符。答:Chr(int(Rnd*))()产生~,包括和,范围内的一个正整数。答:Int(Rnd*),,已知直角坐标系中任意一点的坐标,x,y,~表示其位于第一或第三象限内。答:x*y>()表示x是或的倍数。答:xMod=orxMod=,,将任意一个两位数x的个位数与十位数对换。例如~x=,则表达式的值应为答:(xMod)*x()将变量x的值按四舍五入保留小数点后两位。例如~x的值为~则表达式的值应为。答:Round(x*),或Round(x,),,,表示字符型变量C是字母字符,不区分大小写字母,。答:Ucase(c)>=”A”AndUcase(c)<=”Z”或Lcase(c)>=”a”AndLcase(c)<=”z”()取字符型变量S中从第个字符起的个字符。答:Mid(S,,),,表示关系表达式。,x,答:x>=Andx<()x,y之一小于z。答:x<zAndy>=zOry<zAndx>=z,,x和y都大于z。答:x>zAndy>z写出下列表达式的值:,,modAsc(“A”)答:”()”答:””,,Int(*)答:()已知A$=””,求表达式Val(Left$(A$,)Mid$(A$,,))答:,,DateAdd(“m”,,##)答:##()Len(“VB程序设计”)答:VisualBasic提供了哪些标准数据类型,声明类型时~其类型关键字分别是什么,其类型符又是什么,答:见课本页表将数字字符串转换成数值~使用什么函数,判断是否是数字字符串~使用什么函数,取字符串中的某几个字符~使用什么函数,实现大小写字母间的转换~使用什么函数,答:数字字符串转换成数值~用Val()函数,IsNumeric()函数判断是否是数字字符串,Mid()函数用于取字符串中的某几个字符,Ucase()函数用于将小写字母转换成大写字母,Lcase()函数用于将大写字母转换成小写字母。(结构化程序设计的三种基本结构是什么,答:顺序结构、选择结构和循环结构。(指出下列赋值语句中的错误,包括运行时要产生的错误,。x=sin(x)y答:x错误变量名c=sqr()答:sqr(x)中自变量要求>=零cxy=c*y答:赋值符号的左边是表达式x=sin(x)(mod)答:分母不能为零(Msgbox函数和InputBox函数之间有什么区别,各自获得什么值,答:两个函数的共同之处是均显示对话框。区别:InputBox函数等待用户在文本框中输入数据~获得的是输入的字符串数据,Msgbox函数等待用户按一按钮~获得的是表示按钮的整数值~以决定程序的流向。(要使单精度变量x~y~z分别保留位、位、位小数~并在窗体上显示~应使用什么函数,如何编写对应的Print方法,答:PrintFormat(x,"")PrintFormat(y,"")PrintFormat(z,"")(语句if表达式then…中的表达式可以是算术、字符、关系、逻辑表达式中的哪些,答:可以是算术、关系、逻辑表达式。按照一般语言的规定~if后应该是关系表达式、逻辑表达式~根据其结果逻辑量是True或False决定是否执行Then后面的句子。而在VB中还可以是算术表达式~因为VB逻辑判断中~对于非值就作为True~而值作为False~因此分段函数sinxxxx,,,y,{x,可用VB语句表示为:IfxTheny,sin(x)xElsey=而不必写成Ifx<>Theny=sin(x)x指出下列语句中的错误。IfxyThenprintx答:“”应写成“>=”If<x<thenx=x答:VB中表示x的范围“<x<”应写成“<xandx<”Ifc>=〝A〞andc<=〝Z〞thenPrint〝大写字母〞ElseIfc>=〝a〞andc<=〝z〞thenPrint〝小写字母〞Endif答:“ElseIf”之间不能有空格~即应写成“ElseIf”(按照下列条件~写出相应的条件语句:,,当字符型变量中第三个字符是”C”时~利用Msgbox显示“Yes”~否则显示”No”。答:IfMid(c,,)=”C”ThenMsgBox”Yes”ElseMsgBox”No”,,利用if语句、SelectCase语句两种方法计算分段函数:,,x,xx,,,x,,,x,y,,,|x|,,x,x,Select语句If语句PrivateSubCommandClick()PrivateSubCommandClick()x=TextText答:x=TextTextSelectCasexIfx>ThenCaseIs>y=x*x*xy=x*x*xElseCaseIs<y=Sqr(*x)y=xAbs(x)EndIfCaseElsePrintyY=Sqr(*x)EndSubEndSelectPrintyEndSub,,利用if语句和IIf函数两种方法求三个数x~y~z中的最大值并存入变量Max中。答:If语句Ifx>yThenMax=xElseMax=yIfz>MaxThenMax=zIIf函数:Max=IIf(x>y,x,y)Max=IIf(Max>z,Max,z)在多分支结构的实现中~可以用if…Then…ElseIf…Endif形式的语句~也可以用SelectCase…EndSelect形式的语句~由于后者的条件书写更灵活、简洁~是否可以完全取代前者,答:不可以。虽然selectcase…Endselect语句在条件的书写上更简洁和灵活~但是却不可以完全取代If…then…elseif…endif形式的语句。因为selectcase…Endselect语句在使用上是有一些限制的。首先~看该语句的形式:SelectCase<变量或表达式>Case<表达式列表><语句块>Case<表达式列表><语句块>…CaseElse<语句块n>EndSelect其中<变量或表达式>只能含有一个变量~任何含有多个变量的形式都是错误的。例如~要判断x~y是否在第一、第三象限内~若输入如下语句:SelectCasex~y~VB程序会显示“缺少:语句结束”。其次~在后面的Case“表达式列表”中不能出现SelectCase变量或表达式中使用的变量~也不能出现主教材上列出的四种形式以外的符号或关键字,符号是:逗号,关键字是:Is、To,。例如~上述象限的判断~若语句表示如下:SelectCasex,yCasex>Andy>Print“第一象限”Casex<Andy<Print“第三象限”EndSelect则程序有多处错误:SelectCasex,y中出现了多个变量,在Casex>Andy>中出现了变量和And逻辑运算符。上述例子只能用If的多分支结构来实现。由此可见~虽然SelectCase结构清晰~但使用受到限制~凡是对多个变量的条件判断只能用If的多分支结构来实现。(计算下列循环语句的次数ForI=ToStep答:循环次数为次。ForI=ToStep答:循环次数为次。ForI=ToStep答:不循环。步长<,循环初值<终值。ForI=ToStep答:无数次。(下列为语句标号~分别标记该语句~第句执行了几次,~第句执行了几次,~第句显示的结果是多少,Forj=ToStepFork=ToStepmk=kPrintj,kNextkNextjPrintj,k,mk答:第句执行了次。第句执行了次。第句显示的结果是。(如果事先不知道循环次数~如何用For……Next结构来实现答:只要将循环的终值设置为一个非常大的值~然后在循环体内增加If语句~判断是否达到循环结束条件。形式如下:For循环变量=To非常大的数……If达到循环结束条件ThenExitFor……Next循环变量(利用循环结构~实现如下功能:s,(i)(i),i,答:S=Fori=ToS=S,i,*,*i,Nexti分别统计中~满足的倍数、的倍数的数个为多少,答:S=S=Fori=ToIfiMod=ThenS=SIfiMod=ThenS=SNexti将输入的字符串以反序显示。如输入“ASDFGHJKL”,显示“LKJHGFDSA”。答:s=InputBox("输入字符串")Fori=Len(s)ToStepPrintMid(s,i,)Nexti(下面程序运行后的结果是什么,该程序的功能是什么,PrivateSubCommandClick()Dimx$,nn=x=""DoWhilen<>a=nModn=nx=Chr(a)xLoopPrintxEndSub答:运行后结果为~该程序的功能是将十进制数转换成二进制字符串。(下面程序运行后的结果是什么,该程序的功能是什么,PrivateSubCommandClick()Dimx,y,zx=:y=z=x*yDoUntilx=yIfx>yThenx=xyElsey=yxLoopPrintx,zxEndSub答:运行后结果为和~该程序的功能是用相减法求x~y的最大公约数和最小公倍数。(利用随机函数产生个范围内的随机数~显示它们的最大值、最小值和平均值。答:PrivateSubCommandClick()Dimi,t,Max,Min,Avr!FormFontSize=Avr=Print"随机数为:"Randomizet=Int(Rnd()*)PrinttAvr=AvrtMax=tMin=tFori=Tot=Int(Rnd()*)PrinttAvr=AvrtIft>MaxThenMax=tIft<MinThenMin=tNextiPrintAvr=AvrPrint"最大值为:"Max,"最小值为:"Min,"平均值为:"AvrPrintEndSub

用户评价(0)

关闭

新课改视野下建构高中语文教学实验成果报告(32KB)

抱歉,积分不足下载失败,请稍后再试!

提示

试读已结束,如需要继续阅读或者下载,敬请购买!

文档小程序码

使用微信“扫一扫”扫码寻找文档

1

打开微信

2

扫描小程序码

3

发布寻找信息

4

等待寻找结果

我知道了
评分:

/14

VB程序设计第三版习题答案&#40;1-4&#41;

VIP

在线
客服

免费
邮箱

爱问共享资料服务号

扫描关注领取更多福利