■No13083 (しほちゃん☆ さん) に返信
ログイン画面.Activeを追加してログイン画面をアクティブにしてあげたらいいと思います。
IPを取得して(初期起動処理みたいなもの?)ログイン画面を出すなら、透明の画面を使うのではなく
Sub Mainを記述して実装したほうがいいと思います。
下記みたいになるのではないでしょうか。
(プロジェクトの設定でスタートアップフォームの設定を変える必要があります。)
Shared Sub Main()
Dim frm As New ログイン画面
'IPを取得処理
If IPが取得できたら Then
Application.Run(frm)
End If
End Sub
#図表モードにしました^^;