vb程序设计教程_第三版_龚沛曾_课后答案

习题二1.对象指现实世界中的实体。每个对象有自己的特征(属性)、行为(方法)和发生在该对象上的活动(事件)。类是对同一种对象的集合与抽象。类包含所创建对象的属性数据，以及对这些数据进行操作的方法。封装和隐藏是类的重要特性，将数据结构和对数据的操作封装在一起，类的内部实现细节对用户来说是透明的。VB工具箱中的可视图标是VB系统设计好的标准控件类。通过将控件类实例化，得到真正的控件对象。在窗体上画一个控件，就将类转换为对象，创建了一个控件对象。VB中常用的对象是控件。此外，VB还提供了系统对象。窗体是个特例，它既是类也是对象。当向一个工程添加一个新窗体时，实质就由窗体类创建了一个窗体对象。对象的三要素：属性、事件和方法。属性：存放对象的数据(决定对象外观及功能)对象属性的设置方法：在设计阶段，利用属性窗口直接设置属性值；程序运行时，通过语句[对象名.]属性名=属性值。若属性只能在设计阶段设置，在程序运行阶段不可改变，称为只读属性。事件：发生在对象上的事情。同一事件，对不同的对象，会引发不同的反应。事件过程：应用程序处理事件的步骤。应用程序设计的主要工作就是为对象编写事件过程的代码。方法：面向对象的程序设计语言，为程序设计人员提供了一种特殊的过程和函数。方法是面向对象的，调用时一定要指明对象。2.窗体和控件具有的基本属性“(1)Name属性：名称所创建的对象名称,在程序中引用。(2)Caption属性：标题该属性决定了对象上显示的内容。(3)Height、Width、Top和Left属性决定对象的大小和位置。(4)Enabled属性：对象是否允许操作(5)Visible属性：对象是否可见(6)Font属性组：文本的外观FontName字体、FontSize大小FontBold粗体、FontItalic斜体FontStrikethru删除线FontUnderline下划线(7)ForeColor属性：前景颜色(8)BackColor属性：背景颜色(9)MousePointer属性：鼠标指针类型,设置值范围0～15，由系统指定。若为99，由用户提供的图形文件定义鼠标指针形状。(10)MouseIcon属性：在MousePointer属性值为99时，存放自定义的鼠标图标文件（.ico或.cur）。图标库在Graphics目录下。3.窗体的事件：Load事件是在窗体被装入工作区时触发的事件。当应用程序启动，自动执行该事件，该事件通常用来在启动应用程序时对属性和变量进行初始化。窗体的方法:（1）Print方法用来显示文本内容，格式：[对象.]print表达式（2）Cls方法清除运行时在窗体或图形框中产生的文本或图形,Cls方法不能清除窗体在设计时的文本和图形。格式：[对象.]cls（3）Move方法可移动窗体或控件，并可改变其大小。语法格式如下：[对象.]Move左边距离[,上边距离[,宽度[,高度]]]4.标签作用：用于显示文本(输出)信息，不能作为输入信息的界面。其内容只能通过Caption属性设置或修改，不能直接编辑。5.文本框是一个文本编辑区域，可以在该区域输入、编辑、修改和显示正文内容。在VB中字符长度以字为单位，也就是一个西文字符与一个汉字都是一个字，长度为1。重要属性(1)Text显示或输入的正文内容。(2)Maxlength设置文本框可输入的文字最大长度。默认值为0，表示可以输入任意长字符串。(3)MultiLine多行属性设置为True时，文本框可以输入或显示多行正文，同时具有文字处理器的自动换行功能，按Enter键可插入一空行。(4)ScrollBars滚动条属性0-None无滚动条1-Horizontal水平滚动条2-Vertical垂直滚动条3-Both同时加水平和垂直滚动条注意：当MultiLine为True时，ScrollBars才有效(5)PassWordChar设置显示文本的替代符。例如，当设置为“*”，则在文本框输入的内容均以“*”显示，而存储的值是用户输入的原文。一般用于设置口令的输入。当MultiLine为True时，该属性不起作用，密码不允许多行。(6)Locked指定文本控件是否可被编辑，默认值为False(可编辑)，当设置为True时，文本控件相当于标签控件的作用。注意：Locked与Enabled的区别。(7)文本内容进行选择操作的三个属性SelStart选定的正文开始位置SelLength选定的正文长度SelText选定的正文内容这3个属性互相关联,例如设置SelStart、SelLength后，SelText自动存放指定的文本。注意：属性窗口中没有这三个属性，只能在程序代码中使用。6.文本框的事件：(1)Change事件：当Text属性值发生改变时引发该事件(2)KeyPress事件：按下并且释放键盘上的一个键时，引发焦点所在控件的KeyPress事件，所按键的值存放在参数KeyAscii中。对回车的判断KeyAscii=137.文本框最有用的方法是SetFocus，把光标移到指定的文本框中。8.命令按钮Picture属性：按钮可显示图片文件(.bmp和.Ico)，当Style为1时有效。10.启动窗体时将命令按钮定位在窗体中央的代码PrivateSubForm_Load()Command1.Left=Form1.ScaleWidth/2-Command1.Width/2Command1.Top=Form1.ScaleHeight/2-Command1.Height/2EndSub11．vb图片文件在C:\ProgramFiles\MicrosoftVisualStudio\Common\Graphics文件夹。安装VB时可选择是否安装这些图片文件。习题三1.合法常量：(1)Double(2)错误(3)Double(4)Double(5)错误(6)Integer(7)String(8)String(9)Date(10)Double(11)错误（汉字字符）(12)Integer(八进制)(13)错误（八进制无数码8）(14)Integer(15)Boolean(16)错误(17)错误（十六进制无数码g）(18)Single说明：浮点型变量默认为Double类型而非Single。2.合法变量名：(1)√(2)√(3)误：数字开头(4)误：含空格(5)误：关键字(6)√(7)误：关键字(8)误：有括号(9)√(10)√(11)√(12)√（汉字字符可作为变量名，但不常用，且此名称易误解）变量命名规则见P.41-42。字母（汉字）开头，字母（汉字）、数字、下划线组成，长度为1-255个字符；关键字不可作为变量名，但可在变量名中嵌入关键字；不区分大小写。常量、数组、类型、函数、过程、对象命名规则与此相同。常量名通常全用大写。3.写VB表达式(1)Abs(x+y)+z^5(2)(1+x*y)^6(3)(10*x+Sqr(3*y))/(x*y)(4)(-b+Sqr(b^2-4*a*c))/(2*a)(5)1/(1/r1+1/r2+1/r3)(6)Sin(45*3.14159/180)+(Exp(10)+Log(10))/Sqr(x+y+1)4.根据条件写表达式(1)随机产生大写字母Chr(Int(Rnd*(Asc(L)-Asc(C)+1)+Asc(C)))(2)[100,200]内的随机数Int(Rnd*101)+100(3)点(x,y)位于第一或第三象限x0Andy0Orx0Andy0或x*y0(4)x是5或7的整数倍xMod5=0OrInt(x/7)=x/7(5)将两位整数x的个位与十位对换x\10+(xMod10)*10(6)四舍五入取两位小数Round(x,2)(7)字符变量C是字母字符（不区分大小写）——准确地说是：字符变量C的第一个字符是字母C=AAndC=ZOrC=aAndCz或UCase(C)=AAndUCase(C)=Z或LCase(C)=aAndLCase(C)=z(8)字符变量S第5个字符起取6个字符Mid(S,5,6)(9)10≤x＜2010=xAndx20(10)x，y至少有一个小于zxzOryz(11)x，y都大于zxzAndyz5.写表达式的值(1)188——注意运算的优先级顺序，以及整除运算“\”的计算(2)200100——计算100+100时，由于两个操作数类型不同，在可能的情况下自动采用精度较高的类型，即把字符型转换为数值型，100+100得到200；然后进行字符串连接运算200&100，再自动将两个数值转换为字符串，得200100。(3)68.56——在四舍五入函数产生之前，这就是四舍五入的计算方法(4)876554——先进行字符串的“+”运算，再转换成数值。在变量名和函数名后可加上类型符，以强调其类型，但不是必须的。(5)2000-2-29(6)66．Shell函数调用i=Shell(mspaint.exe,1)'启动画图i=Shell(C:\ProgramFiles\MicrosoftOffice\OFFICE11\winword.exe,1)'启动Word说明：“画图”是Windows本身提供的程序，可以省略路径。8.答：单精度浮点型习题四2.赋值语句的错误（1）10x不能做变量名。上机验证结果：VB将10识别为行号，x=Sin(x)+y是为变量x赋值。故无语法错误。（2）Sqr函数的参数为负数。上机验证结果：“无效的过程调用或参数”（3）赋值号左边不是变量名。上机验证结果：“缺少子程序、函数或属性”（4）除数为0上机验证结果：“溢出”。4.[答案略]说明：小数位可以使用四舍五入函数Round或输出格式函数Format。例如Round(x,2)和Format(x,“0.00”)均可使结果只保留两位小数。但如果四舍五入后要进行数值运算，则使用Round函数，例如z=Round(x,2)+Round(y,2)。而Format函数通常只用于输出格式设置。6．指出错误（1）“≥”应改为“=”，前者是中文字符，不具有运算功能。（2）“10x20”应改为“10xAndx20”，否则运行结果错误。7．写条件语句（1）DimcAsStringc=InputBox(c=)IfMid(c,3,1)=CThenMsgBoxYesElseMsgBoxNoEndIf（2）#使用If语句DimxAsSingle,yAsSinglex=Val(InputBox(x=))Ifx20Theny=x^2+3*x+2ElseIfx=10Theny=Sqr(3*x)-2ElseIfx0Theny=1/x+Abs(x)EndIfPrinty=;y#使用SelectCase语句DimxAsSingle,yAsSinglex=Val(InputBox(x=))SelectCasexCaseIs20y=x^2+3*x+2CaseIs=10y=Sqr(3*x)-2CaseIs0y=1/x+Abs(x)EndSelectPrinty=;y（3）#使用If语句DimxAsSingle,yAsSingle,zAsSingle,MaxAsSinglex=Val(InputBox(x=))y=Val(InputBox(y=))z=Val(InputBox(z=))Max=xIfyMaxThenMax=yIfzMaxThenMax=zPrintMax=;Max#使用IIF函数x=Val(InputBox(x=))y=Val(InputBox(y=))z=Val(InputBox(z=))Max=IIf(xy,x,y)Max=IIf(zMax,z,Max)PrintMax=;Max9.计算循环次数（1）6（2）19（3）0（4）死循环直至溢出10.40号语句执行4次；第50号语句执行12次；执行第90号语句输出的结果是：13，0，2说明：该程序为嵌套循环，其中外循环由j值变化（1，4，7，10）控制执行4次，当j值为13时结束循环；内循环由k