Jutsu Coding: vb6

Showing posts with label vb6. Show all posts

Event di Visual Basic

Hallo guys kali ini admin akan melnjutkan pembahasan tentang visual basic 6.0 atau sering disingkat dengan VB6, oke kita langsung saja ke pembahasan...

Pengertian Event di Visual basic 6.0

Kita sekarang akan membahas mengenai apa itu event di visual basic ? Di javascript kita juga pernah pengenal apa itu event , Tetapi agar lebih jelas lagi kita akan bahas kembali . Sekedar mengingatkan bahwa event itu adalah kejadian , maksudnnya misal di visual basic itu ada banyak sekali kejadian contoh seperti ketika di klik maka akan melakukan fungsi ini . Misalnya lagi di dalam sebuah games misal CS ketika kita menekan tombol W maka akan berpindah atau melakukan fungsi berpindah ke depan . Tidak hanya ketika mouse di click , atau keyboard di tekan , saja event itu .

Berbagai Event di VB 6.0

Di vb banyak sekali event event , antara lain :

Click : Ketika kita klik kiri mouse
Dblclick : ketika kita klik kiri dua kali
Dragdrop : Ketika kita menyeret objek
Dragover : ketika kita meyeret objek
Mouse Down : Ketika kita menekan dan menahan tombol kiri di mouse
KeyPress : Ketika kita menekan tombol di keyboard . Misal menekan tombol w maka melakukan perintah . Untuk itu kita harus mengenal kode kode ASCII , tidak perlu di hapal kita cukup tau saja kegunaanya apa di dalam dunia pemprograman .
KeyDown : Ketika kita menekan dan menahan sebuah tombol di keyboard

Baca Juga : Perulangan pada Visual Basic 6

KeyUp : Ketika kita selesai menekan sebuah tombol yang ada di keyboard
Activate : Ketika sebuah form menjadi windows aktif
Deactive : Ketika berpindah form
GotFocus : Ketika sebuah objek menjadi satu satunya fokus
LostFokus : Ketika sebuah objek kehilangan fokus
Load : Ketika form di load atau di panggil atau di buka
LinkOpen : Ketika sebuah aplikasi menginisal suatu DDE dengan form
LinkClouse : Ketika di akhir pemanggilan DDE
LinkExecute : Ketika aplikasi mengirim perintah ke aplikasi vb dengan DDE
LinkError : Ketika kesalahan sebelum pemanggilan DDE
LinkNotify :Ketika aplikasi sumber mengubah data yang dihubungkan dengan aplikasi Vb
Timer : Ketika event lain dijalankan sebelum event ini dijalankan . Event ini hanya berhubungan dengan kontrol .
Scoll : Ketika user menyerek kotak kecil pada scoll bar .
PathChange : Ketika path standar mencari sebuah nama file di ubah .
PatternChange : Ketika kode pencarian daftar file di ubah
Validate : Ketika untuk memastikan bahwa data telah ditangani dengan baik

Itu dia berbagi Event di VB 6 . Gimana , pada ngantuk bacanya ya ? Jika ngantuk kita langsung saja praktek , jika tidak ngantuk coba lebih memahami lagi materi event ini .

Contoh menggunaan Event di VB 6

Sekarang kita akan coba , bagaimana cara menggunakan event ? Kita buat saja Tampilan seperti di bawah . Ada Text Box , Label , Commad Bottom .

Desain saja sesuka hati kalian , yang terpenting di sini kita membutuhkan Text box , 2 label , dan command bottom . Jika sudah kita Double click pada command bottom atau masuk ke bagian code .

Dan ketik Seperti berikut .


Private Sub Command1_Click()

Label2 = Text1

End Sub

Baca Juga : Operasi File pada VB6

Jika sudah Sekarang kita coba jalankan dengan menekan tombol F5 pada keyboard atau menekan tombol start

Nah kurang lebih seperti itu hasilnya jika kita isi textbox dan kita klik Simpan maka akan tampil di label2 . Jadi kita di sana sebagai contoh kita menggunakan event Clik .

