this.listView1.View=View.Details;
this.listView1.GridLines=true;
this.listView1.Columns.Add("环境变量",150,HorizontalAlignment.Left); 
this.listView1.Columns.Add("变量值",150,HorizontalAlignment.Left); 
            ListViewItem myItem;
foreach (DictionaryEntry EnValue in Environment.GetEnvironmentVariables()) 
{
myItem= new ListViewItem(EnValue.Key.ToString(),0);
myItem.SubItems.Add(EnValue.Value.ToString());
this.listView1.Items.Add(myItem); 
}

解决方案 »

  1.   

    关于内存
    http://www.csdn.net/Develop/Read_Article.asp?Id=3664得到硬盘信息 
    Imports System.Management
    Public Class Form1
        Inherits System.Windows.Forms.Form#Region " Windows Form Designer generated code "  Public Sub New()
        MyBase.New()
        InitializeComponent()
      End Sub  Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        If disposing Then
          If Not (components Is Nothing) Then
            components.Dispose()
          End If
        End If
        MyBase.Dispose(disposing)
      End Sub
      Private components As System.ComponentModel.IContainer
      Friend WithEvents ListBox1 As System.Windows.Forms.ListBox
      <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
        Me.ListBox1 = New System.Windows.Forms.ListBox
        Me.SuspendLayout()
        '
        'ListBox1
        '
        Me.ListBox1.Location = New System.Drawing.Point(8, 8)
        Me.ListBox1.Name = "ListBox1"
        Me.ListBox1.Size = New System.Drawing.Size(272, 212)
        Me.ListBox1.TabIndex = 0
        '
        'Form1
        '
        Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
        Me.ClientSize = New System.Drawing.Size(292, 238)
        Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.ListBox1})
        Me.Name = "Form1"
        Me.Text = "Form1"
        Me.ResumeLayout(False)  End Sub#End Region  Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load    On Error Resume Next
        Dim HDDDeviceQuery As New SelectQuery("Win32_DiskDrive")
        Dim HDDDeviceSearch As New ManagementObjectSearcher(HDDDeviceQuery)
        Dim HDDDeviceInfo As ManagementObject
        For Each HDDDeviceInfo In HDDDeviceSearch.Get()
          ListBox1.Items.Add("HDD Description: " & HDDDeviceInfo("caption").ToString())
          ListBox1.Items.Add("HDD BytesPerSector: " & HDDDeviceInfo("BytesPerSector").ToString())
          ListBox1.Items.Add("HDD CompressionMethod: " & HDDDeviceInfo("CompressionMethod").ToString())
          ListBox1.Items.Add("HDD Index: " & HDDDeviceInfo("Index").ToString())
          ListBox1.Items.Add("HDD InstallDate: " & HDDDeviceInfo("InstallDate").ToString())
          ListBox1.Items.Add("HDD Manufacturer: " & HDDDeviceInfo("Manufacturer").ToString())
          ListBox1.Items.Add("HDD Partitions: " & HDDDeviceInfo("Partitions").ToString())
          ListBox1.Items.Add("HDD Size: " & Int(Val(HDDDeviceInfo("Size").ToString()) / 2 ^ 30) & "  GBytes")
          ListBox1.Items.Add("HDD TotalCylinders: " & HDDDeviceInfo("TotalCylinders").ToString())
          ListBox1.Items.Add("HDD TotalSectors: " & HDDDeviceInfo("TotalSectors").ToString())
          ListBox1.Items.Add("HDD TracksPerCylinder: " & HDDDeviceInfo("TracksPerCylinder").ToString())
          ListBox1.Items.Add("HDD TotalHeads: " & HDDDeviceInfo("TotalHeads").ToString())
          ListBox1.Items.Add("HDD TotalTracks: " & HDDDeviceInfo("TotalTracks").ToString())
          ListBox1.Items.Add("HDD SectorsPerTrack: " & HDDDeviceInfo("SectorsPerTrack").ToString())
          ListBox1.Items.Add("HDD SCSILogicalUnit: " & HDDDeviceInfo("SCSILogicalUnit").ToString())
        Next
      End Sub
    End Class
      

  2.   

    用WMI可是實現
    例如://獲取內存大小,可用內存大小,ServicePack Version
    ManagementClass manger = new ManagementClass("Win32_OperatingSystem");
    manger.Get();
    foreach(ManagementObject info in manger.GetInstances())
    {
        string sMemorySize = info["TotalVisibleMemorySize"].ToString();
        string sFreeSize = info["FreePhysicalMemory"].ToString();
        string sServicePackVersion = info["CSDVersion"].ToString();
    }
    //獲取主板信息,處理器個數
    ManagementClass manger = new ManagementClass("Win32_OperatingSystem");
    manger.Get();
    foreach(ManagementObject info in manger.GetInstances())
    {
       string sModel = info["Model"].ToString();
       string sProcessorCount = info["NumberOfProcessors"].ToString();
    }
    //限於篇幅,還有獲取磁盤信息,進程信息等,
    需要的的話,我可以給你一個我寫的ServerMonitor , 就是利用這個技術來監視遠端Server的
      

  3.   

    Mail : [email protected]
    QQ : 830390
    MSN : [email protected]
      

  4.   

    使用wmi就行了,具体参考,
    system.management命名空间下的类。
    ms-help://MS.NETFrameworkSDKv1.1.CHS/cpref/html/frlrfSystemManagement.htm