WPS自动化的实现：[4]命令按钮

1、首先我们制作一个简单的学生成绩统计表：插入，表格，插入表格，设置好表格的行数和列数

2、制作完成表格后，输入李四的单科成绩。参照前面添加控件的方法添加命令按钮，调整按钮的大小和位置，右键点击按钮，属性，将Caption设置为“统计”。完成的效果如下图

3、我们的目标是点击“统计”按钮，李四的总成绩自动显示在相应的单元格里：双击命令按钮，显示代码编辑器，在其中添瑕铆幌约加如下代码：Dim a As Integer Dim s As Stringa = Val(Tables(1).Cell(2, 4).Range.Text) + Val(Tables(1).Cell(2, 5).Range.Text) + Val(Tables(1).Cell(2, 6).Range.Text)s = Str(a)Tables(1).Cell(2, 7).Range.Text = s

4、点击运行，退出窗体。我们看到，李四的总成绩显示出来了

5、我们删除李四的所有成绩，保存WPS文字，退出。再次打开，当我们输入李四单科的成绩，点击“统计”，WPS就给我们显示出李四的总成绩

6、思考：能否不添加控件而实现统计的功能，例如直接单击总成绩的单元格就自动将总成绩显示出来呢？这在后续经验中会有说明