Oke Mungkin itu dia pembahasan mengenai event di VB 6 , semoga bermanfaat dan juga menambah wawasan . Terimakasih telah berkenan membaca artikel ini . Sampai jumpa di artikel yang lainnya yang lebih menarik dan juga lebih bermanfaat .

Variable visual basic 6.0

wandi 11:30 PM Pelajaran Pemprograman vb6 Add Comment

wandi

Hallo guys kembali lagi bersama saya, di kesempatan kali ini saya akan memcoba share ilmu mengenai visual basic . Sekarang saya akan membahas mengenai Variable pada visual basic . Kawan kawan mungkin sudah pada tau apa itu variable ?

Hanya mengingatkan
Ini Versi wikipedia

Dalam pemrograman komputer, variabel adalah lokasi penyimpanan dan terkait nama simbolis yang berisi beberapa kuantitas yang diketahui atau tidak diketahui atau informasi,nilai. Nama variabel adalah cara biasa untuk referensi nilai yang disimpan, pemisahan nama dan konten ini memungkinkan nama yang akan digunakan secara terpisah dari informasi tepat yang diwakilinya.^{[diragukan – diskusikan]} Nama variabel di kode sumber komputer adalah pengenal yang dapat terikat ke nilai selama waktu berjalan, dan nilai yang dapat berubah selama program eksekusi.

Variable pada Visual Basic 6.0

Variable pada visual basic di visual basic merupakan penulisan varibale yang paling mudah dari pada yang lainnya , Apa alasannya ?

Baca Juga : Percabangan pada visual basic 6

Tidak perlu menentukan tipe data dulu . Kalo di bahasa pemprograman lain seperti c , java , dan kawan kawan perlu untuk menentukan tipe data dulu , tetapi kalo di vb tidak perlu menentukan tipe data , tipe datanya otomatis ketika kita memberi nilai misal bilangan berarti integer .
Tinggal tulis nama variable saja . Kalo di bahasa pemprograman lain menulis variable perlu penentukan tipe data atau menulisakan kata atau simbol tertentu , seperti di php diawali $ , di javascript di awali var spasi namanya . Kalo di vb ini tinggal tulis nama saja

Variable di vb memang beda .

Di dalam vb terdapat dua jenis variable , yaitu vaiable lokal dan variable global , dari namanya saja sudah bisa di tebak . Kalo variable lokal berarti hanya di dalam suatu fungsi atau subroutine , penilisannya langsung saja .Kalo variable global variable yang bisa di akses oleh berbagai fungsi , Untuk itu perlu mendeklarasikan dulu di paling atas kode , contoh dim nama as string .

Contoh program variable

Sebagai contoh kita akan coba untuk membuat penambahan 2 bilang dengan variable . Berarti kita memerlukan tiga buah variable yang dua inputan user dan yang satu lagi adalah buat menampung atau menyimpan penjumlahan inputan user . Jadi di ibaratkan kita memiliki tiga buah ember yang dua sudah diisi dan yang satu lagi akan diisi dengan pengabungan dua ember tersebut .

Desain seperti di bawah , gak sama desainnya gak apa apa , yang terpenting kita siapkan 2 textbox , 3 label , dan 1 command button . Nama jangan di ubah

Kita ketik kode berikut

Val itu untuk mengambil nilai angka , jadi kalo kita kasih text1 dan text2 string maka hasilnya akan nol .
Ini contoh yang paling sederhananya .

Sebenarnya kita bisa sih hanya satu variable saja , tetapi sebagai dasarnnya tiga dulu . Kalo kawan kawan ingin satu variable coba buat sendiri atau kalo gak mau yang ribet ketik seperti gambar di bawah

Hasilnya sama saja . Sekarang kawan kawan coba buat pengurangan , perkalian , pembagian , dan lain lain , Sebagai penglebih pahaman saja .

