vb.net 루프를 돌고 있는 값(프린터 이름)을 개별 변수에 저장하는 방법이 없을까요?

[행복동행복이]

컴퓨터에 저장된 프린터 등록정보를 통해 프린터 이름을 검색하는 부분입니다.

근데 이 검색된 프린터 이름을 각각의 개별 변수에 저장하는 방법을 알고 싶습니다.

두가지 방법으로 프린터 이름을 검색하는데, 루프를 돌면서 검색된 프린터 이름을

따로 저장하는 방법이 뭐가 있을가요?

그리고, 여기에 인쇄를 한다면 어떤방법이 좋을까요?

다이얼로그를 띄우는 방법과 그렇지 않은경우를 알려 주셨으면 합니다.

프린터 첫번째 검색방법

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim installedPrinters As String

        Dim a As New Printing.PageSettings

        ' 프린터찾기

        For Each installedPrinters In System.Drawing.Printing.PrinterSettings.InstalledPrinters

            a.PrinterSettings.PrinterName = installedPrinters

            MessageBox.Show(a.PrinterSettings.PrinterName)

            'If installedPrinters = "HP" Then Exit For

        Next installedPrinters

    End Sub

두번째 검색방법

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

        Dim sOutput As String = "설치된 전체 프린터" & ControlChars.CrLf

        Dim sPrinterStat As String = "프린터 상태 결과" & ControlChars.CrLf

        Dim scPrinters As PrinterSettings.StringCollection = PrinterSettings.InstalledPrinters

        For Each sPrinter As String In scPrinters

            Dim pd As New PrintDocument

            If pd.PrinterSettings.IsValid Then

                sPrinterStat &= sPrinter & ": 정상" & ControlChars.CrLf

            Else

                sPrinterStat &= sPrinter & ": 비정상" & ControlChars.CrLf

            End If

            sOutput &= sPrinter & ControlChars.CrLf

        Next

        MessageBox.Show(sOutput & ControlChars.CrLf & sPrinterStat, "결과")

    End Sub