VB实验报告

  • 格式:docx
  • 大小:515.90 KB
  • 文档页数:16

《VB程序设计》实验单元一实验报告实验一VB环境和可视化编程基础一、实验目的1 了解Visual Basic 的安装2 掌握启动与退出Visual Basic3掌握建立、编辑和运行一个简单应用程序的全过程4掌握基本控件的使用二、实验环境VB6.0三、实验内容1、编写一程序,在文本框中统计在该窗口上鼠标单击的次数。

提示:对窗口编写两个事件:Form_Load事件对文本框初值设为空;Form_Click事件对文本框计数。

对文本框计数:Text仁Val(text1)+1 。

2、命令按钮、字号、内容和格式的复制练习。

按钮1:使得Textl中的文本按要求改变1、编写一程序,在文本框中统计在该窗口上鼠标单击的次数从运用中点击vb6.0经典版打开标准EXE建立一个form 1添加一个Label和TextBox,Label的caption改为"你单击窗体的次数",TextBox的text 改为空,然后编写T・tl Tq| - T«J|3'T H|| Tor" ■* q3 士 ________________________________ ___ _______________________________________________________________________件Fu-w.Cbwgi^T«ztl t«it * ■■ITIYWI- N# 口Eid沁J*iJ___________________ I点击运行即可。

2、命令按钮、字号、内容和格式的复制练习从运用中点击vb6.0经典版打开标准EXE建立一个form 1添加两个Label 两个TextBox 两个CommandButtor,Label的caption改为“输入内容"和“复制效果",TextBox 的text 改为"任意文字"和“空",CommandButton 的caption 改为“隶书25磅”和“复制=> ”。

并且左面的Label 改为如图DDE■ - a, XTX J^ 工上 v m T H T>Jr"WVW c d pT .bHartdv*£>T fc ojpT"ir"^3Li* V n m V 1^丁_ wT hii od 0七云弋工d_ 工1 4 七=PHTI N 化代码如图C- Z«1 - W»*1 rc*iUMI-i DzJnA ^U4:i :-u-ti r^tVMi ■T«l11 f «dl!E-l * K-$■* CHwfe/liMl-1]:«1£ ?«t • T ・±L/}«m«rl laiMRri■«-! FsnJLikiOJULM _________ - ______________________________________________________________________________________________________________________hi H «r ・ M H LikJ IJl iih >____________ 1■点击运行即可五、实验结果1.aaf S M二 0 : 畫总託71士 k 七 rl壬牛V UF fc i 4ZT J C T i an ■ 00 E5OL-i xxXT o i 0r«_Q 、O — JVT i-fc i > < ■. « ~lC3 ------------ ■Bfl' o ■_!Gh >匚I —" K Ofb JM L,珂"JUfci .2 B*J.i Llkl 绽打宙■ j a kf^i - o2.六、实验体会VB很有意思实验二VB语言基础和顺序结构、实验目的1、掌握正确书写表达式、赋值语句的规则2、掌握常用函数的使用3、掌握MsgBox与InputBox的使用4、掌握Print 和Format的使用二、实验环境VB6.0三、实验内容1、输入半径的值,分别计算并输出圆的面积、圆的周长和球的体积。

2、随机产生一个3位正整数,然后逆序输出,产生的随机数与逆序数同时显示。

例如735,输出537.提示:利用“ Mod和“”将一个3位数分离出3个1位数,然后连接成一个逆序的3位数。

四、实验步骤从运用中点击vb6.0经典版打开标准EXE建立一个form 1666添加两个 CommandButton CommandButton 的caption 改为“参数输入半径计算结果"和“随机数及逆序”。

然后输入代码如图运行即可 五、实验结果六、实验体会 ■M - 聲.理WF9 W*y・666、实验目的1、 掌握逻辑表达式的正确书写形式。

2、 掌握单分支与双分支条件语句的使用。

3、 掌握多分支条件语句的使用。

4、 掌握情况语句的使用及其与多分支条件语句之间的区别、实验环境VB6.0三、实验内容1、 输入3个整数,输出最大的数。

2、 输入一个三位数,判断是否为水仙数。

水仙数的特点:个位数、十位数和百位数的立方和等于该数自身的数。

3、 输入一个1〜12的月份数字,显示这个月份是第几季度。

四、实验步骤1.输入3个整数,输出最大的数从运用中点击vb6.0经典版Visual Sasic情筒版实验三 选择结构打开标准EXE 建立一个form 1添加4个TextBox的text都改为“空”,添加一个Label的将Label中的文字改成“输入三个整数";添加一个 CommandButton 将CommandButton 改成“输出最大值"2.输入一个三位数,判断是否为水仙数。

水仙数的特点:个位数、十位数和百位 数的立方和等于该数自身的数从运用中点击vb6.0经典版XV RMr ■ D1H" ° 壁■」■■—中■ ■ml 1 MffWl 穴肉.|输入代码如图运行即可I*n M<BlUiBm< T»I y «Biw ■甘h •■-』■1■■・If bir*^ 仔* _________________________Visual Bask白.0清筒版打开标准EXE建立一个form 1添加一个Label ; 一个TextBox ; —个commandButton;将Label 中的caption 改成“输入一个三位数判断是否为水仙花”;将TextBox中的text改为“文字清空”将commangButton 中的caption 改成“判断"输入代码如图匸二y - 口住I詔1-Private Sub Ccnnmaindl_Click()Diui a As Integer^ b As Ititefier T c As s As Integers - T^At La = s \ 100b = (fi - 100 * a) \ 10c ■ s - 100 * a - 10 * bIf a 3 + b 3 + c ' 3 - s ThenUsflBox s &卄是水til花hElfejlsgBox s & "不是水他花.End IfEnd Sub"1♦*1___ l3•输入一个1〜12的月份数字,显示这个月份是第几季度。

从运用中点击vb6.0经典版Visual 百筒匣打开标准EXE建立一个form 1添加一个Label ; 一个TextBox ; —个commandButton ;将Label 中的caption 改成“月份";将TextBox中的text文字清空;将commandButton 的caption改成转换;输入代码£«■■■■ UiJi73 ClirLFlrivitc-品^1匚 Xfuil 』"盘 口 Sal«Ei [ffiJL« Tuett. TaeliCts-r ] Tn 3DhZ 】.h 阿丄曲二3■弟一季夷「 Cea* 电 l> * Lab^l] Caplin = ■炭二宰#. C45* T Te 9 UM1 CaHiiM - ■転曙ST Case 10 To 123心- ^.23^?'C M : Elsthtb^Ll Caph at ■叫RJUf 3P 4 盟"I■Ind. Sul运行即可五、实验结果1.TW 丨 M.D'B fij/RW»!■ jMl ■ M J1J V ■-wh-ik* □ WVIM" fp- J*”tii|C'VTdi ■frw ■ *rJlu T TH* *57^1 a - UMI■iU,fC i lualtll 112.3.匕实轍一m回nW 第二需侵六、实验体会VB有的好难。