首页 VB程序设计教程课后答案

VB程序设计教程课后答案

举报
开通vip

VB程序设计教程课后答案VB程序设计教程课后答案 习题一 习题二 1.对象指现实世界中的实体。每个对象有自己的特征(属性)、行为(方法)和发生在该对象上的活动(事件)。 类是对同一种对象的集合与抽象。类包含所创建对象的属性数据,以及对这些数据进行操作的方法。封装和隐藏是类的重要特性,将数据结构和对数据的操作封装在一起,类的 设置值范围0,15,由系统指定 。若为99,由用户提供的图形文件定义鼠标指针形状。 (10) MouseIcon属性:在MousePointer属性值为99时,存放自定义的鼠标图标文件(.ico或.cur)。...

VB程序设计教程课后答案
VB程序设计教程课后答案 习题一 习题二 1.对象指现实世界中的实体。每个对象有自己的特征(属性)、行为( 方法 快递客服问题件处理详细方法山木方法pdf计算方法pdf华与华方法下载八字理论方法下载 )和发生在该对象上的活动(事件)。 类是对同一种对象的集合与抽象。类包含所创建对象的属性数据,以及对这些数据进行操作的方法。封装和隐藏是类的重要特性,将数据结构和对数据的操作封装在一起,类的 设置值范围0,15,由系统指定 。若为99,由用户提供的图形文件定义鼠标指针形状。 (10) MouseIcon属性:在MousePointer属性值为99时,存放自定义的鼠标图标文件(.ico或.cur)。图标库在Graphics目录下。 3.窗体的事件:Load事件是在窗体被装入工作区时触发的事件。当应用程序启动,自动执行该事件,该事件通常用来在启动应用程序时对属性和变量进行初始化。 窗体的方法:(1)Print方法 用来显示文本Cls方法不能清除窗体在设计时的文本和图形。 格式:[对象.]cls (3)Move方法 可移动窗体或控件,并可改变其大小。 语法格式如下: [对象.]Move 左边距离[,上边距离[,宽度[,高度]]] 4.标签作用:用于显示文本(输出)信息,不能作为输入信息的界面。其显示或输入的正文 多行属性 设置为True时,文本框可以输入或显示多行正文,同时具有文字处理器的自动换行功能,按Enter键可插入一空行。 (4) ScrollBars 滚动条属性 0-None 无滚动条 1-Horizontal 水平滚动条 2-Vertical 垂直滚动条 3-Both 同时加水平和垂直滚动条 注意:当MultiLine为True时,ScrollBars才有效 (5) PassWordChar 设置显示文本的替代符。例如,当设置为“*”,则在文本框输入的指定文本控件是否可被编辑,默认值为False(可编辑),当设置为True时,文本控件相当于标签控件的作用。 注意:Locked与Enabled的区别。 (7)文本 选定的正文开始位置 SelLength 选定的正文长度 SelText 选定的正文 内容 财务内部控制制度的内容财务内部控制制度的内容人员招聘与配置的内容项目成本控制的内容消防安全演练内容 这3个属性互相关联,例如设置SelStart、SelLength后,SelText 自动存放指定的文本。 注意:属性窗口中没有这三个属性,只能在程序代码中使用。 6.文本框的事件:(1) Change事件:当Text属性值发生改变时引发该事件 (2) KeyPress事件:按下并且释放键盘上的一个键时,引发焦点所在控件的KeyPress事件,所按键的值存放在参数KeyAscii中。对回车的判断 KeyAscii=13 7.文本框最有用的方法是SetFocus,把光标移到指定的文本框中。 8.命令按钮 Picture属性:按钮可显示图片文件(.bmp和.Ico),当Style为1时有效。 10. 启动窗体时将命令按钮定位在窗体中央的代码 Private Sub Form_Load() Command1.Left = Form1.ScaleWidth / 2 - Command1.Width / 2 Command1.Top = Form1.ScaleHeight / 2 - Command1.Height / 2 End Sub 11(vb图片文件在 C:\Program Files\Microsoft Visual Studio\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个字符;关键字不 可作为变量名,但可在变量名中嵌入关键字;不区分大小写。 常量、数组、类型、函数、过程、对象命名规则与此相同。常量名通常全og(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)位于第一或第三象限 x > 0 And y > 0 Or x < 0 And y < 0 或 x * y > 0 (4) x是5或7的整数倍 x Mod 5 = 0 Or Int(x / 7) = x / 7 (5) 将两位整数x的个位与十位对换 x \ 10 + (x Mod 10) * 10 (6) 四舍五入取两位小数 Round(x, 2) (7) 字符变量C是字母字符(不区分大小写)——准确地说是:字符变量C的第一个字符 是字母 C >= "A" And C <= "Z" Or C >= "a" And C < "z" 或 UCase(C) >= "A" And UCase(C) <= "Z" 或 LCase(C) >= "a" And LCase(C) <= "z" (8) 字符变量S第5个字符起取6个字符 Mid(S, 5, 6) (9) 10?x,20 10 <= x And x < 20 (10) x,y至少有一个小于z x < z Or y < z (11)x,y都大于z x > z And y > z 5. 写表达式的值 (1) 188 ——注意运算的优先级顺序,以及整除运算“\”的计算 (2) 200100 —— 计算100 + "100"时,由于两个操作数类型不同,在可能的情况下自动采用精度较高的类型,即把字符型转换为数值型,100 +100 得到200;然后进行字符串连接运算200 & 100 ,再自动将两个数值转换为字符串,得200100。 (3) 68.56 ——在四舍五入函数产生之前,这就是四舍五入的计算方法 (4) 876554 ——先进行字符串的“+”运算,再转换成数值。在变量名和函数名后可加上类型符,以强调其类型,但不是必须的。 (5) 2000-2-29 (6) 6 6(Shell函数调用 i = Shell("mspaint.exe", 1) „启动画图 i = Shell("C:\Program Files\Microsoft Office\OFFICE11\winword.exe", 1) „启动Word 说明:“画图”是Windows本身提供的程序,可以省略路径。 8. 答:单精度浮点型 第7,9题答案在教材中找。 习题四 第1,3,5,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)“10<x<20”应改为“10<x And x<20”,否则运行结果错误。 7(写条件语句 (1) Dim c As String c = InputBox("c=") If Mid(c, 3, 1) = "C" Then MsgBox "Yes" Else MsgBox "No" End If (2) # 使用If语句 Dim x As Sing句 Dim x As Single, y As Single, z As Single, Max As Single x = Val(InputBox("x=")) y = Val(InputBox("y=")) z = Val(InputBox("z=")) Max = x If y > Max Then Max = y If z > Max Then Max = z Print "Max="; Max # 使用IIF函数 x = Val(InputBox("x=")) y = Val(InputBox("y=")) z = Val(InputBox("z=")) Max = IIf(x > y, x, y) Max = IIf(z > Max, z, Max) Print "Max="; Max 9. 计算循环次数 (1) 6 (2)19 (3)0 (4)死循环直至溢出 10. 40号语句执行 4次;第50 号语句执行12次; 执行第90号语句输出的结果是: 13,0,2
本文档为【VB程序设计教程课后答案】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑, 图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
该文档来自用户分享,如有侵权行为请发邮件ishare@vip.sina.com联系网站客服,我们会及时删除。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
下载需要: 免费 已有0 人下载
最新资料
资料动态
专题动态
is_637320
暂无简介~
格式:doc
大小:23KB
软件:Word
页数:0
分类:工学
上传时间:2017-10-17
浏览量:61