Menampilkan Data dari DataGrid ke TextBox VB.NET - nasir 46

Latest

Blog ini memuat seputar Design, Fiture dan tutorial untuk pemula maupun Pemula Menengah

Terjemahan

BANNER 728X90

Tuesday, December 13, 2016

Menampilkan Data dari DataGrid ke TextBox VB.NET

yaa,, program ini membuat saya bingung 7-keliling dibuatnya,, untuk kalian yang sedangan kesusahan mungkin script dari saya ini dapat membantu anda dalam membuat program database di vb.net ini...


Script cara menampilkan Data dari Datagrid ke textbox.

code :

Imports System.Data.OleDb

Public Class FormAlfa
    Sub TAMPILDATA()
        Call Koneksi()
        Dim sql3 As String
        sql3 = "select * from tbpenjualan"
        dtadapter = New OleDbDataAdapter(sql3, Conn)
        DataGridView1.Refresh()
        Dim ASD As New DataTable
        ASD.Clear()
        dtadapter.Fill(ASD)
        DataGridView1.DataSource = ASD
        Conn.Close()
    End Sub

===========================================

    Private Sub FormAlfa_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Call TAMPILDATA()
         textbox1.Focus()
    End Sub

===========================================
CODING MENAMPILKAN DATA KE TEXTBOX

    Private Sub DataGridView1_CellClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellClick
        Dim i As Integer
        i = Me.DataGridView1.CurrentRow.Index
        With DataGridView1.Rows.Item(i)
            textbox1.Text = .Cells(0).Value
             textbox2.Text = .Cells(1).Value
             textbox3.Text = .Cells(2).Value
             textbox4.Text = .Cells(3).Value
             textbox5.Text = .Cells(4).Value
        End With
    End Sub


No comments:

Post a Comment