Program merupakan suatu Program atau Aplikasi yang sengaja dibuat menggunakan batas waktu tertentu sesuai keingingan si Software Maker, jadi apabila lewat batas waktu yg sudah ditentukan program tidak dapat digunakan lagi. Apabila pengguna sudah terlanjur menyukai program tersebut dan ingin menggunakan nya lagi, mau tidak mau pengguna harus memenuhi persyaratan yg diajukan oleh si software maker. Kebanyakan Program yg seperti ini digunakan sebagai sarana untuk mempromosikan suatu progam atau aplikasi.Nah pada postingan kali ini saya coba membahas tentang contoh pembuatan program tersebut, bagi yang berkenan silakan ikuti langkah – langkah berikut :- Buat Project Baru (Standart Exe)- Tambah dua buah Label pada FormKetik code berikut pada Form
Option Explicit
Dim x
Dim y
Dim jumlah
Dim sisa
Private Sub Form_Load()
MsgBox "Program ini hanya dapat di gunakan 5 kali", 48, "Info"
x = GetSetting("y", "y", "y")
jumlah = Val(x) + 1
SaveSetting "Y", "Y", "Y", jumlah
Label1.Caption = "Program sudah dijalankan " & jumlah & " Kali"
sisa = 5 - jumlah
Label2.Caption = "Sisa pemakaian " & sisa & " Kali"
If jumlah > 5 Then
MsgBox "Batas waktu pemakaian sudah habis" + vbCrLf + _
"untuk menggunakan program ini lagi" + vbCrLf + _
"Anda harus menghubungi saya ....", 4, "Info"
Unload Me
End If
End Sub
Mudah – mudahan ada mampaat nya bagi kita semua … dan terimakasih bagi yang mau ngasih komen pada postingan ini …. Salam
Pada kesempatan kali saya mencoba untuk berbagi lagi khusus bagi VB developer yg masih junior seperti saya tentang Pemrogram Database yg memakai Acces 2003 bagian 2, disini saya juga tidak menulis coding-coding nya karena lumayan panjang bisa pingsan jari saya kalaw ngetik nya hehehe … tapi temen-temen bisa mendownload nya. Aplikasi ini tentang Daftar Urut Kepangkatan (DUK) PNS yaitu cara menyortir Kepangkatan PNS yg merupakan Aplikasi saya yg ke dua untuk program database. Hal-hal yang dibahas dalam aplikasi antara lain :1. Sortiran Data2. Contoh sederhana tentang membuat program serial number (Trial Version)
3. Input Data4. Edit Data5. Hapus data
6. Output data (Mencetak Data) dengan Crystall Report
7. Backup Database8. Compact Database
9. Mencopy dan menghapus fileScreen shot seperti gambar di bawah ini
Aplikasi ini belum final 100 % , dan agar program ini bisa berjalan dengan baik .. pastikan Settingan Format Tanggal pada komputer anda dd/mm/yyyy. Bagi yg ingin memodifikasi program ini saya persilahkan.
Yang berminat bisa mendownload nya disini … untuk password aplikasi ini 1234 Semoga ada mampaat nya bagi kita semua …. Terimakasih …salam