Oke mungkin itu dia bahas bahas mengenai variable di vb6 . Semoga bermanfaat dan juga menambah wawasan . Terimakasih telah berkenan .Sampai jumpa di artikel yang lainnya yang lebih bermanfaat dan juga lebih menarik lagi .

Percabangan pada visual basic 6

wandi 3:00 AM Pelajaran Pemprograman vb6 Add Comment

wandi

Kali ini saya akan berbagi mengenai percabangan pada visual basic . Seperti yang kita tau bahwa percabangan adalah merupakan struktur dasar pada algoritma , jadi percabangan merupakan dasar pemprograman . Seluruh bahasa pemprograman pasti ada yang namanya percabangan .

Percabangan vb6

Percabangan ibaratnya kita sedang ulangan fisika dan hasil nilainya adalah 100 dan kkm adalah 99 . Maka tidak perlu lagi adanya remedial . Tetapi jika hasil nilainya lebih kecil dari 99 maka akan ada remedial . Jadi percabangan itu di pengaruhi oleh kondisi , kalo nilai >= 99 maka tidak perlu remedial dan nilai < 99 maka remedial . > , >= , <= , < , = ,!= ( jika tidak sama dengan ) ini disebut operator perbandingan .

Percabangan pada vb6 ada if , select case .

percabangan dengan if

Oke yang akan pertama kita bahas adalah if . Penulisan if adalah


If kondisi Then
    perintah
    perintah
    ...
Else
    perintah
    perintah
    ...
End If

Sekarang kita akan coba gunakan
Atur tampilan seperti berikut

Sekarang kita ke bagian koding


Private Sub Command1_Click()
bil1 = Val(Text1)
bil2 = Val(Text2)
If bil1 > bil2 Then
    Label3.Caption = "Bilangan 1 lebih besar dari bilangan 2"
Else
    Label3.Caption = "Bilangan 1 lebih kecil dari bilangan 2"
End If
End Sub

Jadi disana terlihat bahwa bil1 > bil2 itu adalah kondisinya . Artinya variable bil1 lebih besar dari variable bil2. jika kondisinya benar atau kodisinya memenuhi , maka akan melakukan perintah yang if dan jika kondisinya salah atau tidak memenuhi maka akan melakukan perintah else . Mudah kan belajar VB itu .

Baca juga : Array pada vb6

Sekarang bagaimana kalo didalam percabangan ada percabangan lagi atau istilahnya percabangan berantai .
Langsung saja kita ke contohnya
atur tampilan seperti berikut

Bagian koding

Private Sub Command1_Click()
nilai = Val(Text1)
If nilai > 60 Then
    If nilai >= 80 Then
        If nilai >= 90 Then
            Label2 = "A"
        Else
            Label2 = "B"
        End If
    Else
        Label2 = "C"
    End If
Else
    Label2 = "D"
End If
End Sub

Percabangan dengan select case

Sekarang kita akan coba menggunakan select case , select case ini bisa lebih dari dua percabangan . Oleh karena itu select case biasanya di manfaatkan salah satunya pembuatan game yang memerlukan code ascii .Tetapi tidak hanya itu select case ini sangat bermanfaat . Untuk penulisan select case


Select Case variable
    Case 1:
        perintah
    Case 2:
        perintah
    Case 3:
        perintah
    Case 4:
        perintah
    Case 5:
        perintah

....
End Select

Baca juga Operasi File pada vb

Sekarang kita akan coba contohnya , atur tampilan seperti berikut

Di bagian koding


Private Sub Command1_Click()
kode = Val(Text1)
Select Case kode
    Case 1:
        Label2 = "Senin"
    Case 2:
        Label2 = "Selasa"
    Case 3:
        Label2 = "Rabu"
    Case 4:
        Label2 = "Kamis"
    Case 5:
        Label2 = "Jum'at"
    Case 6:
        Label2 = "Sabtu"
    Case 7:
        Label2 = "Minggu"
End Select
End Sub

