Membuat Program Trial Version dengan Visual Basic

Bagi para programmer yang sudah membuat berbagai macam program untuk tujuan komersil tentunya sudah menerapkan trik ini agar hasil karyanya tidak dinikmati secara gratis, bagaimana sih membuat program trial version, baik kita akan mencobanya dengan visual basic jadi sesuai dengan judul diatas membuat program trial version dengan visual basic.

Programnya sangat sederhana,

Langkah 1

Buka program visual basic

Lalu, pilih form standard.exe

Langkah 2

Kira – kira susun form seperti berikut (sesuai dengan kreasi anda)

 

Berikut listing programnya

Private Sub Form_Load()

Dim a, b, jumlah, sisa

MsgBox "Software ini hanya dapat dipakai 5 kali"

x = GetSetting("b", "b", "b")

jumlah = Val(a) + 1

SaveSetting "b", "b", "b", jumlah

Label1.Caption = "program ini telah anda gunakan sebanyak " & jumlah & " kali"

sisa = 5 – jumlah

Label2.Caption = "program masih dapat digunakan sebanyak " & sisa & " kali lagi"

If jumlah > 5 Then

MsgBox "program tidak dapat digunakan lagi" + vbCrLf + _

"untuk dapat menggunakan program ini lagi selahkan registrasi"

Unload Me

End If

End Sub

Run Program tersebut, hasilnya seperti berikut

Keyword: Belajar visual basic, program visual basic, program VB, belajar VB, membuat program trial version dengan VB, program trial VB, program trial version dengan visual basic

Baca juga:

Tips / Trik Shutdown otomatis tanpa software

Membuat Program Monitoring lamanya Pemakaian Komputer

Kontrol Program dalam BASCOM AVR 

Trik mengembalikan files yang disembunyikan Virus 

Tips / trik membuat Link (New Tab)