eng
competition

Text Practice Mode

VB.Net: Setting for startup of app

created Feb 10th, 09:40 by


0


Rating

81 words
9 completed
00:00
' Code written by: LinuX Man, 2019.
 
' Setting for startup of app.
    Private Sub Main_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Status.Text = "Loading Program..."
 
        ' Abort Action button will be invisible in startup because of no usage of it.
        Button1.Visible = False
        Label7.Text = Environment.UserName.ToString
 
        Status.Text = "The program was loaded successfully."
    End Sub
 
    ' Menu Options...
    Private Sub PowerOptionsToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles PowerOptionsToolStripMenuItem1.Click
        Status.Text = "Requested to open Power Configuration."
        Process.Start("powercfg.cpl", AppWinStyle.NormalFocus)
    End Sub

saving score / loading statistics ...