Nah jadi itu dia bahas bahas mengenai percabangan pada visual basic 6 . Semoga bermanfaat dan juga menambah wawasan .Terimakasih telah berkenan membaca artikel ini . Sampai jumpa di artikel yang lainnya yang lebih menarik dan juga lebih bermanfaat .

Operasi file pada vb6

wandi 3:20 AM Pelajaran Pemprograman vb6 Add Comment

wandi

Selamat datang kawan kawan di blog saya yang sederhana ini . Di kesempatan kali ini saya akan coba share mengenai vb lagi . Kali ini kita akan bahas mengenai operasi file pada vb6 . Jadi kita kali ini akan coba untuk membaca file , menulis file , dkk .

Baca Juga : Constrctor pada Java

Untuk struktur penulisan operasi file di vb6 , kita gunakan


open "lokasi_file" for status as #n

close #n

Status di dalam vb6 ada dua yaitu input untuk membaca file dan output untuk menyimpan file . #n itu maksudnya file mana yang akan di proses , yang nilainya berupa integer .

Oke kita akan lakukan pertama kali adalah menulis file , Sekarang desain tampilan seperti berikut .

Jika sudah desain tampilan , sekarang ke bagian coding tulis listing program seperti berikut



Dim tulisan As String
Private Sub Command2_Click()
tulisan = Text1
lokasi = App.Path & "/contoh.txt"
Open lokasi For Output As #1
    Print #1, tulisan
Close #1
End Sub

Private Sub Text1_Change()
Label1.Caption = Text1
End Sub

Oke sekarang kawan kawan save project , lalu jalankan programnya .
Begitu kita isi text1 dan klik simpan maka akan ada file baru contoh.txt , dan jika kita buka tulisan seperti yang kita inputkan . Bro kalo selain file txt bisa gak ? jelas bisa , gak percara coba ganti contoh.txt dengan contoh.html .

Untuk memasukan tulisan ke file yang kita operasi kita gunakan print #n, nilai . Oke sekarang sudah pada jelaskan . Kalo gak jelas saya saranin lakukan experimen yang dengan listing program yang saya berikan , sampai paham . Oke kalo sudah paham kita lanjut untuk membaca file .

Masih projek yang tadi , tinggal kita ganti saja kodinganya



Dim tulisan As String
Dim lokasi As String
Dim karakter As String
Private Sub Command2_Click()
tulisan = Label1.Caption
'untuk menyimpan file
Open lokasi For Output As #1
    Print #1, tulisan
Close #1
End Sub

Private Sub Form_Load()
lokasi = App.Path & "/contoh.html"
'membaca file
Open lokasi For Input As #1
        Input #1, karakter
        Label1 = karakter
Close #1
End Sub

Private Sub Text1_Change()
Label1.Caption = karakter & Text1
End Sub

Begitu di jalankan

Maka membaca dan meedit telah berhasil , sekarang kita coba lihat contoh.html .

Oke semoga pada ngarti . Terimakasih telah berkenan membaca artikel ini .Sampai jumpa di artikel yang lainnya yang lebih menarik dan juga lebih bermanfaat .

Array pada vb6

wandi 3:00 AM Pelajaran Pemprograman vb6 Add Comment

wandi

Selamat datang kawan di blog saya yang sederhana ini . Di kesempatan kali ini saya akan coba share mengenai vb6 lagi , kali ini saya bahas mengenai array pada vb6 . Yang di tanyakan array pada vb6 ini adalah . Apa itu array ? Bagaimana cara membuat array ? Apa kegunaan array ?

Baca juga : Fungsi pada vb6

Apa itu array ?

Array merupakan kumpulan nilia bervariable sama yang membedakan adalah indexnya . Index itu apa ? nanti kita akan tahu setelah kita menulis dan mejalankan contoh dari saya . Apa sih keuntungan dari array itu ? keuntungannya adalah kita dapat menampung banyak nilai dalam variable yang sama . Cara penulisannya gimana ?


dim nama_varible(jumlah_array) as tipe_data

