私のプログラムは、ホストの特定のサブドメインのIPを取得します。それらの1つが存在しない場合は、「そのようなホストは不明です」というエラーが表示されます。エラーを出す代わりに、lblDirectのテキストを「見つかりません」に置き換えるにはどうすればよいですか。
Dim dHostname As IPHostEntry = Dns.GetHostEntry("direct." + TextBox1.Text)
Dim dip As IPAddress() = dHostname.AddressList
lblDirect.Text = dip(0).ToString
IPを取得するために使用しているコードです。