Monday, September 23, 2013

Pengenalan ActiveX DLL pada VB 6


Dynamic Link Library atau DLL merupakan file yang berisi rutin (procedure dan function) yang dapat dipanggil dari file EXE maupun dari file DLL lain. Dengan meletakkan rutin-rutin pada file DLL (terpisah dari file EXE) maka terdapat beberapa keuntungan. Pertama, rutin-rutin yang bersifat umum dapat dipakai oleh beberapa aplikasi pada saat yang bersamaan dan hanya diperlukan satu copy di memory atau disk. Anda dapat mengatur supaya rutin-rutin yang terdapat pada DLL tersebut dimuat ke memory hanya saat diperlukan saja. Jika tidak diperlukan maka DLL tersebut dapat dibuang dari memory. Keuntungan lain adalah ukuran file EXE menjadi lebih kecil karena beberapa kode program diletakkan pada file DLL.
CARA MEMBUAT ACTIVEX DLL
  1. Buka Microsoft visual basic, kemudian pilih activeX dll










pengenalan class module dengan menggunakan VB 6


Module adalah berisi kode program atau prosedur yang dapat digunakan oleh program aplikasi. Hampir sama denga form, tetapi module tidak berisi objek dan bentuk standar. Untuk menambahkan suatu module ke dalam program aplikasi dengan menggunakan perintah : pilih menu Project dan pilih Add Module.
Module juga berarti tempat dimana kita akan menulis kode sumber didalamnya yang bersifat global (dapat dikenal oleh semua form didalam sebuah project VB). Kode – kode ini disimpan dalam file ASCII yang berekstensi .BAS 

Class Module 
memperbolehkan kita membuat object sendiri. Class module ini adalah prototype dari object yang akan kita buat tersebut (property dan methodnya), class module disimpan dalam sebuah file yang berekstensi .CLS.


CARA MEMBUAT CLASS MODULE
  1. Buatlah form seperti dibawah ini dengan 4 label, 4 text box, 3 command button dan 1 image
  1. Klik kanan pada project , kemudian pilih add class module
  1. Ganti nama class1 dengan nama rumus
  1. Masukkan source code berikut ini pada class module
Public Function Balok(ByVal p As Integer, ByVal l As Integer, ByVal t As Integer) As Integer
Balok = p * l * t
End Function




  1. Save dengan nama cls
  2. Masukkan source berikut ini pada form diatas
    Dim are As New rumus
    Private Sub hapus_Click()
    p = Clear
    l = Clear
    t = Clear
    hasil = Clear
    End Sub
    Private Sub hitung_Click()
    hasil = are.Balok(Val(p), Val(l), Val(t))
    End Sub
    Private Sub menu_Click()
    form8.Show
    form1.Visible = False
    End Sub

     











  1. Output dari program diatas

Tuesday, September 17, 2013

Pemrograman Sequential pada VB 6


Disini kami membuat kalkulator volume balok dengan pemrograman sekuensial!!!
berikut cara dan definisi yang kami buat untuk membantu anda mempelajari tentang visual basic 6.0.

Definisi dari pemrosesan sekuensial itu sendiri adalah Pemrosesan sekuensial adalah pemrosesan secara satu-persatu, dari sekumpulan informasi sejenis yang setiap elemennya dapat diakses dengan keterurutan tertentu (ada suksesor), jadi seakan-akan kumpulan elemen merupakan "Deret" elemen. Elemen yang akan diproses dapat bertype dasar (integer, real, character, boolean), tetapi dapat juga bertype komposisi (misalnya Point <x: real, y : real> ).
Deret Elemen dapat merupakan elemen yang dibaca satu per satu dari input device, nilai elemen suatu tabel atau matriks, disimpan dalam media penyimpanan sekunder (file), atau merupakan elemen list, dsb. Kumpulan informasi itu disimpan sedemikian rupa, sehingga selalu dikenali melalui primitif yang mampu untuk memberikan:
  • Elemen pertama (First_Elmt)
  • Elemen yang siap diproses (Current_Elmt)
  • Elemen yang diakses setelah Current_Elmt (Next_Elmt)
  • Tanda akhir proses EOP

Sedangkan pembuatan kalkulator bangun dengan cara pemrosesan sekuensial seperti berikut ini:
  1. Buka microsoft visual basic kemudian kemudian pilih menu STANDART EXE seperti gambar di bawah ini, kemudian klik open.
  1. Klik pada label yang iconnya berinisial “A”
  1. Misalkan saya membuat 4 label, 4 text box, 3 command, dan 1 image untuk gambar bangunannya icon Text box berada di sebelah icon label, dan icon command berada tepat di bawah icon text box, sedangkan icon image sendiri berada di baris ke-2 sebelah kiri.

  1. Untuk mengganti tulisan Label sesuai yang kita inginkan klik 2 kali pada label yang berada di form kemudian lihat properties pada pojok kanan dan pilih caption untuk mengganti dan memunculkan nama pada form misal “MASUKKAN PANJANG”, pilih backstyle menjadi “transparent”, pilih font untuk mengganti jenis tulisan misal “Caligraph421BT”, dan pilih forecolor untuk mengganti warna misal “&H00C00000&”.

  1. Untuk menghilangkan tulisan “Text1” pada text box anda perlu mengklik 2 kali dan melihat properties text box di pojok kanan lalu cari Text dan hapus Text1.

  1. Sedangkan untuk hitung sebenarnya hampir sama dengan contoh yang berada pada no 4 hanya saja disini kita tidak menggunakan warna. Secara keseluruhan sama seperti yang saya jelaskan diatas.

  1. Beda halnya dengan image ketika kita memilih Icon image dan mendrag pada form maka kluarnya hanya sebatas garis untuk memunculkan gambar tersebut kalian lihat pada pojok kanan yang bertuliskan picture lalu klik icon titik-titik dan mulailah anda memilih gambar sesuai keinginan anda. tetapi disini saya milih gambar kubus.

  1. Ini adalah hasil dari yang sudah kita buat.

  1. Berikut source codenya untuk melihat hasil yang kita hitung, hapus, bahkan kembali ke menu utama, tapi saya sarankan untuk membuat menu terlebih dahulu.

SELAMAT MENCOBA!!!