Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Public Class Form1
- Private Sub SimpleButton1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- Using regularThatOverrides As New RegularThatOverrides()
- regularThatOverrides.StartPosition = FormStartPosition.CenterParent
- regularThatOverrides.WindowState = FormWindowState.Normal
- regularThatOverrides.ShowDialog(Me)
- regularThatOverrides.Close()
- End Using
- End Sub
- Private Sub SimpleButton2_Click(sender As Object, e As EventArgs) Handles Button2.Click
- Using regularThatOverrides As New RegularThatOverrides()
- regularThatOverrides.StartPosition = FormStartPosition.CenterParent
- regularThatOverrides.WindowState = FormWindowState.Normal
- regularThatOverrides.ShowDialog()
- regularThatOverrides.Close()
- End Using
- End Sub
- Public Class RegularThatOverrides
- Inherits Form
- Protected Overrides Sub OnLoad(e As EventArgs)
- MyBase.OnLoad(e)
- Me.WindowState = FormWindowState.Maximized
- End Sub
- End Class
- Private Sub SimpleButton3_Click(sender As Object, e As EventArgs) Handles Button3.Click
- Using regularForm As New Form()
- regularForm.StartPosition = FormStartPosition.CenterParent
- regularForm.WindowState = FormWindowState.Normal
- regularForm.ShowDialog(Me)
- regularForm.Close()
- End Using
- End Sub
- Private Sub SimpleButton4_Click(sender As Object, e As EventArgs) Handles Button4.Click
- Using regularForm As New Form()
- regularForm.StartPosition = FormStartPosition.CenterParent
- regularForm.WindowState = FormWindowState.Maximized
- regularForm.ShowDialog(Me)
- regularForm.Close()
- End Using
- End Sub
- End Class
Advertisement
Add Comment
Please, Sign In to add comment