- 1 Settembre 2009
- 159
- 0
- Miglior risposta
- 0
buon giorno a tutti , oggi ho creato un programma che permette di visualizzare le informazioni di un pc
ecco il codice
lo potete scaricare da qui
x oggi è tutto :ciao:
ecco il codice
Public Class Form1 Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) End Sub Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click TextBox1.Text = (My.Computer.Info.AvailablePhysicalMemory) End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click TextBox2.Text = (My.Computer.Info.TotalPhysicalMemory) End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click TextBox3.Text = (My.Computer.Info.OSFullName) End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click TextBox4.Text = (My.Computer.Info.OSPlatform) End Sub Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click TextBox5.Text = (My.Computer.Info.OSVersion) End Sub Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click TextBox1.Text = (My.Computer.Info.AvailablePhysicalMemory) TextBox2.Text = (My.Computer.Info.TotalPhysicalMemory) TextBox3.Text = (My.Computer.Info.OSFullName) TextBox4.Text = (My.Computer.Info.OSPlatform) TextBox5.Text = (My.Computer.Info.OSVersion) End Sub Private Sub NotifyIcon1_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles NotifyIcon1.MouseDoubleClick End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub End Class |
lo potete scaricare da qui
Perfavore,
Entra
oppure
Registrati
per vedere i Link!
x oggi è tutto :ciao: