閉じる

IIF(条件、真のときの処理,　偽のときの処理）


'

' 入力値が０より大きいときは　＋、小さいときは　−　をセット



Dim strRTN As String

strRTN = IIF( Me.入力値　> 0, "+","-")