Perhatikan Gambar Di bawah ini :
Gambar tersebut di Atas adalah kelanjutan dari Tutorial Sebelum nya,dan gambar tersebut masih utuh sesuai dengan bawaan nya yang baru di masuki data dari Data Tabel SQL,sehingga Posisi data pada Fileds atau kolom kolom nya masih biasa.
Nah sekarang kita akan merubah Posisi dari data pada Fields2 atau kolom2 nya menjadi lebih enak untuk di pandang seperti pada gambar berikut di bawah ini.
Jika anda mengikuti tutorial saya dari awal ketika memasuki data dari Tabel SQL ke dataGrid, maka Anda akan langsung memahami Source Code yang saya buat di bawah ini,karena anda hanya tinggal menyisipkan nya di antara Source Code sebelumnya.. Untuk Source Code nya adalah Sebagai berikut :
Private Sub Form_Load()
Call koneksi
Call dtgrid
Set DataGrid1.DataSource = rsdata
With DataGrid1
.Columns(0).Caption = "Operator"
.Columns(1).Caption = "Nominal"
.Columns(2).Caption = "No Tujuan"
.Columns(3).Caption = "Harga"
.Columns(1).NumberFormat = "#,##0"
.Columns(3).NumberFormat = "#,##0"
.Columns(0).Alignment = dbgCenter
.Columns(1).Alignment = dbgRight
.Columns(2).Alignment = dbgCenter
.Columns(3).Alignment = dbgRight
End With
*Source Code di atas yang berwarna merah adalah Source Code yang di sisipkan pada Source Code Tutorial sebelum nya yang pernah saya berikan.
Selamat Mencoba...!!
Gambar tersebut di Atas adalah kelanjutan dari Tutorial Sebelum nya,dan gambar tersebut masih utuh sesuai dengan bawaan nya yang baru di masuki data dari Data Tabel SQL,sehingga Posisi data pada Fileds atau kolom kolom nya masih biasa.
Nah sekarang kita akan merubah Posisi dari data pada Fields2 atau kolom2 nya menjadi lebih enak untuk di pandang seperti pada gambar berikut di bawah ini.
Jika anda mengikuti tutorial saya dari awal ketika memasuki data dari Tabel SQL ke dataGrid, maka Anda akan langsung memahami Source Code yang saya buat di bawah ini,karena anda hanya tinggal menyisipkan nya di antara Source Code sebelumnya.. Untuk Source Code nya adalah Sebagai berikut :
Private Sub Form_Load()
Call koneksi
Call dtgrid
Set DataGrid1.DataSource = rsdata
With DataGrid1
.Columns(0).Caption = "Operator"
.Columns(1).Caption = "Nominal"
.Columns(2).Caption = "No Tujuan"
.Columns(3).Caption = "Harga"
.Columns(1).NumberFormat = "#,##0"
.Columns(3).NumberFormat = "#,##0"
.Columns(0).Alignment = dbgCenter
.Columns(1).Alignment = dbgRight
.Columns(2).Alignment = dbgCenter
.Columns(3).Alignment = dbgRight
End With
*Source Code di atas yang berwarna merah adalah Source Code yang di sisipkan pada Source Code Tutorial sebelum nya yang pernah saya berikan.
Selamat Mencoba...!!