ACCESS 2010Do-Loop循环语句

1、启动Access 2010，新建一个数据库，执行“数据库工具>宏>Visual Basic”命令，打开VB编辑器

2、单击“插入模块”按钮，为程序添加“模块”，如图

3、在模块内编写代码

4、将光标定位在diaoyong2()过程的任意位置，按F5执行该程序，弹出需要输入连加终值的对话框,在对话框中输入需要连加的终值为100

5、单击“确定”按钮，得出计算结果为5050

6、将光标定位在diaoyong2()过程的任意位置，按F5执行该程序，弹出需要输入连加终值的对话框,在对话框中输入需要连加的终值为50

7、单击“确定”按钮，得出计算结果如图所示。