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)

Membuat Program Monitoring lamanya Pemakaian Komputer dengan VB

Visual Basic merupakan aplikasi pemrograman yang dapat memanggil fungsi – fungsi directory windows sehingga pemakai computer dapat mengoptimalkan pemakaian windowsnya sedemikian rupa, pada tulisan sebelumnya yaitu membuat program shutdown otomatis dengan windows itu juga dengan memanggil file library windows yaitu file rundl32.dll dan kali ini program monitoring lamanya pemakaian computer dengan VB juga dengan memanggil file library windows yaitu “kernel32”

Berikut Gambaran tentang Program Monitoring lamanya Pemakaian Komputer dengan VB

1 buah timer

3 buah label untuk menampilkan waktu ( bisa juga menggunakan text)

Beberapa label tambahan untuk keterangan

Gambar Susunan toolbox dalam form

Listing Program

Private Declare Function GetTickCount& Lib "kernel32" ()

Dim time As Long

Private Sub Timer1_Timer()

time = GetTickCount()

detik = time / 1000

menit = time / 60000

jam = time / 3600000

Label4 = detik

Label5 = menit

Label6 = jam

End Sub

Sangat simple bukan, coba jalankan program, ketika di running program akan jalan seperti ini

 

Gambar Program ketika dijalankan

Jangan lupa kalau sudah berhasil make file exe biar bias jalan tanpa visual basic

Semoga bermanfaat…

Keyword: Belajar visual basic, visual basic, program monitoring komputer, membuat program visual basic, VB, aplikasi VB, timer pada VB, program aplikasi VB

Baca Juga:

Tips / Trik Shutdown otomatis tanpa software

Membuat lampu Led berjalan (Running Led) 

Kontrol Program dalam BASCOM AVR 

Trik mengembalikan files yang disembunyikan Virus 

Tips / trik membuat Link (New Tab)

Membuat Program Shutdown Otomatis dengan Visual Basic

Sudah lama tidak berinteraksi dengan visual basic (VB), terakhir pun saya tulisan mengenai visual basic tentang Simulasi Lampu merah dengan Visual Basic dan Simulasi Running Led dengan Visual Basic maklum masih pemula dan kali ini saya mencoba untuk membuat aplikasi sederhana namun cukup berguna untuk pemakai komputer / laptop yang mempunyai kebiasaan meninggalkan komputernya dalam keadaan menyala baik karena bosen menunggu proses download yang lama atau proses copy file maka salah satu solusinya adalah kita membuat jadwal shutdown otomatis dengan program shutdown otomatis dengan Visual basic

Berikut Toolbox yang diperlukan

1 buah timer
2 buah label penampil waktu (bisa juga menggunakan text)
2 buah text
2 buah option
2 buah command button

dan beberapa label untuk keterangan


Berikut gambar susunan toolbox pada form

Gambar Bentuk Form

Listing programnya

Private Sub Command1_Click()
jam = Text1.Text
menit = Text2.Text
If Option1 = True Then
x = "AM"
Else
x = "PM"
End If
waktu = jam + ":" + menit + ":" + "00" + x
MsgBox "Komputer Mati pada:" & waktu
Label7 = waktu
End Sub

Private Sub Command2_Click()
Text1 = ""
Text2 = ""
Option1 = False
Option2 = False
Label7.Caption = ""
Command1.Enabled = False
Text1.SetFocus
End Sub

Private Sub Option1_Click()
Command1.Enabled = True
End Sub

Private Sub Option2_Click()
Command1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Label6 = Time
If Label7.Caption = Label6.Caption Then
Call Shell("rundll32.exe user,exitwindows", vbHide)
End If
End Sub

Jalankan Program dan juga buat file aplikasinya biar bisa berjalan tanpa visual basic.

 Gambar Program yang telah dijalankan

Semoga bermanfaat

Baca juga:
Simulasi Running Led dengan Visual Basic
Simulasi Lampu merah dengan Visual Basic
Kontrol Program dalam BASCOM AVR
Dasar Pemrograman Mikrokontroler dengan BASCOM AVR