Baca juga : Cara membuat jam digital degan vb6

Mudahkan penulisan array pada vb6 ini . Di vb6 ini ada yang namanya array dinamis . Array dinamis itu apa sih ? Jadi array dinamis adalah array yang jumlah maksimumnya tidak terbatas .

Contoh array

Atur tampilan seperti berikut . Kita tambahkan saja satu list box

Sekarang kita tinggal koding . Codingnya seperti berikut


Dim nama(3) As String

Private Sub Form_Load()
nama(0) = "Naruto"
nama(1) = "Sasuke"
nama(2) = "Sakura"
nama(3) = "Kakashi"
For n = 0 To 3
List1.AddItem nama(n)
Next n
End Sub

Sebagai tambahan jadi array itu dimulai dari 0 indexnya , jadi kalo kita ingin memanggil Naruto maka nama(0) . Mudah bukan untuk membuat array .

Contoh multi array

Maksudnya apa sih mult array itu ? Jadi multi array adalah array di dalamnya itu ada array lagi . Penulisannya sama hanya pas di bagian indexnya ditambah lagi . Contoh Dim nama(2, 2) As String yang artinya itu adalah kita memiliki variable nama yang merupakan array dan di dalam array tersebut ada array lagi .Membingunkan ya . Jika bingung kita langsung ke contohnya saja , semoga tidak bingung .

Atur tampilan seperti berikut . Ada listbox dan combo box ,

Sekarang kita ke bagian koding , dan tulis seperti berikut


Dim nama(2, 2) As String

Private Sub Combo1_Click()
List1.Clear
pilah = Combo1.Text
Select Case pilah
Case "Genin"
    For n = 0 To 2
        List1.AddItem nama(0, n)
    Next n
Case "Jonin"
    For n = 0 To 2
        List1.AddItem nama(1, n)
    Next n
Case "Senin"
    For n = 0 To 2
        List1.AddItem nama(2, n)
    Next n
End Select
End Sub

Private Sub Form_Load()
nama(0, 0) = "Naruto"
nama(0, 1) = "Sasuke"
nama(0, 2) = "Konohamaru"
nama(1, 0) = "Shikamaru"
nama(1, 1) = "Neji"
nama(1, 2) = "Kakashi"
nama(2, 0) = "Jiraya"
nama(2, 1) = "Sunade"
nama(2, 2) = "Orochimaru"
End Sub

Jadi kalo kita ingin kita kalo kita ingin manggil naturo maka nama(0,0) atau di ibaratkan nama(Genin,0) , kalo manggil neji nama(1,1) atau di ibaratkan nama(Jonin,1) . Kalo masih binggun di bagian multi arraynya coba terus pahami . ingat belajar itu tidak mudah butuh perjuangan , dan setelah perjuangan itu kita akan mendapat hasilnya .

Oke mungkin itu dia bahas bahas mengenai array pada vb6 . Semoga bermanfaat dan juga menambah wawasan . Terimakasih telah berkenan membaca artikel ini . Sampai jumpa di artikel yang lainnya yang lebih bermanfaat dan juga lebih menarik .

Membuat jam digital dengan VB6

wandi 1:00 AM Pelajaran Pemprograman vb6 Add Comment

wandi

Selamat datang kawan kawan diblog saya yang sederhana ini . Di kesempatan kali ini saya akan membahas mengenai membuat jam digital dengan VB6 , jam berarti berhubungan dengan waktu .

Baca Juga : Mengenal Search Engine Marketing

Untuk membuat jam digital sangat mudah sekali ya , hanya tinggal ketik ketik ketik dan jadi tidak seperti di pemprograman lain banyak kodingngan untuk menampilkan jam digital ini , tetapi kalo di vb6 ini mudah sekali membuat jam digital .

Untuk membuat jam digital yang kita butuhkan adalah label dan juga timer . Timer ini berfungsi yang paling banyak di gunakan adalah membuat animasi . Karena misal gini setiap 1 detik maka akan berpindah posisi atau setiap satu detik tulisan akan berubah rubah .

