get.it
Posted: Wed Jan 13, 2010 1:21 pm
Hi guys, this is one of my new programs I call it: Get.it! what it does is uses the textbox and gets a piece of information from the PC.
Tutorial:
Items:
1 textbox
1 label
1 button
1 form
button1 text = get.it or something like that
form1 text = <application name>
next: the coding
form 1 code:
the base code is just
Tutorial:
Items:
1 textbox
1 label
1 button
1 form
button1 text = get.it or something like that
form1 text = <application name>
next: the coding
form 1 code:
Code: Select all
next is button 1's code:
Label1.Text = ""Code: Select all
and add anything else you want to the code or even edit the existing one like delete the get. or change virtmem etc.If TextBox1.Text = "get.physmem" Then
Label1.Text = My.Computer.Info.TotalPhysicalMemory
End If
If TextBox1.Text = "get.availablephysmem" Then
Label1.Text = My.Computer.Info.AvailablePhysicalMemory
End If
If TextBox1.Text = "get.OSFN" Then
Label1.Text = My.Computer.Info.OSFullName
End If
If TextBox1.Text = "get.virtmem" Then
Label1.Text = My.Computer.Info.TotalVirtualMemory
End If
If TextBox1.Text = "get.availablevirtmem" Then
Label1.Text = My.Computer.Info.AvailableVirtualMemory
End If
If TextBox1.Text = "get.time" Then
Label1.Text = My.Computer.Clock.LocalTime.Hour & ":" & My.Computer.Clock.LocalTime.Minute
End Ifthe base code is just
Code: Select all
if <textbox name>.text = "<text>" then
<label name> = <label text>