エラーについて (ID:125759)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 > Text1.Text = rs(1).Value > Text2.Text = rs(3).Value > Text3.Text = rs(4).Value > Text4.Text = rs(5).Value データがなければ、rs(1).Value等は存在しないので、エラーになります。 If rs.BOF Then 'データなし MsgBox "一致する名前はありません" Else 'データあり Text1.Text = rs(1).Value Text2.Text = rs(3).Value Text3.Text = rs(4).Value Text4.Text = rs(5).Value End If と、しましょう。 また、MsgBoxは括弧はいりません。