《VB程序设计》实验单元一

《《VB程序设计》实验单元一》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、...《VB程序设计》实验单元一实验报告专业班级：姓名学号指导教师：王自强完成时间：2015年3月21日星期六实验一VB环境和可视化编程基础一、实验目的1了解VisualBasic的安装2掌握启动与退出VisualBasic3掌握建立、编辑和运行一个简单应用程序的全过程4掌握基本控件的使用二、实验环境VB6.0三、实验内容1、编写一程序，在文本框中统计在该窗口上鼠标单击的次数。提示：对窗口编写两个事件：Form_Load事件对文本框初值设为空；Form_Click事件对文本框计数。对文本框计数：Text1=Val(text1)+1。四、实验步骤1、

2、绘制Label1的caption输入“你单击窗体的次数：”2、绘制text。编程为：PrivateSubForm_Click()Text1.Text=Val(Text1.Text)+1EndSub......PrivateSubForm_Load()Text1.Text=""EndSub3、text的fontsize设置为“一号”五、实验结果《VB程序设计》实验单元一实验报告专业班级：网媒1403班姓名凌紫怡学号201424050320指导教师：王自强完成......时间：2015年3月21日星期六实验一VB环境和可视化编程基础二、实验目的1了解V

3、isualBasic的安装2掌握启动与退出VisualBasic3掌握建立、编辑和运行一个简单应用程序的全过程4掌握基本控件的使用二、实验环境VB6.0三、实验内容2、命令按钮、字号、内容和格式的复制练习。按钮1：使得Text1中的文本按要求改变。按钮2：将Text1中选定的文本复制到Text2.控件名属性Form1Caption=”实验2”Label1复制文本Label2输入文本Text1Text=“VB功能强大，但要下功夫学习才能学好。”Text2Text=””Command1Caption=”隶书25磅”Command2Caption=”复制

4、=>”四、实验步骤......1、label1的caption输入“复制效果”；label2的caption输入“输入文本”。2、绘制两个text。PrivateSubText1_Click()Text1.Text="VB功能强大，但要下功夫学习才能学好。"EndSubPrivateSubText2_click()Text2.Text=""EndSub3、以及两个Comman。dCommand1的caption输入“隶书25磅”；Command2的caption输入“复制=>”。PrivateSubCommand1_Click()Text1.Fon

5、tName="隶书"Text1.FontSize="25"EndSubPrivateSubCommand2_Click()Text2.Text=Text1.SelTextText2.FontName=Text1.FontNameText2.FontSize=Text1.FontSizeEndSub五、实验结果......实验二VB语言基础和顺序结构一、实验目的1、掌握正确书写表达式、赋值语句的规则2、掌握常用函数的使用3、掌握InputBox与MsgBox的使用4、掌握Print和Format的使用......二、实验环境VB6.0三、实验内容1、

6、输入半径的值，分别计算并输出圆的面积、圆的周长和球的体积。四、实验步骤1、绘制一个label，caption为r。2、绘制四个text，编写程序代码为：PrivateSubText1_Change()Text2.Text=""Text3.Text=""Text4.Text=""EndSub3、绘制三个command，command1的caption为“圆的面积”；command2的caption为“圆的周长”；command3的caption为“圆的体积”。编写程序代码为：PrivateSubCommand1_Click()a=3.14Text2.

7、Text=a*Text1.Text*Text1.TextEndSubPrivateSubCommand2_Click()a=3.14Text3.Text=2*a*Text1.TextEndSubPrivateSubCommand3_Click()a=3.14Text4.Text=4/3*a*Text1.Text*Text1.Text*Text1.TextEndSub五、实验结果......实验二VB语言基础和顺序结构......一、实验目的1、掌握正确书写表达式、赋值语句的规则2、掌握常用函数的使用3、掌握InputBox与MsgBox的使用4、掌

8、握Print和Format的使用二、实验环境VB6.0三、实验内容2、随机产生一个3位正整数，然后逆序输出，产生的随机数与