- 1、本文档共35页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
《Visual Basic程序设计基础》教材
习题参考答案
第1章 Visual Basic 6.0程序设计概述
一、判断题
1.√ 2.√
3.× 说明:同类控件(如两个标签)相互重叠,设计时可以设置“置前”、“置后”属性。
4.√ 5.× 6.√ 7.× 8.√ 9.√ 10.× 11.√ 12.√
13.× 14.√ 15.× 16.√ 17.√ 18.√ 19.√ 20.√
二、选择题
1. C 2. B 3.D 4.C 5.B 6.A 7.D 8.A 9.B 10.A 11.C 12.D
三、填空题
1.对象、事件 2.属性、方法、事件 3.控件、屏幕(Screen)
4.对象 5.Left、Top 6.属性、对象名.属性名=表达式
7.网格 8.F orm1
9.Load或Initialize或Resize或Activate(自动执行的先后顺序也按此排列)
10.Activate、Deactivate
四、程序设计题
程序1.界面设计参看图10-1、10-2以及表10-1。
表10-1 实例2各控件的主要属性设置
控件 属性(属性值) 属性(属性值) 标签控件1 Name(Label1) Caption(我的第一个VB程序) 标签控件2 Name(Label2) Caption(请输入你的姓名) FontUnderLine(True) FontItalic(True) 命令按钮1 Name(Command1) Caption(确定(O)) 命令按钮2 Name(Command2) Caption(结束(X)) 过程设计如下:
Private sub Form_Click()
Command2.Enabled = False
Een Sub
Private Sub Command1_Click()
Label2.Visible = False
Label1.Caption = Text1.Text + : 欢迎使用 + Label1.Caption
Text1.Visible = False
Command1.Enabled = False: Command2.Enabled = True
End Sub
Private Sub Command2_Click()
End
End Sub
程序2.界面设计略,过程设计如下:
Private Sub Command1_Click() 字体变大
Form1.FontSize = Form1.FontSize + 3
Form1.Cls: Print 欢迎使用VB
End Sub
Private Sub Command2_Click() 字体变小
Form1.FontSize = Form1.FontSize - 3
Form1.Cls: Print 欢迎使用VB
End Sub
Private Sub Command3_Click() 字体加粗
Form1.FontBold = True
Form1.Cls: Print 欢迎使用VB
End Sub
Private Sub Command4_Click() 字体不加粗
Form1.FontBold = False
Form1.Cls: Print 欢迎使用VB
End Sub
运行时,不得连续、过多次单击“字体变小”按钮,因为当FontSize属性值小于0会产生适时错误。
程序3.界面设计略,过程设计如下(窗体Height值的计量包括标题、边框,而ScaleHeight值仅与窗体有效绘图区域的高度有关):
Private Sub Form_Load()
Text1.Text = Visual Basic 程序设计
End Sub
Private Sub Form_Resize()
Text1.Top = 0: Text1.Left = 0
Text1.Width = Form1.ScaleWidth/2 用 Form1.ScaleWidth效果优于用Form1. Width
Text1.Height = Form1.ScaleHeight/2 用 Form1.ScaleHeight优于用Form1. Height
Command1.Top = Form1.ScaleHeight - Command1.Height
Command1.L
您可能关注的文档
最近下载
- 作业设计研讨活动记录.doc
- 2025国家电投校园招聘笔试备考题库及答案解析.docx
- 2021-2022学年五年级上学期综合实践活动(劳动教育)第6课巧做糖画教案.docx
- 创业意识与创业技巧:了解企业登记注册流程.pptx
- 山东省淄博市2023年高一上学期《英语》期中试卷与参考答案.pdf
- 大学生职业规划大赛成长赛道 (修订).pptx
- 2018重庆市建设工程混凝土与砂浆配合比表.pdf
- WhyNothingWorks.doc VIP
- 住院医师规范化培训基地标准(2022年版)--皮肤科专业基地细则.docx
- JB∕T 2436.2-2020 导线用铜压接端头 第2部分:10mm2~300mm2导线用铜压接端头.pdf
文档评论(0)