Dreams are renewable. No matter what our age or condition, there are still untapped possibilities within us and new beauty waiting to be born.

-Dale Turner-

Kamis, 04 April 2013

# value Datagridview in textbox & by chekbox(in datagridview)



Private Sub DataGridView3_CellClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView3.CellClick
        TextBox3.Text = DataGridView3.Rows(e.RowIndex).Cells(0).Value
        TextBox4.Text = DataGridView3.Rows(e.RowIndex).Cells(1).Value
    End Sub

  Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOK.Click
        For i As Integer = 0 To DataGridView2.RowCount - 2
            If DataGridView2.Rows(i).Cells(0).Value = True Then
                TextBox6.Text = DataGridView2.Rows(i).Cells(1).Value
            End If
            TabControl1.SelectTab(TabPageInput)
            TextBox6.Focus()
        Next
    End Sub

0 komentar:

Posting Komentar