一起来学VBA for access(3)-李寻欢
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> Access数据库-教程


一起来学VBA for access(3)

发表时间:2008/12/26 10:21:43 评论(0) 浏览(7850)  评论 | 加入收藏 | 复制
   
摘 要:第三课 设计一个简单的计算器
正 文:

      上节课我们编写的程序不能正确得出结果,原因是:在字符运算中,“+”号是连字符,跟“&”号一样,作用是把符号前后的字符连起来,而我们引用文本框里的值默认类型是字符型,电脑以为我们要进行字符运算,因此计算结果就是“111222”,所以如果想要得到正确的结果,就要先把文本框的值用VAL函数转换成数值型数据。所以上面的语句改成这样就可以了:txtNum3 = val(txtNum1) + val(txtNum2 )

      这节课我们来做一个简单的计算器。这个计算器的知识要点:
      1.字符型与数值型数据的转换
      2.IF语句
      3.Select Case
      4.For循环
      下面我们开始设计程序。
步骤1  建立窗体
      在窗体上放置20个按钮,一个文本框

步骤2  给各个控件输入名称及标题
      名称及标题如下:
      1、数字按钮
      控件1名称:cmd1         控件1标题:1                        控件2名称:cmd2         控件2标题:2
      控件3名称:cmd3         控件3标题:3                        控件4名称:cmd4         控件4标题:4
      控件5名称:cmd5         控件5标题:5                        控件6名称:cmd6         控件6标题:6
      控件7名称:cmd7         控件7标题:7                        控件8名称:cmd8         控件8标题:8
      控件9名称:cmd9         控件9标题:9                        控件10名称:cmd0 控件10标题:0
      2、小数点按钮
      控件11名称:cmdPoin 控件11标题:.
      3、计算按钮
      控件12名称:cmdadd控件12标题:+      控件13名称:cmdMinus         控件13标题:-                
      控件14名称:cmdMult控件14标题:*                控件15名称:cmdDiv        控件15标题:/                
      控件16名称:cmdSqr控件16标题:开方         控件17名称:cmdSqu         控件17标题:平方
      控件18名称:cmdReci 控件18标题:倒数
      4、清零按钮
      控件19名称:cmdClear         控件19标题:C        
      5、等号按钮
      控件20名称:cmdEqual 控件18标题:=
      6、文本框
      控件21名称:txtResult

步骤3  程序分析
      我们首先要确定各个按钮的作用:
      1、数字按钮:
      当按下数字按钮,文本框里应该出现我们所按下的按钮所代表的数字,如果文本框里原来有数字,就应该在原有数字的尾部加上新的数字。
      2、小数点按钮
      当按下小数点按钮,必须判断文本框中的数字是否含有小数点,如果没有,就把小数点加在文本框的现有数字后面。
      3、计算按钮
      当按下计算按钮,就把文本框里的数字保存到一个变量中,把代表该按钮的运算符保存在另一个变量中,并清空文本框,等待下一个参加运算的数字的输入。
      4、清零按钮
      当按下清零按钮,就把文本框的文本把文本框的值置为0
      5、等号按钮
      当按下等号按钮,就进行计算,用保存在变量里的数字及运算符跟文本框的里数字进行运算,结果显示在文本框中。

      整个程序的分析到此结束,请朋友们根据分析自行编写一下代码,看是否可以把这个简单的计算器做出来,代码的编写下节课再讲。

上一课  下一课


Access软件网交流QQ群(群号:198465573)
 
 相关文章
一起来学VBA for access(1)  【李寻欢  2008/12/26】
一起来学VBA for access(2)  【李寻欢  2008/12/26】
一起来学VBA for access(4)  【李寻欢  2008/12/27】
一起来学VBA for access(5)  【李寻欢  2008/12/29】
一起来学VBA for access(6)  【李寻欢  2008/12/30】
常见问答
技术分类
相关资源
文章搜索
关于作者

李寻欢

文章分类

文章存档

友情链接