BELAJAR ILMU KOMPUTER

Jumat, 02 Februari 2018

Membuat coding pada data anggota perpustakaan

BelajarKomputer.com Februari 02, 2018 0 Comments

Membuat coding pada data anggota perpustakaan

kita langsung saja ke tkp
langkah pertama klik 2x pada command input.

Akan muncul tammpilan seperti gambaaar di bawah ini.ketik kan coding di bawah private tersebut..

Langkah selanjutnya sama aja seperti langkah pertama tadi, di bawah ini coding-codingnya .
cmd input
On Error GoTo a
Data1.Recordset.AddNew
Text1.SetFocus
a:
Command1.Enabled = False
Command2.Enabled = True
Command3.Enabled = False
Command4.Enabled = False
Command5.Enabled = False
Command6.Enabled = True

cmd save
On Error GoTo b
Data1.Recordset.Update
Data1.Refresh
Data1.Recordset.MoveLast
b:
Command1.Enabled = True
Command2.Enabled = False
Command3.Enabled = True
Command4.Enabled = True
Command5.Enabled = True
Command6.Enabled = True

cmd edit
On Error GoTo c
Data1.Recordset.Edit

c:
Command1.Enabled = False
Command2.Enabled = True
Command3.Enabled = False
Command4.Enabled = False
Command5.Enabled = False
Command6.Enabled = True

cmd delete
On Error GoTo d
Data1.Recordset.Delete
Data1.Refresh
Data1.Recordset.MoveLast
d:
Command1.Enabled = True
Command2.Enabled = False
Command3.Enabled = True
Command4.Enabled = True
Command5.Enabled = True
Command6.Enabled = True

cmd search
On Error Resume Next
Dim kode As String
kode = InputBox("ketik NIP:")
Data1.Recordset.Index = "idxnip"
Data1.Recordset.Seek "=", kode
If Data1.Recordset.NoMatch Then
Text1.Text = Data1.Recordset.Fields(0)
Text2.Text = Data1.Recordset.Fields(1)
Text3.Text = Data1.Recordset.Fields(2)
Text4.Text = Data1.Recordset.Fields(3)
Text5.Text = Data1.Recordset.Fields(4)
response = MsgBox("Data Tidak Ditemukan!", 0, "Pencarian Data")
End If

cmd exit
If (MsgBox("YAKIN ANDA INGIN KELUAR?", vbYesNo, "KELUAR") = vbYes) Then
Unload Me
End If

kita kemabli lagi ke database tersebut ke mennu bar pilih add ins sama seperti langkah pertama membuat database, tapi yang ini hanya membuka file yang telah disimpan ., klik kanan pada perpus pilih desaign.

Hanya perlu di ubah bagian add index di ketik idxnis setelah itu close, yang terakhir ini untuk pencarian coding data.

jalankan program tersebut, jika berhasil seperti gambar di bawah ini.

SELAMAT MENCOBA.........................

Cara mengubah texbox pada menu form data annggota perpustakaan

BelajarKomputer.com Februari 02, 2018 0 Comments

Cara Mengubah Texbox Pada Menu Form Data Annggota Perpustakaan

Selamat datang kembali para pembaca sekalian. ok kita langsung saja tutorial ini.

langkah pertama ke menu form tersebut, pilih textbox text1 lebih jelasnya lihat gambae=r di bawah ini

Kemdian ke propertis, pilih data source nya data1 dan data fieldnya pilih nis.

selanjutnya semuanya langkah-langkah tersebut sama seperti langkah pertama, hanya saja yang membedakan nya daari form tersebut harus sama persis karena database tersebut sudah di atur semirip mungkin, jika semua sduah di ubah kita jalankan, klik pada segitiga hijau tersebut

Ok berhasil jalan tanpa ada text-text tersebut. seperti gambar di bawah ini .

Ok terimakasih .. selamat mencoba semoga berhasil.. salam sukses.

cara menggabungkan database ke form data anggota perpustakaan

BelajarKomputer.com Februari 02, 2018 0 Comments

Cara Menggabungkan Database Ke Form Data Anggota Perpustakaan

Selamat datang kembali di blog ini........ kiya langsung saja yah pembahasan selanjutnya lebih rumit tentang program vb 6.0 tersebut.

langkah pertama klik kanan pada bulet merah tersebut kudian ppilih component.

kemudian cari lah file terssebut seperti pada gambar di bawah ini, jika ketemu, kemudian centang, dan kllk ok .

Dbgrid tersebut akan muncul di component tersebut.

Pilih data pada component general dan pilih juga DBGridnya kemi=udian di letakkan di bawah form yang kita buat tadi, lebih jelasnya lihat gambar du=i bawah ini.

Ok kita pillih datakita oilih datasetname tersebut

Selanjutnya pilih database ynag kita simpan di folder ita tersebut. klik anggota kemudan open.

Masih di menu data1 tadi cari file recordsource kemudian klik segitiga terbalik tersebut, pilih perpus.

Selanjutnya ke menu DBGridnya kita ubah bagian datasource pilih data1.

Ok jika sudah di atur semua di dalam pemilihan database tersebut kemudian pilih DBGrid yang ada di menu form yang kta buat tadi, kllik kanan pada DBGrid tersebut kemudian pilih retrieve fileds tersebut. maka akan muncul table tang kita buat fi data base tersebut, seperti gambar di baah ini. sangat mudah bukan untuk menggabungkan database ke form terseebut.

Ok sekian dan terimakasih , selamat mencoba semoga berhasil ... salam sukses.

cara membuat database pada form data anggota perpustakaan

BelajarKomputer.com Februari 02, 2018 0 Comments

Cara Membuat Database Pada Form Data Anggota Perpustakaan

Selamat datang kembali di blog yang sederhana ini... ok kita langsung saja ke tkp....

Langkah pertama pilih add ins pada menu bar kemudian ppilih visual data manage.

Langkah selanjutnya akan muncul menu tersebut, kemudian pilih menu file , pilih new kemuidan microsoft acces pilih yangg versi 7.0 MDB.

Langkah selanjutnya utnuk menyimpan database di dalam folder bersamaan dengan membuat form tersebut agar mudah membaca database tersebut, untuk menyimpan beri nama anggota jika sudah selesai maka save..

Ok selanjutnya kita open database anggota tersebut, akann muncul menu database windows, menu ini di gunakan untuk membuat table pada database tersebut.ok kemudian klik kanan pada prpertis kamudian pilih new table.

Nah di sini kita masuk ke menu tabel struktur kita isikan table tersebut klik pada add field.

Kemudian isikan name tersebut yang ada di form yang kita buat .

Seperti ini hasill yang kita isi tadi, jangan lupa juga kita buat table name tersebut yaitu dengan nama perpus, ok kita buatkan primary key nya yaitu kita pilih add index.