こんにちは。

Ifなどの条件判断で確認することになります。
ただし、文字数が多いと大変なのでLikeを使うと多少楽になります。
     

Dim st As String

    

st = "テスト"

    

Dim Letter As String

Dim i As Integer

    

For i = 1 To Len(st)

    Letter = Mid(st, i, 1)

    If Letter Like "[!0-9a-zA-Z]" Then

        MsgBox "半角英数ではない文字があります。"

        Exit For

    End If

Next i

この例は変数stに１文字でも半角英数でない文字が含まれている場合メッセージを表示します。

>できれば、半角数字かどうかのチェック・文字数チェックのやり方も教えてください。
半角数字かのチェック
Likeの条件を [0-9] や [!0-9]などにします。
文字数のチェック
Lenを使用します。

     

If Len(st) > 8 Then

    MsgBox "8文字までです。"

End If

入力のチェックに使用されることと思いますが、入力のチェックにはさまざまな方法があり、ここで紹介したのは一例です。
以下のページで説明しているのでよろしければ参照してください。
http://homepage1.nifty.com/rucio/main/technique/InputChk2.htm
http://homepage1.nifty.com/rucio/main/technique/InputChk.htm