OSのVER]:Windows XP
[VBのVER]:VB 6.0

今会社のシステムの１部分を作成しているのですが、
例えば、社員コードをテキストに入力→社員コードが正しければ、ラベルに名前を表示→
　　　　正しくなければエラーメッセージを表示
というようなプログラムを作りたいのですが、コードが良く分かりません。

If RS.EOF = True Then
MsgBox "入力が正しくありません。", vbCritical
RS.Close
Exit Sub
Else
If RS.EOF = False Then
lbl社員名 = RS("社員名")
End If

End If

でいいのでしょうか？

lbl社員名 = RS("社員名")で、きちんとデータベースの中に入っている名前が表示される
でしょうか？

申し訳ないのですが、分かる方アドバイスをください。

表示されると思いますが、実行してないのですか?
−−−−−−−−−−−−−−−−−−−−−−−−−
With RS
    If .EOF Then
        MsgBox "入力が正しくありません。", vbCritical
        .Close
        Exit Sub
    Else
        'ラベルは省略するとCaptionプロパティに引き渡されます。
        'またレコードセットオブジェクトはRS("列名前")の他に、
        'RS(列番号)で返せます。（省略形ならFields.Valueが返ります。）

        lbl社員名.Caption = .Fields(0)
    End If
End With

名前が分かっているならばEnumで分かる名前に列番号を
割り振るのもよいと思います。

すいません！
実行しないまま投稿をしてしまいました！
まず実行してから、自分で考えるのが基本ですよね！
以後気をつけます。

レスありがとうございました！