|
Public Class Form1
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Me.Location = My.Settings.WindowLocation
Me.ClientSize = My.Settings.WindowSize
Me.TextBox1.Text = My.Settings.UserWord
End Sub
Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
If Me.WindowState = FormWindowState.Normal Then
My.Settings.WindowLocation = Me.Location
My.Settings.WindowSize = Me.ClientSize
End If
My.Settings.UserWord = Me.TextBox1.Text
End Sub
End Class
|
By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.
If a file you wish to view isn't highlighted, and is a text file (not binary), please
let us know and we'll add colourisation support for it.
A general purpose analyst programmer working in a small development team for a company in the city.
VB has always been my passion and I code both Win forms and web based systems for both work and fun.