You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 

30 lines
948 B

Public Class PreviewWindow
Private Sub AutoSizeWindow()
If Me.WindowState = FormWindowState.Normal Then
Me.WindowState = FormWindowState.Maximized
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None
Me.TopMost = True
Me.Refresh()
Else
Me.WindowState = FormWindowState.Normal
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Sizable
Me.TopMost = False
Me.Refresh()
End If
End Sub
Private Sub PreviewWindow_SizeChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.SizeChanged
If Me.WindowState = FormWindowState.Maximized Then
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None
Me.TopMost = True
Else
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Sizable
Me.TopMost = False
End If
End Sub
End Class