選択したインデックス項目を印刷

Question

選択したインデックス項目を印刷しようとしましたが、成功できませんでした。

コードを修正してもらえますか？

印刷ページに「-1」の値が表示されます。

Private Sub Textbox2_TextChanged(sender As Object, e As EventArgs) Handles TextBox2.TextChanged 

    Dim idx As Integer = ListBox1.FindStringExact(TextBox2.Text) 
        If idx <> -1 Then 
         ListBox1.SelectedIndex = idx 
         ListBox2.Items.Add(ListBox1.Text) 
         ListBox1.Items.Remove(TextBox2.Text) 
         PrintDoc.Print() 
    End sub 

Private Sub PrintDoc_PrintPage(ByVal sender As System.Object, ByVal e As Printing.PrintPageEventArgs) Handles PrintDoc.PrintPage 
     Dim drawfont As New Font("arial", 16) 
     Dim drawbrush As New SolidBrush(Color.Black) 
     e.Graphics.DrawString(ListBox1.SelectedIndex, drawfont, drawbrush, 100, 100) 
    End Sub 

Answer 1

http://watchmynewvideoxyz.blogspot.in/2017/02/user3900603-your-answer.html

OK私+1