Senin, 12 November 2018

Gambar Postingan Vb net coneksi ke access

ADAPUN SEBUAH PROJECK VB NET DATA INPUT WARGA DOMISILI TERKONEKSI KE ACCESS 

➤PERTAMA KITA MELAKUKAN DESAIGN PADA SUATU PROJECK
   ADA LABEL
            ⧪ TEXTBOOX
            ⧪ BUTTON 
            ⧪ DATAGRIDVIEW1
             



➤SETELAH DESAIGN SELESAI KITA MELAKUKAN CODINGAN DI SUATU PROJECK AGAR TERKONEKSI KE DATA BASE TERSEBUT





SETELAH CODINGAN PUN SELESAI KITA RUUN DAN HASIL PUN LANGSUNG MUNCUL SEBUAH FROM LOGIN  
➤KODE USER
➤USER NAME
➤PASSWORD
KETIK SESUAI KODE USER ,USER NAME,DAN PASSWORD YANG ADA DI SEBUAH PROJECK ATAUPUN DATA YANG TELAH DI TENTUKAN



➤SETELAH DI KETIK FROM LOGINNYA MAKA MUNCUL PROJECK YANG TELAH SAYA BUAT ADA 
➤NIK
➤NAMA
➤ALAMAT
➤STATUS
➤PEKERJAAN
KITA KETIK SESUAI DAFTAR WARGANYA KETIK SIMPAN MAKA DATA WARGA YANG KITA KETIK TERSIMPAN LAH DI SEBUAH DATA BASE ACCESS YANG TELAH KITA BUAT JADI TERKONEKSI



➤DAN HASILPUN SEPERTI INI DATA INPUT WARGA PUN TERSIMPAN DI SEBUAH PROJECK DATA BASE ACCESS YANG TELAH KITA INPUT .....
CUKUP SEKIAN DARI SEBUAH PROJECK SAYA SEMOGA BERMANFAAT SAYA AKHIRI WALAIKUM SALAM WR.WB 


SALAM SEMANGAT CODINGAN








Sabtu, 10 November 2018

BIODATA PEGAWAI GAJI KARYAWAN



➤INI LAH SEBUAH PROJECK JAVA NETBENS BIODATA PEGAWAI DAN SELIP GAJI PEGAWAI

⧪DESKRIPSI
1.JFRAME DESAIGN DULU PROJECKNYA TERLEBIH DAHULU ADA LABEL, TEXTFIELD,BUTTON DAN PANNEL SESUDAH ITU BARU CODINGANNYA SECARA TERATUR DAN SUDAH ADA DI KODE TERSEBUT YANG TELAH DI TENTUKAN

2. SETELAH CODINGAN SELESAI ....
COBA KITA RUUN DAN HASILNYA PUN CUKUP MEMUASKAN KETIK NIK , NAMA , TEMPAT TANGGAL LAHIR , ALAMAT , STATUS, GAJI , DAN JABATAN

3. SETELAH ITU KLIK ENTER MAKA AKAN TERBACA DI SEBUAH DATA BASE YANG TELAH KITA SIAPKAN YAITU PANEL

ITU LAH SEBUAH PROJECK JAVA NETBEENS SAYA SEMOGA BERMANFAAT UNTUK KALIAN TERIMA KASIH

SEMANGAT KODINGAN........






Sabtu, 03 November 2018

DATA INPUT WARGA MICROSOFT WORD TUGAS UTS




DATA BASE WORD DAN EXCEL INPUT DATA WARGA
Desain from 1 menjadi input data warga1
·        Label 5 buah , Textbook 5 buah , dan Button 2 buah

PERTAMA KITA MEMBUAT DESAIGN DI FROM INPUT DATA WARGA1



KEDUA UDAH SELESAI DESAIGN FROM INPUT DATA WARGA1 KITA MULAI MENCODING SESUAI APA YANG KITA INGINKAN



SETELAH SELESAI CODINGAN KITA RUUN TERKONEKSI VB NET DENGAN MICROSOFT WORD 


HASILNYA CUKUP BAGUS DAN TERBACA OLEH MICROSOFT WORD 

ADAPUN CODINGAN NYA DATA BASE INPUT DATA WARGA1 SEBAGAI BERIKUT...?


Imports word = Microsoft.Office.Interop.Word


Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Dim aplikasi As New word.Application
        Dim dokumen As word.Document

        dokumen = aplikasi.Documents.Open("C:\Users\RIZKI PRATAMA\Documents\INPUT DATA WARGA1.docx")

        dokumen.Bookmarks("NIK").Select()
        aplikasi.Selection.TypeText(Textnik.Text)

        dokumen.Bookmarks("NAMA").Select()
        aplikasi.Selection.TypeText(Textnama.Text)

        dokumen.Bookmarks("ALAMAT").Select()
        aplikasi.Selection.TypeText(Textalamat.Text)

        dokumen.Bookmarks("STATUS").Select()
        aplikasi.Selection.TypeText(Textstatus.Text)

        dokumen.Bookmarks("PEKERJAAN").Select()
        aplikasi.Selection.TypeText(Textpekerjaan.Text)

        dokumen.SaveAs("C:\Users\RIZKI PRATAMA\Documents\LAPORAN\INPUT DATA WARGA1.docx")
        aplikasi.Visible = True


        End


    End Sub
End Class

SELAMAT BELAJAR CODINGAN DAN SELAMAT MENCOBA PROGRAMMER IT CYBER VB. NET SEMANGAT.....