- 1、本文档共7页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
VB可视化编程基础实习报告
Vb可视化基础
在load事件中编程实现实习1中第2题(计算一个数的平方)的属性值的设置。(2)通过编程使得用户单击窗体时窗体的标题栏显示“你单击了窗体”,双击窗体时窗体的标题栏显示“你双击了窗体”3)通过shell函数调用Word和 EXCELLPrivate Sub Command1_Click()
Shell C:\Program Files\Microsoft Office\OFFICE11\WINWORD, vbNormalFocus
End Sub
双击EXCEL,出现代码窗口,编辑窗口代码为
Private Sub Command1_Click()
Shell C:\Program Files\Microsoft Office\OFFICE11\EXCEL, vbNormalFocus
End Sub
代码窗口:
点击运行,单击WORD按钮,启动WORD;单击EXCEL按钮,启动EXCEL。如图:
(4)生成立体字
立体字可通过对2个标题文本相同、颜色不同的标签错位重叠来实现。设计步骤:1.在窗体上添加2个标签(Label1、Label2),如图
其他属性设置放在窗体的Load事件中,在代码窗口录入代码。如图
启动窗体,运行窗体的Load事件,窗体效果如图所示:
单击Label2,Label1的Top及Left以Label2的属性值为基点而变化,两个标签重叠后,由于位置的错位及颜色的不同形成立体效果,如图
(5)p57例3-5
文档评论(0)