Hi,
I have made a project in windows form in visual studio community editon 15.
My all form was designed in 1024 x 768 resolution.
When I run setup on another pc or laptop the screen resolution does not matches.
If my clients using different resolution like 1600 x 1200 or 1600 x 900 or any...
Thanks jmcilhinney.
Actually it was 7th column.
I change code to -
If dr.Read() Then
Dim number = If(dr.IsDBNull(6), "", dr.GetValue(6))
TxtRefNo.Text = number.ToString
dr.Close()
End If
Thanks Again.
...data from this column in text box named as TxtRefNo
My code is
Public Sub InvInfo()
con.Close()
con.Open()
str = "Select * from TblInvoice where InvoiceID=@id"
cmd = New OleDbCommand(str, con)
cmd.Parameters.AddWithValue("@id", TxtInvoiceID.Text)...
Thanks
jmcilhinney
I applied your code for EditRow() as -
Private Sub EditRow(row As DataGridViewRow)
Dim cell = row.Cells
Using dialogue As New FrmAddItemsNew
With dialogue
.TxtTestID.Text = cell(0).Value.ToString()...
Hellow,
I have code for DataGridView1_CellContentDoubleClick to edit row from another form as
Private Sub DataGridView1_CellContentDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellContentDoubleClick
Dim cells = DataGridView1.Rows(e.RowIndex).Cells...
...Source=D:\Access\Sale.accdb")
'Dim cmd As OleDbCommand = New OleDbCommand("SELECT * FROM TblSale", con)
con.Open()
myDA = New OleDbDataAdapter(cmd)
'Automatically generates DeleteCommand,UpdateCommand and InsertCommand for DataAdapter object...
...displayed in datagridview1 by searching Invoice no. in text box which is named as TxtInvoiceNo.
The code is
Dim cmd As New OleDbCommand("SELECT * from TblTest WHERE InvoiceID = @InvoiceID", con)
With cmd.Parameters
.Add("@InvoiceID", OleDbType.VarChar, 50).Value =...
Hello,
I am using SAP crystal report version 13.0.4
I have a invoice designed in this report.
Now I want to Print the same Invoice with Original Copy, Duplicate Copy on each new page's Top Right side.
I have tried Parameter Field.
In Value Section I typed Original Copy, next line Duplicate Copy...
...code
Dim cmd As OleDbCommand
Dim adp As New OleDbDataAdapter
Dim dt As New DataSet
Dim sql As String
sql = "select * from TblTest"
Try
con.Open()
cmd = New OleDbCommand(sql, con)
adp.SelectCommand = cmd...
...table named TblTest by entering Invoice number in Text box named as TxtInvoiceNo.
The code for this is -
Dim cmd As New OleDbCommand("SELECT * from TblTest WHERE InvoiceID = @InvoiceID", con)
With cmd.Parameters
.Add("@InvoiceID", OleDbType.VarChar, 50).Value =...
Thanks
I have made changes as following
Dim cashSubtotal = CDec(dt.Compute("SUM(Amount)", "TypeofSale = 'Cash'"))
Dim creditSubtotal = CDec(dt.Compute("SUM(Amount)", "TypeofSale = 'Credit'"))
Dim total = CDec(dt.Compute("SUM(Amount)", String.Empty))
Dim...
Thanks for your advice jmcilhinney,
I have made following code from your solution.
Dim cmd As New OleDbCommand("SELECT * from TblInvoiceQuery WHERE DateOfSale BETWEEN @DateOfSaleFrom AND @DateOfSaleTo AND CustomerName = @CustomerName", con)
With cmd.Parameters...
Hello,
I have a unbound datagridview which depend on Query from Access database like following -
Column1 Column2 Column3 Column4 Column5
Date InvoiceID CustomerName Cash / Credit Amount...
I have tried following code for DataGridView1_MouseClick event.
Private Sub DataGridView1_MouseClick(sender As Object, e As MouseEventArgs) Handles DataGridView1.MouseClick
If Button Is the left button Then
ContextMenuStrip1.Show()
End If
End Sub
but it give error...
Hello,
I am making a small project on Invoice.
I have a datagridview for Adding, Editing and Deleting products.
For Adding there is a Button.
For Editing and Deleting products I have made a ContextMenuStrip1.
The ContextMenuStrip1 is operated when someone select the cell of datagridview and...
Hello,
I have a table named TblInvoice which have following columns.
InvoiceID(Primary key), DateofSale, CustomerID, SaleType, TypeofSale.
For transferring data to this table the code is
con.Close()
Try
con.Open()
If MsgBox("Save Data to database ?", vbYesNo +...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.