Cara membuat tabel karyawan dan form karyawan

membuat database karyawan

Halo sahabat blogger kembali lagi bersama saya disini, Kali ini kita akan belajar tentang bagaimana caranya membuat TABEL KARYAWAN dan FORM DATA KARYAWAN menggunakan Visual basic yang ada di microsoft acces 2013. Ada banyak sekali yang bisa kita buat dengan software yang satu ini di antara nya:

  • Membuat aplikasi penjualan
  • Aplikasi kasir
  • Cara membuat aplikasi karywan
  • Membuat aplikasi karywan
  • Membuat database karyawan
  • Aplikasi penilaian siswa
  • Membuat tabel siswa
  • Membuat database perpustakaan
  • Membuat database barang penjualan

Sebelum kita membuat database yang lain nya kalian harus mengerti dasar-dasar ynag digunakan seperti tabel, query, query desaign, form desaign dll.Table merupakan objek pertama yang harus kita buat dulu sebelum kita membuat yang lain nya karna ini akan menjadi dasar database program yang kita buat. Dan form desaign sendiri adalah tempat atau layout kita mendesaign program dan database yang akan kita buat seperti gambar di atas itu sebuah desaign yang saya buat. Agar bisa jelas nya tentang pengertian tabel,query, query desaign dan lain-lain. Kalian bisa baca artikel:


Di postingan sebelum nya kita sudah membuat Tabel barang dan form tabel barang. Yang belum membaca nya bisa langsung liat disini. Dan sekarang kita akan melengkapi nya dengan membuat data karyawan, Mustahil donk sebuah toko tidak mempunyai karyawan hehehehe...
Dan sekarang kita akan melengkapi toko tersebut dengan membuat form data karyawan nya..

