2016-05-14 3 views
-2

私のシステムはほぼ完了しています。私が完了する必要があるのは、印刷プロセスだけです。残念ながら、印刷ダイアログは表示されません。ここで vb.net - PrintDialogが表示されない

は、印刷も開始されていないので、それは、印刷も、まだだろうまさに基本的printdocument_printpage、何も問題はありません印刷プロセス

Private Sub PrintReceipt() 
    Dim printdialog As New PrintDialog 
    Dim printdocument As New Printing.PrintDocument 

    printdialog.Document = printdocument 

    AddHandler printdocument.PrintPage, AddressOf printdocument_printPage 

    Dim result As DialogResult 

    If (result = DialogResult.OK) Then 
     printdocument.Print() 
    End If 
End Sub 

ためのコードだ私はしません要求されない限りここに入れておきます。

私はトランザクションが保存された後に上記のダイアログが表示されるようにします。それは何らかの理由でやっていません。そしてセーブ・トランザクションのコードは次のとおりです。

Dim payment As New Payment 
    mydbcon = New MySqlConnection 
    mydbcon.ConnectionString = "server=localhost;userid=root;password=;database=sdudb" 
    Dim reader As MySqlDataReader 

    If e.PaymentSuccess = True Then 
     Try 
      mydbcon.Open() 
      Dim Query As String 
      Query = "select * from itemstored" 
      COMMAND = New MySqlCommand(Query, mydbcon) 
      reader = COMMAND.ExecuteReader() 
      While reader.Read 
       insertTranscation(reader.GetString("itemname"), reader.GetString("price")) 
      End While 
      DeleteItemStored() 
      PrintReceipt() 
      reader.Close() 
      reader.Dispose() 
      mydbcon.Close() 
     Catch ex As Exception 
      MessageBox.Show(ex.StackTrace) 
     End Try 
    End If 

ここではmysqlを無視します。主な問題ではありません。

答えて

2

ダイアログが表示されない場合は表示されません。あなたはあなたのコードでprintdialog.ShowDialog()に電話するのを忘れてしまいました。また、チェックする前にresultに何も設定していないこともあります。

それは簡単な修正です:

Dim result As DialogResult = printdialog.ShowDialog() 
関連する問題