Keyword: Belajar visual basic, visual basic, belajar VB, program VB, belajar program VB, aplikasi sederhana, aplikasi VB, aplikasi visual basic, belajar program, program shutdown, program shutdown otomatis, membuat program VB, membuat program shutdown otomatis, shutdown otomatis

Simulasi Running Led dengan Visual Basic

Visual Basic saat ini merupakan salah satu aplikasi pemograman yang sudah seharusnya dikuasai oleh setiap pelajar maupun mahasiswa, karena memang fitur –fitur yang disediakan oleh visual basic bisa digunakan semua kalangan (red: merakyat)….

Stay tune….

Gunakan toolbox berikut

Keterangan:

1. 1. Label1
2. 2. Shape 1 sampai shape 8
3. 3. Commandbutton1
4. 4. Commandbutton2
5. 5. Timer1

Berikut Listing programnya

download disini

Oke… sekarang coba di jalankan, hasilnya bakalan kayak gini….

Selamat mencoba

“Sesungguhnya dalam penciptaan langit dan bumi, dan silih bergantinya malam dan siang terdapat tanda-tanda bagi orang-orang yang berakal, (yaitu) orang-orang yang mengingat Allah sambil berdiri atau duduk atau dalam keadan berbaring dan mereka memikirkan tentang penciptaan langit dan bumi (seraya berkata): "Ya Tuhan kami, tiadalah Engkau menciptakan ini dengan sia-sia, Maha Suci Engkau, maka peliharalah kami dari siksa neraka.”

Simulasi Lampu merah dengan Visual Basic

Simulasi Lampu merah dengan Visual Basic

            Visual Basic saat ini merupakan salah satu aplikasi pemograman yang sudah seharusnya dikuasai oleh setiap pelajar maupun mahasiswa, karena memang fitur –fitur yang disediakan oleh visual basic bisa digunakan semua kalangan (red: merakyat)….

            Okelah kalau begggitu… langsungke intinya kali ini kita akan membuat simulasi lampu lalu lintas dengan menggunakan fungsi timer pada visual basic..

stay tune

masukkan toolbox berikut:

Keterangan:

1.      Shape1

2.      Shape2

3.      Shape3

4.      Shape4

5.      Label

6.      Commandbutton1

7.       Commandbutton1

PLUS TIMER JANGAN LUPA

(timer 1 buat lampunya gerak, timer 2 buat hiutngan mundur)

Truz listing programnya

'program simulasi lampu merah

'created: muhammad aldrin julianto

'tanggal:6 maret 2010

Dim a As Integer

Dim b As Integer

Private Sub Command1_Click()

Timer1.Enabled = True

Timer2.Enabled = True

End Sub

Private Sub Command2_Click()

Timer1.Enabled = False

Timer2.Enabled = False

Label1.Caption = ""

Shape2.FillColor = vbBlack

Shape3.FillColor = vbBlack

Shape4.FillColor = vbBlack

a = 0

b = 0

End Sub

Private Sub Form_Load()

End Sub

 

Private Sub Timer1_Timer()

a = a + Timer1.Interval

Select Case a

Case 4000

Shape2.FillColor = vbRed

Shape3.FillColor = vbBlack

Shape4.FillColor = vbBlack

Case 8000

Shape2.FillColor = vbBlack

Shape3.FillColor = vbYellow

Shape4.FillColor = vbBlack

Case 12000

Shape2.FillColor = vbBlack

Shape3.FillColor = vbBlack

Shape4.FillColor = vbGreen

a = 0

End Select

End Sub

Private Sub Timer2_Timer()

b = b + Timer2.Interval

Label1.Caption = Val(4000 - b) / Val(1000)

Select Case b

Case 4000

b = 0

End Select

End Sub 

 

Hasil jadi kayak ini…..

Selamat mencoba

“Sesungguhnya dalam penciptaan langit dan bumi, dan silih bergantinya malam dan siang terdapat tanda-tanda bagi orang-orang yang berakal, (yaitu) orang-orang yang mengingat Allah sambil berdiri atau duduk atau dalam keadan berbaring dan mereka memikirkan tentang penciptaan langit dan bumi (seraya berkata): "Ya Tuhan kami, tiadalah Engkau menciptakan ini dengan sia-sia, Maha Suci Engkau, maka peliharalah kami dari siksa neraka.”