Привіт, я хочу відобразити результат SELECT запиту в стовпці прапорця Datagridview. Що я хочу, це побачити відповідні комірки з / без перевірок після отримання результатів від читача даних.
Це мій код:
Dim selectQ2 = "SELECT Advance FROM EmpTripTBL WHERE [EmpID] ="" & Form4.empidtxt.Text & """
Dim dr As OleDbDataReader
Dim cmd As New OleDbCommand(selectQ2, con)
dr = cmd.ExecuteReader()
dr.Read()
If dr.HasRows Then
Dim advstr As String = dr.Item("Advance")
// To add Datagridview Checkbox column
Dim addcolumn As New DataGridViewCheckBoxColumn
With addcolumn
.HeaderText = "Advance"
.Name = "Advance"
.Width = 50
End With
DataGridView1.Columns.Insert(0, addcolumn)
//To check column from database if it"s Yes or No
//Yes = Check
//No = Uncheck
If advstr = "Yes" Then
//Probably the wrong part.
For x As Integer = 0 To DataGridView1.Rows.Count - 2
DataGridView1.Rows(x).Cells(0).Value = True
Next
End If
End If
Це моя таблиця баз даних:
|-- CheckboxColumn --|-- COL 2 --|
Yes text1
No text2
Yes text3
Результат, який я отримую від Datagridview:
Відповіді:
0 для відповіді № 1якщо я зрозумів, що ти прав, значення булевого поля бази даних доступу є істинними або хибними ...
If advstr = TRUE Then
//Probably the wrong part.
For x As Integer = 0 To DataGridView1.Rows.Count - 2
DataGridView1.Rows(x).Cells(0).Value = True
Next
End If
If advstr = FALSE Then
//Probably the wrong part.
For x As Integer = 0 To DataGridView1.Rows.Count - 2
DataGridView1.Rows(x).Cells(0).Value = FALSE
Next
End If