TECHNOLOGIES
FORUMS
JOBS
BOOKS
EVENTS
INTERVIEWS
Live
MORE
LEARN
Training
CAREER
MEMBERS
VIDEOS
NEWS
BLOGS
Sign Up
Login
No unread comment.
View All Comments
No unread message.
View All Messages
No unread notification.
View All Notifications
Answers
Post
An Article
A Blog
A News
A Video
An EBook
An Interview Question
Ask Question
Forums
Monthly Leaders
Forum guidelines
viviansm
NA
21
0
Datagrid
Jul 27 2004 12:28 AM
Hi, when I used a comboBox to search for a customer. The customer data will display in a grid. BUT i always get the wrong data from what i selected from the grid. How can i solved this problem? On form2 Private Sub btnSearchName_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearchName.Click With Me.dvCustomer.Table With DataGrid1 .CaptionText = "Search by Last Name" End With If cboLastName.Text = "
" Then .DefaultView.RowFilter = "CustLName like '%'" Else .DefaultView.RowFilter = "CustLName like '" & cboLastName.Text & "%'" End If If BindingContext(Me.DataSet11.Customers).Position < 0 Then With DataGrid1 .CaptionText = "Database is empty !" End With End If dt = .DefaultView.Table End With Me.DataGrid1.DataSource = dt End Sub Private Sub DataGrid1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles DataGrid1.DoubleClick s.id = dt.Rows(DataGrid1.CurrentCell.RowNumber)(0) s.Lname = dt.Rows(DataGrid1.CurrentCell.RowNumber)(1) s.Fname = dt.Rows(DataGrid1.CurrentCell.RowNumber)(2) s.title = dt.Rows(DataGrid1.CurrentCell.RowNumber)(3) s.ic = dt.Rows(DataGrid1.CurrentCell.RowNumber)(4) s.DoB = dt.Rows(DataGrid1.CurrentCell.RowNumber)(5) s.deposit = dt.Rows(DataGrid1.CurrentCell.RowNumber)(6) s.g = dt.Rows(DataGrid1.CurrentCell.RowNumber)(7) s.jd = dt.Rows(DataGrid1.CurrentCell.RowNumber)(8) s.add_1 = dt.Rows(DataGrid1.CurrentCell.RowNumber)(9) s.add_2 = dt.Rows(DataGrid1.CurrentCell.RowNumber)(10) s.postcode = dt.Rows(DataGrid1.CurrentCell.RowNumber)(11) s.city = dt.Rows(DataGrid1.CurrentCell.RowNumber)(12) s.state = dt.Rows(DataGrid1.CurrentCell.RowNumber)(13) s.hp = dt.Rows(DataGrid1.CurrentCell.RowNumber)(14) s.wp = dt.Rows(DataGrid1.CurrentCell.RowNumber)(15) s.cp = dt.Rows(DataGrid1.CurrentCell.RowNumber)(16) s.email = dt.Rows(DataGrid1.CurrentCell.RowNumber)(17) Close() End Sub On form1 Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click Dim f As New frmCustSearch f.ShowDialog() Dim s As frmCustSearch.Customers = f.selecteditems If Not IsNothing(s) Then txtCustomerNo.Text = s.id txtFirstName.Text = s.Fname txtLastName.Text = s.Lname cboTitle.Text = s.title txtICNo.Text = s.ic txtDoB.Text = s.DoB txtDeposit.Text = s.deposit If s.g = "M" Then rbM.Checked = True ElseIf s.g = "F" Then rbF.Checked = True End If txtJoinDate.Text = s.jd txtAddress_1.Text = s.add_1 txtAddress_2.Text = s.add_2 txtPostcode.Text = s.postcode txtCity.Text = s.city txtState.Text = s.state txtHPhone.Text = s.hp txtWPhone.Text = s.wp txtCPhone.Text = s.cp txtEmail.Text = s.email End If End Sub Any help or examples is appreciated viv
Reply
Answers (
0
)
404 error searching this forum.
its on vb.net