Hi.

I've got the following code that Outputs the information about the RAM modules into Textboxes.


Code:
        Try
            Dim k As System.Management.ManagementObject
            'Dim search_Memory As New System.Management.ManagementObjectSearcher("Select * from CIM_Memory")
            Dim search_Memory As New System.Management.ManagementObjectSearcher("SELECT * FROM Win32_PhysicalMemory")


            For Each k In search_Memory.Get()

                TextBoxX1.Text = k("BankLabel").ToString     'Gives the Slot Number of the RAM in the First Slot 
                TextBoxX2.Text = k("Capacity").ToString     'Gives capacity of only one RAM module 
                TextBoxX3.Text = k("PartNumber").ToString     ' Shows part number for only one RAM module

            Next

        Catch ex As Exception
            MessageBox.Show("Couldn't Load Certain Memory Information", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Try

As you can see from the Comments in my code as well..
I only get the Information about a Single RAM module..

How would I go about to get information for all of the RAM Modules in separate Text boxes ?