Visual Basic – Bilgisayar yazılım & donanım bilgilerini görüntüleme
VB ile Windows kullanıcı adı, bilgisayar adı, domain adı,makine adı,bilgisayarı açalı geçen süre,işletim sistemi,versiyon vs.. gibi bilgileri aşağıdaki örnek verdiğim kodlardan dilediğinizi alıp sorunsuz kullanabilirsiniz.
lblOsVersion.Text = Environment.OSVersion.ToString
lblUser.Text = Environment.UserName.ToString
lblRuntime.Text = Environment.Version.ToString
lblUptime.Text = Mid((Environment.TickCount
/ 3600000), 1, 5) & ” :Hours”
lblSystemRoot.Text = Environment.SystemDirectory.ToString
lblCompName.Text = Environment.MachineName.ToString
lblCurrentDirectory.Text = Environment.CurrentDirectory.ToString
lblUserDomainName.Text = Environment.UserDomainName.ToString
lblWorkingSet.Text = Environment.WorkingSet.ToString
lblCommandLine.Text = Environment.CommandLine.ToString
For i As Integer = 0 To Environment.GetLogicalDrives.Length – 1
lblGetLogicalDrives.Text += Environment.GetLogicalDrives(i)
lblGetLogicalDrives.Text += ” ”
Next
””””””””’
Label1.Text = “User Name”
Label2.Text = “Operating System Version”
Label3.Text = “Computer Name”
Label4.Text = “System Root”
Label5.Text = “.Net Run Time”
Label6.Text = “Up Time”
Label7.Text = “Current Directory”
Label8.Text = “User Domain Name”
Label9.Text = “Working Set”
Label10.Text = “Get Command Line for this Project”
Label11.Text = “Get Logical Drives”