Try ' Insert into Invoice Master Dim masterCmd As New SqlCommand("INSERT INTO tbl_Invoice_Master (InvoiceNo, InvoiceDate, CustomerID, SubTotal, TotalCGST, TotalSGST, GrandTotal) VALUES (@invNo, @date, @custId, @sub, @cgst, @sgst, @grand)", conn, transaction) masterCmd.Parameters.AddWithValue("@invNo", txtInvoiceNo.Text) masterCmd.Parameters.AddWithValue("@date", Convert.ToDateTime(txtInvoiceDate.Text)) masterCmd.Parameters.AddWithValue("@custId", cmbCustomer.SelectedValue) masterCmd.Parameters.AddWithValue("@sub", CDec(lblSubtotal.Text)) masterCmd.Parameters.AddWithValue("@cgst", CDec(lblTotalCGST.Text)) masterCmd.Parameters.AddWithValue("@sgst", CDec(lblTotalSGST.Text)) masterCmd.Parameters.AddWithValue("@grand", CDec(lblGrandTotal.Text)) masterCmd.ExecuteNonQuery()
transaction.Commit() MessageBox.Show("Invoice Saved Successfully!") Me.Close() Catch ex As Exception transaction.Rollback() MessageBox.Show("Error: " & ex.Message) End Try End Using End Sub End Class Add a PrintDocument and PrintPreviewDialog control to the form. Then handle the PrintPage event.
BillingSoftware/ ├── Forms/ │ ├── frmLogin.vb │ ├── frmProducts.vb │ ├── frmCustomers.vb │ └── frmInvoice.vb ├── Modules/ │ └── DatabaseHelper.vb ├── Reports/ │ └── InvoiceReport.rdlc └── app.config This module handles all SQL connections and commands using SqlClient .
Private Sub InitializeDetailsGrid() dtDetails.Columns.Add("ProductID", GetType(Integer)) dtDetails.Columns.Add("ProductName", GetType(String)) dtDetails.Columns.Add("Quantity", GetType(Decimal)) dtDetails.Columns.Add("Rate", GetType(Decimal)) dtDetails.Columns.Add("TaxableValue", GetType(Decimal)) dtDetails.Columns.Add("CGST", GetType(Decimal)) dtDetails.Columns.Add("SGST", GetType(Decimal)) dgvDetails.DataSource = dtDetails End Sub
