Office——Excel-VBA学习——进阶

1. 输入和绝对值 Sub QingwuAbs() Dim a, b As Integer a = InputBox("请输入一个负数：", "提示") b = Abs(a) MsgBox "你输入数的绝对值为：" & b End Sub 2. IF结构 Sub TestIf() [A1] = 35 If [A1] > 30 Then     MsgBox ">30" Else     MsgBo

>>阅读原文<<