字符数字日期
Access中的Format函数分段条件
2015-01-12 11:12:08

Access中的Format的条件格式是可以分段处理格式。 有网友问到能不能用Format显示正负号。例如: 0.01  -->  +1% -0.01 --> -1% 一般可以想到两种方法 1、判断数字,合成一个格式表达式  

  1. Public Function g(dblNum As Double) As String
  2.     Dim strSgn As String        '条件格式的符号
  3.     Select Case Sgn(dblNum)
  4.         Case 1
  5.             strSgn = "+"
  6.         Case -1
  7.             strSgn = "-"
  8.         Case 0
  9.     End Select
  10.     
  11.     g = Format(Abs(dblNum), strSgn & "0.00%")
  12. End Function
复制代码

      不过这个不够直接 2、利用Format条件分段       Format条件表达式有一种分段 :  正数;负数;零       所以可以简单写成这样:       Format(dblNum,"+0.00%;-0.00%;0")        显然要比第一种快捷 3. 当然窗体的属性Format也是支持 多段格式,使用方法类似