VB实验报告3次光电.docVIP

VB实验报告3次 实验一：实验名称: Visual Basic 基础知识练习 日期：2011-3-15 一、 实验目的 1．掌握VB 6.0启动、退出的方法，熟悉VB 6.0集成开发环境界面组成。 2．掌握Visual Basic的基本语法 3．掌握Visual Basic中的输入输出设计 4．掌握Visual Basic中的常用标准控件 二、 实验内容： 1. 输入一个秒数，转化为时分秒的形式。 2. 自由落体公式为S=1/2gt2+v0t请用InputBox输入v0及t的值，并计算出S的值。 3. 鸡兔同笼问题：已知鸡和兔的总头数为h=23，总脚数为f=56，求鸡兔各有多少只？ 三、 实验环境： 1 硬件要求：计算机（CPU: Pentium III 600MHz以上；RAM：256M以上；硬盘空间：4G以上） 2 操作系统： WindowsXP 3 软件要求：Visual Basic6.0 四、实验步骤及程序编写： 1打开visual Basic6.0 2 设计界面 3 编写代码： （1） Private Sub Command1_Click() Dim sec sec = Val(Text1.Text) Label2.Caption = sec 秒= sec \ 3600 小时 (sec Mod 3600) \ 60 分钟 sec Mod