Langsung saja kita ke langkah-langkah nya:

  1. Buka dulu microsft acces nya 
  2. Seperti biasa kita buat dulu tabel karyawan nya cara pilih CREATE trus pilih TABEL DESAIGN maka tampilan nya akan seperti di bawah ini: 

    membuat database karyawan

        3. Kita isikan field-field name nya seperti KODE KARYAWAN, NAMA KARYAWAN, ALAMAT,
            KOTA, JK(Jenis Kelamin) dan FOTO seperti gambar di bawah ini:


    membuat database karyawan 
       4. Kalok sudah di isi pilih VIEW di pojok kiri atas dan isikan field-field name yang sudah di buat 
          dengan nama alamat yang agan-agan ingin kan seperti contoh di bawah ini :
    membuat database karyawan
      5. Nah kalok sudah di isi kita simpan tabel nya dengan Tabel karyawan atau Karyawan saja.
          
    Kenapa saya simpan dengan nama karyawan saja karna di coding VB nya nanti itu saya 
          memanggil nya dengan nama karyawan.
       6.Tahap selanjut nya kita buat form data karyawan nya cara nya pilih CREATE seperti biasa nya 
           lalu klik FORM DESAIGN, maka akan keluar seperi di bawah ini:
    membuat database karyawan
       7. Tahap mendesaign sebuah form nya disini saya menggunakan
    • 1 LABEL
    • 6 TEXT BOX dan
    • 10 BUTTON atau COMMAND BUTTON

    membuat database karyawan 

    Desaign lah sesuai keinginan agan-agan dan jangan lupa ganti nama text box dan commend button nya seperti gambar di atas dan sesuaikan nama text box nya denga coding nya agar tidak terjadi error

     8. Tahap terakhir kalok sudah di desaign kita memasukan coding nya, cara nya klik DATABASE 
          TOOLS dan Visual basic trus masukan coding di bawah ini:

    Option Compare Database
    Dim koneksi As New ADODB.Connection
    Dim rskaryawan As New ADODB.Recordset

    Sub tampildata()
    TxtKodekaryawan.Value = rskaryawan(0)
    txtnamakaryawan.Value = rskaryawan(1)
    txtalamat.Value = rskaryawan(2)
    txtkota.Value = rskaryawan(3)
    txtjeniskelamin.Value = rskaryawan(4)
    End Sub

    Public Sub txt(bk As Boolean)
      TxtKodekaryawan.Locked = bk
      txtnamakaryawan.Locked = bk
      txtalamat.Locked = bk
      txtkota.Locked = bk
      txtjeniskelamin.Locked = bk
    End Sub

    Private Sub cmdadd_Click()
    TxtKodekaryawan.Value = ""
    txtnamakaryawan.Value = ""
    txtalamat.Value = ""
    txtkota.Value = ""
    txtjeniskelamin.Value = ""
    Call txt(False)
    TxtKodekaryawan.SetFocus
    End Sub



    Private Sub cmdclose_Click()
    a = MsgBox("Yakin mau keluar?", vbYesNo + vbInformation, "PESAN")
    If a = vbYesNo Then
    End
    End If
    End Sub

    Private Sub cmddel_Click()
    If MsgBox("Yakin mau dihapus?", vbQuestion + vbYesNo, "Konfirmasi") = vbYes Then
    rskaryawan.Delete
    rskaryawan.MoveFirst
    Call tampildata
    End If
    End Sub

    Private Sub cmdedit_Click()
    Call txt(False)
    End Sub

    Private Sub Cmdfirst_Click()
    rskaryawan.MoveFirst
    Call tampildata
    MsgBox "Ini adalah data pertama"
    End Sub

    Private Sub cmdlast_Click()
    rskaryawan.MoveLast
    Call tampildata
    MsgBox "Ini adalah data yang terakhir"
    End Sub

    Private Sub cmdnext_Click()
    rskaryawan.MoveNext
    If rskaryawan.EOF Then
    rskaryawan.MoveLast
    MsgBox "Ini sudah data terakhir"
    End If
    Call tampildata
    End Sub

    Private Sub cmdprev_Click()
    rskaryawan.MovePrevious
    If rskaryawan.BOF Then
    rskaryawan.MoveFirst
    MsgBox "Ini sudah data pertama"
    End If
    Call tampildata
    End Sub

    Private Sub cmdsearch_Click()
    If rskaryawan.RecordCount > 0 Then rskaryawan.MoveFirst
    rskaryawan.Find "KodeKaryawan='" & txtcari.Value & "'"
    If Not rskaryawan.EOF Then
    cmdsearch.Visible = False
    Call tampildata
        MsgBox "Barang tidak ketemu"
        rskaryawan.MoveFirst
        cmdsearch.Visible = True
        End If
        Call tampildata
        txtcari.Value = ""
    End Sub

    Private Sub Form_Load()
    Set koneksi = CurrentProject.Connection
    koneksi.CursorLocation = adUseClient
    rskaryawan.Open "karyawan", koneksi, adOpenDynamic, adLockBatchOptimistic
    Call tampildata
    Call txt(True)
    End Sub

    Simpen dengan nama form data karyawan dan coba jalan kan....

    Demikian tentang cara membuat tabel karyawan menggunakan microsoft acces 2013 dan semoga tutorial ini bermanfaat GOOD LUCK dan SELAMAT MENCOBA
    Dan jangan lupa sering-sering lah mencoba karna pepatah bilang BISA KARNA TERBIASA
     WASSALAM


    ARTIKEL LAINNYA:

    Komentar

    Posting Komentar

    Postingan populer dari blog ini

    Pemilihan Presiden dan Wakil Presiden

    Gambar
    Pemilihan Presiden dan Wakil Presiden merupakan salah satu materi yang terdapat pada mata pelajaran Pendidikan Kewarganegaraan kelas 6. Materi Pemilihan Presiden dan Wakil Presiden ini mengulas tentang bagaimana proses Pemilihan calon Presiden dan Wakil Presiden secara demokrasi, mulai dari penentuan calon peserta, pemilih, cara berkampanye, pemungutan suara hingga penetapan calon terpilih. Berikut ulasan materinya. semoga bermanfaat.  Sebelum pemilu tahun 2004 pemilihan Presiden dan Wakil Presiden RI dilakukan oleh Majelis Permusyawaratan Rakyat (MPR). Namun, mulai Pemilu 2004 calon Presiden dan Wakil Presiden RI dipilih secara langsung oleh bangsa Indonesia melalui pemilihan umum presiden dan wakil presiden. Proses pemilihan calon presiden dan wakil presiden dan tahapan-tahapannya hampir sama dengan pemilihan DPR, DPRD, dan DPRD. Pemilu presiden dan wakil presiden diselenggarakan oleh KPU. 1. Peserta Pemilu Presiden dan Wakil Presiden Peserta pemilu presiden dan wakil presiden ad...
    Baca selengkapnya

    Kerajaan Singasari

    Gambar
    Kerajaan Singasari berdiri pada tahun 1222. Kerajaan ini didirikan oleh Ken Arok. Ia mendirikan Singasari setelah mengalahkan Kerajaan Kediri pada pertempuran di Ganter. Kerajaan Singasari terletak di antara Kota Lawang - Malang, Jawa Timur. Ken Arok adalah pembentuk dinasti Rajasa sebagai raja yang memiliki pengaruh di kerajaannya. Ia berusaha mempertahankan keberadaan Singasari atas keturunannya sendiri. Tohjoyo direncanakan sebagai penggantinya. Namun, sebelum rencananya terwujud terjadi kemelut dalam kerajaan. Anusapati (anak Tunggul Ametung) membunuh Ken Arok melalui orang upahan. Setelah mengetahui bapaknya dibunuh, Tohjoyo lalu membunuh Anusapati pada tahun 1248. Rencana balas dendam antar keturunan terus berlanjut. Tohjoyo pun mengalami nasib yang sama. Ia dibunuh oleh keturunan Anusapati. Akhirnya, pada tahun 1268 Wisnuwardhana memerintah di Kerajaan Singasari. Mulai masa itulah kerajaan ini berhenti bertikai dengan bantuan Mahesa Campaka. Mahesa Cempaka adalah saudara seayah ...
    Baca selengkapnya

    Pesawat Sederhana

    Gambar
    Berikut ini merupakan materi IPA kelas 5 tentang Pesawat sederhana yang dapat kalian pelajari. Berikut uraian singkat materi pesawat sederhana. PESAWAT SEDERHANA Pesawat sederhana dirancang untuk memudahkan pekerjaan manusia. Untuk lebih jelasnya maka kita akan memperlajari prinsip-prinsip pada bidang miring. 1. Tuas Pengungkit merupakan tuas yang paling sederhana. janis tuas dibedakan menjadi 3 golongan yaitu; a. pengungkit jenis I Urutannya yaitu beban - titik tumpu - kuasa Contoh: gunting dan tang b. pengungkit jenis II Kuasa - beban - titik tumpu Contohnya mendorong gerobak pasir c. pengungkit jenis III Contohnya memegang sekop untuk mengambil tanah 2. Bidang Miring Bidang miring adalah letak permukaan-permukaan yang miring. Bidang miring digunakan untuk memudahkan pekerjaan kita. Misalnya, memindahkan kayu ke dalam truk. Keuntungan menggunakan bidang miring. Tenaga yang dibutuhkan sama, tetapi memudahkan usaha atau kerja. Kelemahan bidang miring adalah jarak tempuhnya menjadi jau...
    Baca selengkapnya