08-VBA函数内容介绍

excel交流

1. 
   
2.              Sub myabs()
   
3.                   a = InputBox("请输入数值：", "提示")
   
4.                   labs = Abs(a)
   
5.                   MsgBox "你输入的值的绝对值为:" & labs
   
6.              End Sub
   

复制代码