タイトル : Re: 条件文が判定できない 投稿日 : 2010/05/30(Sun) 22:19 投稿者 : 花ちゃん
Variant 型で受けている為に元のデータが String 型 の場合は当然 a の方が大きいので そのようになります。 数値として比較したいのなら、変数(元データ) を数値にしてから比較して下さい。 Private Sub Command1_Click() Dim a As Variant Dim b As Variant a = "9.9" b = "12.0" ' a = CDbl("9.9") ' b = CDbl("12.0") If a < b Then Stop Else Stop End If End Sub |