| 网站首页 | 文章 | 下载 | 图库 | 留言 | 论坛 | 邮箱 | 黑客商城 | 资源 | 博客 | 会员区 | 黑客动画 | 视频资源 | 经典收集 | 
免费服务 发表文章 在线破解 黑客游戏 精华收集 电影频道 音乐频道 二级域名 免费代理 免费 FTP 交换资源
收费服务 黑客培训 光盘刻录 黑客书籍 视频下载 主力频道 空间域名 网站建设 特色服务 解决方案 我要投诉
您现在的位置: 华夏黑客同盟 >> 经典收集 >> 程序设计 >> VB专区 >> 编程实例 >> 收集正文 用户登录 新用户注册
用VB计算1+1=2           ★★★★ 【字体:
< > 
用VB计算1+1=2
作者:unknown 文章来源:unknown 点击数: 更新时间:2005-9-3
< padding-top:>之所以用VB计算1+1=2,是为把一个从没接触过VB的人带入VB的有趣世界。初步认识一下VB。

不管你能不能看懂这是什么意思,请先照下面说的去做吧(当然是对初学者来说),等学习了后面的教程你就会明白的!

第一步:运行VB(这里以VB5.0中文版为例,下同)。

第二步:新建一个标准EXE工程。运行VB时直接建立或使用“文件”菜单中的“新建工程”。

第三步:你会见到一个称为“Form1”的窗体。现在请点击一下工具箱(一般位于左边)中的那个大“A”,称为Label,然后在Form1中拖动一下。就绘出一个控件,记住,这个东西叫“控件”,而且是一个标签控件。你还可以调整它的大小。

第四步:点击一下刚才你绘出的控件,然后找到属性窗口(一般在右边),看到其中有一个Caption属性,属性值为Label1。请将其值改为“第一个加数”。

第五步:从工具箱中找到“TextBox”控件,鼠标悬停在上面会有提示。点击一下,然后在Form1中拖动一下,就绘出一个文本框控件。将这个文本框控件放在你刚才创建的标签控件的下面。再点击一下,找到属性窗口中的text属性,将该属性值改为空。

第六步:重复第三至第五步,只不过要把新的标签控件的Caption属性设为“第二个加数”。注意各个控件不要重叠在一起。

第七步:重复第三至第五步,只不过要把新的标签控件的Caption属性设为“两数的和”。注意各个控件不要重叠在一起。

第八步:从工具箱中找到“CommandButton”控件,用同样的方法绘制到Form1中,并将其Caption属性设为“两数相加”。

第九步:双击你刚才创建的CommandButton控件,会弹出代码窗口,其中已经有一部分自动生成的代码,如下所示:

Private Sub Command1_Click()

 

End Sub

请在其中加一行,成为:

Private Sub Command1_Click()

Text3.Text = Str$(Val(Text1.Text) + Val(Text2.Text))

End Sub

至此,你的第一个程序就完成了。

运行一下吧!点击工具栏上的启动按扭或使用运行菜单中的启动或按F5均可。运行时会弹出一个窗口(就是刚才那个Form1)。在前两个文本框中都输入1,然后点击“两数相加”按扭,看看出现了什么?

好了,别忘记存盘,会生成两个文件,一个.frm文件,一个.vbp文件,名字任你起。

现在让我们分析一下刚写的那句代码:

Text3.Text = Str$(Val(Text1.Text) + Val(Text2.Text))

聪明的你一定看明白了,这句代码的意思就是将两个文本框中的文本分别先转换为数字,然后相加,再转为字符串在Text3中输出。注意不能写成:

Text3.Text = Text1.Text + Text2.Text

因为字符串相加和数值相加是不一样的。数值相加时1+1=2,而字符串相加时"1"+"1"="11"。

 

思考题:将Text3.Text = Str$(Val(Text1.Text) + Val(Text2.Text))

改为:Text3.Text = Val(Text1.Text) + Val(Text2.Text)会发生什么情况?为什么?

请验证一下!

收集录入:华夏总编辑    责任编辑:华夏总编辑 
  • 上一篇收集:

  • 下一篇收集:
  • (只显示最新5条。评论内容只代表网友观点,与本站立场无关!)
    最新热点资讯
    最新推荐资讯
    相关收集
  • Excel 在公式中使用运算符号

  • Excel 公式位置的引用

  • Excel 移动和公式的复制

  • Excel 控制重算的方式

  • Excel 使用自动求和按钮

  • Excel 隐 藏 公 式

  • 使用名称的综述

  • 理解Excel函数

  • Excel 函数的输入

  • Excel 数组的使用

  • 最新推荐软件
    最新推荐视频
    最新推荐动画

    Copyright @ 2005 77169.Net Inc. All rights reserved. 华夏黑客同盟 版权所有
    北京市电信通提供网络带宽

    mailto:webmaster@77169.net
    咨询QQ号:836982 / 59280880
    联系站长 有事给站长留言!
    热线电话: 86-10-63643422/63643423
    京ICP证041431号