用VB计算1 1=2

2016-02-19 20:15 0 1 收藏

图老师设计创意栏目是一个分享最好最实用的教程的社区,我们拥有最用心的各种教程,今天就给大家分享用VB计算1 1=2的教程,热爱PS的朋友们快点看过来吧!

【 tulaoshi.com - 编程语言 】

之所以用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控件,会弹出代码窗口,其中已经有一部分自动生成的代码,如下所示:

PrivateSubCommand1_Click()

 

EndSub

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

请在其中加一行,成为:

PrivateSubCommand1_Click()

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

EndSub

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

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

运行一下吧!点击工具栏上的启动按扭或使用运行菜单中的启动或按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"。

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

 

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

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

请验证一下!

->

来源:https://www.tulaoshi.com/n/20160219/1623139.html

延伸阅读
   <html     <head     <title24点</title     <meta name="author" content="dlpower@163.com"     <meta http-equiv="Content-Type" content="text/html; charset=GB2312"     </head         &...
标签: ASP
  你刚刚把最新的庞大的ASP应用程序释放到网上。文件正确地上载到服务器上,与应用程序的链接也 工作良好。在庆祝胜利之前,你想在应用程序的性能上运行一些stats 以便发现它到底有多好。结果 却发现,本来在开发环境下工作得很好的应用程序实际上运行速度很慢。      对于那些使用Microsoft 软件包时间不长的...
标签: ASP
  显示形式: ID NAME 1 JULIET 2 SPIRIT 3 GIRL 4 BOY [1] [2] [3] [4] 页数:1/4 页 4条/页 总记录数:13条 代码: <!--page4.asp-- <!--#include file="conn.asp"-- <html <body bgcolor="#FFFFFF" text="#000000" <table width="60%" border="1" align="cente...
标签: Delphi
  当你完成一个应用软件的开发后,那么你还需要为该软件做一个规范化的安装程序,这是程序设计的最后一步,同时也是很重要的一步,因为运行安装程序往往是用户做的第一步操作。 很多报刊文章介绍了许多如何利用installshield等工具软件来制作安装程序的方法,这种办法可以很快建立起较常见的安装模式,但用这种办法也有一些...
对于教师来说,如何编制联机试卷,如何实现考试的无纸化,是目前比较关心的事情。本人采用Microsoft Access 2000编制的试卷,具有通用性强、界面友好美观、易于修改扩充等优点,愿与大家分享。 系统简介   在Access中,把以往传统的数据库称为表,即表由标题字段(库结构)及各条记录组成,表与对表的各种操作如查询、生成窗...

经验教程

325

收藏

27
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部