使用printDocument打印所有组合的项目

Question

我正在尝试打印程序中的Combobox的所有内容，编号。

combobox1内容：

Yes
No
Maybe
No Opinion

到目前为止，我的代码for PrintDocument1：

Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
    Dim horizontalPrintPosition As Single
    Dim verticalPrintPosition As Single
    Dim PrintFont As New Font("Arial", 12)
    e.Graphics.DrawString("Info from ComboBox1 would go here", PrintFont, Brushes.Black, horizontalPrintPosition, verticalPrintPosition)
End Sub

例如，所需的输出将是：

1. Yes
2. No
3. Maybe
4. No Opinion

谢谢！

Answer 1

您需要通过ComboBox项目集合进行迭代以获取您的价值。

Private Sub PrintDocument1_PrintPage(sender As System.Object, e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
    Dim horizontalPrintPosition As Single
    Dim verticalPrintPosition As Single
    Dim PrintFont As New Font("Arial", 12)
    For x = 0 To ComboBox1.Items.Count - 1
        e.Graphics.DrawString((x + 1).ToString() & ". " & ComboBox1.Items(x).ToString(), PrintFont, Brushes.Black, horizontalPrintPosition, verticalPrintPosition)
        verticalPrintPosition += PrintFont.Height
    Next
End Sub