Membuat DataBase pada Visual Basic

Sebelumnya saya sudah memposting tentang DataBase pada delphi kali ini saya akan memposting lagi  masih tentang database yang sama pada sebelumnya namun sekarang saya mencobanya melalui program visual basic.

Software yang diperlukan.

1. Ms.Visual Basic v.6.0

2. Ms. Access.

Pertama Kita Buka Ms.Access dan pada tab table kita klik kanan dan pilih desain view.

Setelah Itu kita masukkan tab yang kita inginkan pada tabel database, disini saya memasukkan NPM,NAMA,KELAS,ALAMAT.

Kita buka program visual basic dan setelah itu kita buat dengan desain sebagai berikut 

kita klik pada Adodc1 lalu atur seperti gambar di bawah ini agar terkoneksi dengan Ms.Access

Setelah itu pindah ke datagrid dan atur lagi pada propertise seperti ini 

lalu klik kanan pada data grid pilih retevie fields makan data grid akan berubah tabelnya seperti yg tertera di Ms.Access.

Setelah semua beres dengan koneksi dan desain maka kita lanjut kepada pembuatan kode program.

pertama kita double klik pada button1 / inputan. dan masukkan kode program seperti berikut.

PENJELASAN PROGRAM

Private Sub Command1_Click()

Adodc1.Recordset.AddNew

Adodc1.Recordset.Fields("NPM") = Text1.Text

Adodc1.Recordset.Fields("NAMA") = Text2.Text

Adodc1.Recordset.Fields("KELAS") = Text3.Text

Adodc1.Recordset.Fields("ALAMAT") = Text4.Text

Adodc1.Recordset.Update

End Sub

Pada kode program diatas dijelaskan bahwa pada field NPM akan diisikan oleh inputan dari text1.text begitupun seterusnya sesuai field dana text yang ada.

Private Sub Command2_Click()

Text1.Text = Delete

Text2.Text = Delete

Text3.Text = Delete

Text4.Text = Delete

End Sub

Pada kode program di atas text1.text = delete

akan berfungsi menghapuskan semua text box.

OUTPUT PROGRAM 

Pertama kita masukan NPM,NAMA,KELAS,ALAMAT setelah itu kita klik input makan yang data yang di input akan keluar di dalam tabel data grid seperti di bawah ini.

Sekian penjelasan tentang DataBase pada Visual Basic.

Read More [...]

Posted in TUTORIAL

TUGAS SOFTSKILL PTI&NI MEMBUAT DATABASE PADA DELPHI v7.0

Pada kesempatan kali ini saya akan membuat database pada delphi yang bia kita gunakan untuk menambahkan sesuatu ke dalam database melalui program delphi.

Sofware yang dibutuhkan :

1. Delphi v.7

2. Ms.Access 2007/2010/2013.

1. Langkah pertama kita buka MS.access dan buat blank database seperti dibawah ini.

2. Langkah kedua klik kanan pada tab table1 dan pilih design view.

3. Setelah di klik kita masukkan saja "Mahasiswa"

4. Setelah itu kita masukkan tab apasaja yang akan di buat contoh seperti gambar di bawah.

5. Kita save database yang telah di buat di Ms.Accesss setelah itu kita bukua program Delphinya, pada program delphi kita buat desain form seperti gambar di bawah.

6. Setelah kita membuat desain seperti di atas kita harus menghubungkan tabel pada Ms.Access dengan Delphi agar terhubung :

1. Propertise Pada ADOConnection

2. Propertise Pada ADOTable

3. Propertise Pada DataSource

4. Propertise Pada DBGrid 

5. Propertise Pada DBNavigator.

7. Ketika semua componet telah di atur sama dengan propertise maka , waktunya kita memasukan kodingan , double klik pada button masukkan kodingan seperti berikut 

PENJELASAN KODE PROGRAM 

procedure TForm1.Button2Click(Sender: TObject);beginedit1.clear;edit2.clear;edit3.clear;edit4.clear;end;

pada kode program di atas di jelaskan bahwa edit1.berarti apapun yg ada di edit1 akan di hapus ketikan di 

klik tombol button2 begitu seterusnya pada edit2,3,4.

procedure TForm1.Button1Click(Sender: TObject);beginAdotable1.open;Adotable1.Append;Adotable1.FieldByName('NPM').AsString := edit1.text;Adotable1.FieldByName('NAMA').AsString := edit2.text;Adotable1.FieldByName('KELAS').AsString := edit3.text;Adotable1.FieldByName('ALAMAT').AsString := edit4.text;Adotable1.post;end;

pada kode program di atas dijelaskan Adotable1.FieldByName('NPM').AsString := edit1.text;     bahwa table1 yang berlabel NPM akan diisikan dengan edit1.text, berlabel NAMA akan diisikan dengan edit2.text, label KELAS akan diisikan dengan edit3.text, label ALAMAT akan diisikan dengan edit4.text.

OUTPUT PROGRAM

Kita masukan NPM,NAMA,ALAMAT,KELAS, Setelah Itu kita klik INPUT.

Sekian dari saya mengenai database pada delphi.

Read More [...]

Posted in TUGAS