Untuk menampilkan waktu saat ini , kita gunakan yang namanya Time dan untuk mengambil tanggal saat ini kita gunakan Date .

Oke langsung saja yang kita butuhkan adalah 2 label dan satu buah timer .

Desain tampilan seperti berikut , dan buat yang tidak tau timer di sebelah mana di gambar di sana ditunjukan . Jika sudah diatur di bagian property interval ubah nilainya jadi 1000 , maksudnya apa nanti kita akan jelaskan .

Oke jika sudah kita ke bagian koding . Kita ketik seperti dibawah


Private Sub Form_Load()
Label1.Caption = Time
Label2.Caption = Date
End Sub

Private Sub Timer1_Timer()
Label1.Caption = Time
Label1.Refresh
End Sub

Oke Jika sudah maka tampil seperti berikut

Sekarang saya akan coba jelaskan .

Pertama untuk interval itu maksudnya setiap berapa mili second kita akan melakukan instruksi yang ada di timer . dan di sana bernilai 1000 yang artinya adalah 1 detik . Jadi setiap satu detik kita akan melakukan instruksi instruksi yang ada di timer
Kedua untuk mengambil jam sekarang kita gunakan yang namanya Time dan untuk mengambil Tanggal sekarang kita gunakan Date .

Gimana mudah bukan untuk membuat jam digital di VB6 itu . Saya akhiri semoga bermanfaat dan juga menambah wawasan . Terimakasih telah berkenan membaca artikel ini . Sampai jumpa di artikel yang lainnya yang lebih menarik dan juga bermanfaat .

Fungsi pada vb6

wandi 12:00 PM Pelajaran Pemprograman vb6 Add Comment

wandi

Selamat datang kawan kawan di blog saya yang sederhana ini . Di kesempatan kali ini saya akan berbagi mengenai vb6 lagi , kali ini saya akan coba share mengenai fungsi pada vb6 .

Baca Juga Perbedaan CLI dan GUI (Lengkap)

Pengertian fungsi

Apa sih yang dimaksud fungsi ? fungsi merupakan blok kode atau kumpulan instruksi yang tidak berjalan otomatis . Fungsi akan berjalan ketika dipanggil . Fungsi memiliki manfaat yang banyak pada pemprograman yaitu ,

Menghemat ukuran program
Memudahkan dalam pembuatan program
Mempercepat pekerjaan karena kalo ada fungsi yang sama tinggal panggil nama fungsinya
Dan kawan kawan


Private Function Nama_Fungsi()
    statment
    statment
    ....
End Function

Oke sekarang kawan kawan sudah tau pembuatan fungsi pada vb6 ini . Sekarang saya akan share contoh program fungsi pada vb6 . Atur tampilan seperti berikut

Sekarang ke bagian coding , dan tulis seperti berikut



Private Function btn_vlds()
    If Len(Trim(Text1)) = 0 Then
        Command1.Enabled = False
    Else
        Command1.Enabled = True
    End If
End Function


Private Sub Form_Load()
    btn_vlds
End Sub

Private Sub Text1_Change()
    btn_vlds
End Sub

Di vb6 ada yang namanya fungsi yang siap pakai dan ada yang kita buat , fungsi yang siap pakai di sini adalah fungsi len() dan trim() . Len() berfungsi untuk menghitung jumlah string dan Trim() untuk menghilangkan spaci pada string . Sedangkan fungsi yang kita buat adalah btn_vlds yang berfungsi sebagai pemilah jika text1 diisi maka akan tombolnya enable dan jika tidak maka tidak enable .

Oke mungkin itu dia bahas bahas mengenai fungsi pada vb6 . Semoga bermanfaat dan juga menambah wawasan . Terimakasih telah berkenan membaca artikel ini . Sampai jumpa di artikel yang lainnya yang lebih bermanfaat dan juga lebih menarik lagi .