VB6でVal（）関数を使用した比較に失敗しましたか？

Question

Dim HHs As String 
HHs = Mid("2345", 1, 2) 

If Val(HHs) > 23 Then 
"Log the Error that needs to be logged" 
End If 

上記のコードは、検証では失敗しています。 これは非常に単純な問題のようです 何故でしょうか？

Answer 1

その後、Val(HHs)は常に0なり、HHsが宣言されていない（そして、あなたはOption Explicitを使用していない）、またはあなたはHHsに値を割り当てていない場合....

など、Val(HHs) > 23として常にFalseになります。

あなたは入力ミスをした可能性があり、HHeを使用すると思われますか？予想通り

Answer 2

コードは動作します：ヴァル（HHS）23

Option Explicit 

Private Sub CommandTest_Click() 
    Dim HHs As String 
    HHs = Mid("2345", 1, 2) 

    If Val(HHs) > 23 Then 
     MsgBox "Log the Error that needs to be logged" 
    End If 
End Sub