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 membuat Link (New Tab)
Categories:
Visual Basic
0 komentar:
Posting Komentar