《VB实验报告.doc》由会员分享，可在线阅读，更多相关《VB实验报告.doc（14页珍藏版）》请在金锄头文库上搜索。
1、VB程序设计实验单元一实验报告专业班级： 姓名 学号 2 指导教师： 王云侠 完成时间： 3月22日 实验 一VB环境和可视化编程基础一、 实验目的1 了解Visual Basic的安装2 掌握启动与退出Visual Basic3 掌握建立、编辑和运行一个简单应用程序的全过程4 掌握基本控件的使用二、实验环境 VB6.0三、实验内容1、编写一程序，在文本框中统计在该窗口上鼠标单击的次数。 提示：对窗口编写两个事件：Form_Load事件对文本框初值设为空；Form_Click事件对文本框计数。 对文本框计数：Text1=Val(text1)+1 。2、命令按钮、字号、内容和格式的复制练习。按钮
2、1：使得Text1中的文本按要求改变。 按钮2：将Text1中选定的文本复制到Text2. 控件名属性Form1Caption=”实验2”Label1复制文本Label2输入文本Text1Text=“VB功能强大，但要下功夫学习才能学好。” （每个同学文本框中内容可以不同）Text2Text=”Command1Caption=”隶书25磅”Command2Caption=”复制=”四、实验步骤1、编写一程序，在文本框中统计在该窗口上鼠标单击的次数。从运用中点击vb6.0经典版 打开标准 EXE 建立一个form 1 添加一个Label和TextBox，Label的caption改为“你单击窗体
3、的次数”，TextBox的text改为空，然后编写代码如图点击运行即可。2、命令按钮、字号、内容和格式的复制练习。从运用中点击vb6.0经典版 打开标准 EXE 建立一个form 1 添加两个Label两个TextBox两个CommandButton，Label的caption改为“输入内容”和“复制效果”，TextBox的text改为“任意文字”和“空”，CommandButton的caption改为“隶书25磅”和“复制=”。并且左面的Label改为如图代码如图点击运行即可五、实验结果1. 2.六、实验体会 VB很有意思 实验二 VB语言基础和顺序结构一 、实验目的1、掌握正确书写表达式、
4、赋值语句的规则2、掌握常用函数的使用3、掌握MsgBox与InputBox的使用4、掌握Print和Format的使用二、 实验环境 VB6.0三、 实验内容1、输入半径的值，分别计算并输出圆的面积、圆的周长和球的体积。2、随机产生一个3位正整数，然后逆序输出，产生的随机数与逆序数同时显示。例如735,输出537.提示：利用“Mod”和“”将一个3位数分离出3个1位数，然后连接成一个逆序的3位数。四、实验步骤从运用中点击vb6.0经典版 打开标准 EXE 建立一个form 1 添加两个CommandButton，CommandButton的caption改为“参数输入半径计算结果”和“随机数及
5、逆序”。然后输入代码如图 运行即可五、实验结果六、实验体会 666实验三 选择结构一、实验目的1、 掌握逻辑表达式的正确书写形式。2、 掌握单分支与双分支条件语句的使用。3、 掌握多分支条件语句的使用。4、 掌握情况语句的使用及其与多分支条件语句之间的区别。二、实验环境 VB6.0三、实验内容1、 输入3个整数，输出最大的数。2、 输入一个三位数，判断是否为水仙数。水仙数的特点：个位数、十位数和百位数的立方和等于该数自身的数。3、 输入一个112的月份数字，显示这个月份是第几季度。4、 实验步骤1.输入3个整数，输出最大的数。从运用中点击vb6.0经典版打开标准 EXE 建立一个form 1
6、添加4个TextBox的text都改为“空”，添加一个Label的将Label中的文字改成“输入三个整数”；添加一个CommandButton将CommandButton改成“输出最大值” 输入代码如图运行即可2. 输入一个三位数，判断是否为水仙数。水仙数的特点：个位数、十位数和百位数的立方和等于该数自身的数从运用中点击vb6.0经典版打开标准 EXE 建立一个form 1 添加一个Label；一个TextBox；一个commandButton；将Label中的caption改成“输入一个三位数判断是否为水仙花”；将TextBox中的text改为“文字清空”将commangButton中的caption改成“判断”输入代码如图运行即可3.输入一个112的月份数字，显示这个月份是第几季度。从运用中点击vb6.0经典版打开标准 EXE 建立一个form 1 添加一个Label；一个TextBox；一个commandButton；将Label中的caption改成“月份”；将TextBox中的text文字清空；将commandButton的caption改成转换；输入代码运行即可五、实验结果1.2.3.六、实验体会 VB有的好难
