VB可视化编程基础实习报告

VB可视化编程基础实习报告 Vb可视化基础 (1) 在load事件中编程实现实习1中第2题(计算一个数的平方)的属性值的设置。如 图 单击运行，如图 (2)通过编程使得用户单击窗体时窗体的标题栏显示“你单击了窗体”，双击窗体时窗体的标题栏显示“你双击了窗体” 新建一个空白窗体，双击窗体，进入代码窗口，默认事件是窗体的load事件。可在代码窗口的右上角事件列表框中单击所需事件，在相应的事件的过程中录入代码。 代码窗口 点击运行，单击窗体运行结果 双击窗体运行结果 (3)通过shell函数调用Word和 EXCELL 新建空白窗体，添加命令按钮command1、command2,分别修改属性为WORD、EXCEL, 双击WORD,出现代码窗口，编辑窗口代码为 Private Sub Command1_Click() WORD", Shell "C:\Program Files\Microsoft Office\OFFICE11\WIN 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个标题文本相同、颜色不同的标签错位重叠来实现。设计步骤: 、Label2),如图 1.在窗体上添加2个标签(Label1 其他属性设置放在窗体的Load事件中，在代码窗口录入代码。如图 启动窗体，运行窗体的Load事件，窗体效果如图所示: 单击Label2,Label1的Top及Left以Label2的属性值为基点而变化，两个标签 重叠后，由于位置的错位及颜色的不同形成立体效果，如图 (5)p57例3-5