动手做一个最简单的加法计算器

通过以前的教程，现在我们对编写VBA代码有了基础的认识。

应该可以做一个最简单的加法计算器了。

比如，我们想实现这样一个效果，点击一个按钮，将显示输入框信息“请输入一个数”，你输入了一个数字之后，再显示第二个输入框信息“请输入第二个数”，你再输入第二个数。

然后电脑显示两个数计算的结果。

先插入按钮

双击按钮进行编写代码。

Private Sub CommandButton1_Click() x = InputBox("请输入第一个数") y = InputBox("请输入第二个数") s = x + y MsgBox "两个数相加是" & sEnd Sub

退出编程窗口，回到Excel中，点击按钮运行。

将提示你一个个输入数，假设第一个数输入1，第二个数也是1

结果是什么？

并不是2，结果是11，大吃一惊。

为什么是这个错误？

原来你没有声明数据类型，电脑计算出错。

加上以下语句就对了。

Private Sub CommandButton1_Click() Dim x As Integer Dim y As Integer Dim s As Integer x = InputBox("请输入第一个数") y = InputBox("请输入第二个数") s = x + y MsgBox "两个数相加是" & sEnd Sub

究竟是什么原因？

接下来几篇文章会详细介绍变量和数据类型以及声明语句。

子曰：用之则行，不用则藏。

意思是说，如果你用我的这些建议，就马上行动，知行合一，如果你不用，就赶紧收藏，以绝后患。