通过前面经验的学习,大家可以在对话框中设置各类按钮, 当单击这些按钮时,除了关闭对话框却没有其他反应。如果了解了单击按钮的相应返回值,就可以让程序来响应操作者的意图。
工具/原料
Excel 2013
程序晌应单击按钮的动作
1、常见的按钮的分类如下图所示

4、程序解释:(1)For x= 1 To 100:设置x 在1 ~ 100 之间进行循环。钱砀渝测(2)If x Mod 5 = 0 Then :判断当前值是否能被5 整除。其中Mod 是计算余数的运算符,如5Mod 2 的余数为1; 4 Mod 2 的余数为0。这里用除以5 的余数是否为0:来判断是否为5 的倍数。(3)Cells(x, 1) = x:设置当A 列的当前行的单元格等于当前的数值,如当X=4时,Cells( 4, 1 )的值(即A4 的值)等于4。(4)y =MsgBox("是否要继续填充数据”, 4):把单击对话框的按钮值赋予变量y 。这里值得注意的是,如果要取得函数的返回值,必须在函数名称后添加括号。(5)If y = 7 Then Exit Sub : 当单击了【是】按钮时,退出程序。因为7 是单击对话框【否】按钮的返回值,所以可以用y 的值是否为7 来判断是否单击了【否】
5、执行代码结果如下图所示:
