- 1、本文档共37页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第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.Left = Form1.ScaleWidth - Comma
您可能关注的文档
最近下载
- PDCA循环在降低采集血标本不合格率中的应用.pptx VIP
- 山东兖矿集团委培试卷.pdf VIP
- 胸痛三联征的影像学检查.pptx VIP
- 2025上半年中级软件水平考试《软件设计师(综合知识)》新版真题卷(含详细解析).docx VIP
- 亨德尔 咏叹调 我亲爱的恋人 mio caro bene罗德琳达钢琴伴奏正谱.pdf VIP
- 2025广西百色工业投资发展集团有限公司招聘27人备考题库及答案解析.docx VIP
- 许昌学院鲲鹏产业学院实训室项目.doc VIP
- 2025广西百色工业投资发展集团有限公司招聘27人笔试备考题库附答案解析.docx VIP
- 数字经济产业学院建设方案.pptx VIP
- ME8206系列_C2.0微盟原厂规格书.pdf VIP
文档评论(0)