Me.Hide() Dim Main As New fmmain Main.Label1.Text = FmLogin.UserName Main.ShowDialog(Me) 'Me.Show() '除去 'Me.Close() '除去
Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Me.Hide() Using f As New Form() f.ShowDialog() End Using 'Me.Close() End Sub End Class
x = ログイン画面.ShowDialog() If x = DialogResult.OK Then 'ログインが行われた時の処理 ElseIf x = DialogResult.Cancel Then 'ログイン画面をキャンセルした時の処理 ElseIf …