Trik VB Tombol Keren dalam Form

Bagaimana kalau kita ubah sedikit supaya tampilannya lebih menarik seperti gambar di bawah di bawah ini,......nah cukup menarik bukan?

Nah bagi teman-teman yang sudah tahu, tentu hal ini bukan sesuatu yang baru namun buat teman-teman yang belum tahu, silahkan download saja file ocx-nya di sini dan langsung saja mencoba berkreativitas dengan berbagai bentuk tombol dan variasi warna tombolnya.

Oh iya sedikit catatan bagi yang belum tahu cara menggunakan file ocx-ini, berikut langkah-langkahnya:

1. Copy file ocx-nya ke C:/Windows/system32

2. Registrasi file ocx-nya dengan cara, buka Run kemudian ketik :

regsvr32 c:/windows/system32/vbskpro2.ocx

*Tulisan vbskpro2 ganti dengan nama file ocx yang teman-teman download tadi.

3. Buka Visual Basic 6, klik kanan pada ToolBox dan pilih Components

4. Pada kotak dialog Components, pilih RudyBotton

5. Otomatis akan muncul di ToolBox

6. Masukkan tombol ke dalam Form seperti memasukkan CommandButton ke dalam Form dan atur properties tombolnya sesuai keinginan anda. Untuk bentuk tombolnya dapat anda atur di Button Shape dan untuk jenis tombolnya dapat anda pilih di Button Style.

Blognya Si Imin > Pemrograman > Program C++ Menentukan Bilangan Ganjil atau Genap Program C++ Menentukan Bilangan Ganjil atau Genap

Program C++ Menentukan Bilangan Ganjil atau Genap - Sebelumnya aku juga sudah memposting mengenai pemrograman C++ dengan judul Program C++ Mencari Bilangan Terbesar Dari Dua Bilangan . Kali ini masih sama tentang pemrograman C++. Namun kali ini kita akan membahas mengenai bagaimana menentukan bilangan ganjil atau genap dalam pemrograman C++.

Untuk membuat program C++ yang menentukan bilangan ganjil atau bilangan genap, terlebih dahulu kita harus tahu bagaimana membedakan bilangan ganjil dan genap. Contoh bilangan ganjil adalah 1, 3, 5, 7, 9 dan seterusnya. Contoh bilangan genap adalah 2, 4, 6, 8 dan seterusnya. Sebelum bisa menentukan bilangan ganjil dan genap, anda harus mengetahui operator sisa pembagian (MOD) / modulus.

Operator sisa pembagian menghasilkan sisa hasil bagi, untuk lebih jelasnya lihat contoh berikut :

10 MOD 3 = 1

12 MOD 10 = 2

4 MOD 2 = 0

5 MOD 10 = 5

Kembali ke soal, logika jawabannya, bilangan genap adalah bilangan yang bisa dibagi dua, dalam arti bilangan genap adalah bilangan yang jika dibagi (dengan MOD) dua (2) maka sisa hasil baginya sama dengan nol. Sedangkan bilangan ganjil adalah sebaliknya, yaitu bilangan yang jika dibagi (MOD) dua (2) sisa hasil baginya sama dengan 1 (bukan 0). Contoh :

4 MOD 2 = 0 berarti 4 adalah bilangan genap.

13 MOD 2 = 1 berarti 13 adalah bilangan ganjil.

8 MOD 2 = 0 berarti 8 adalah bilangan genap.

25 MOD 2 = 1 berarti 25 adalah bilangan ganjil.

Berikut source kode untuk Menentukan Bilangan Ganjil atau Genap:

#include <iostream.h>

#include <conio.h>

main()

{

clrscr();

int bil, sisa;

cout<<"Masukkan sebuah bilangan : ";

cin>>bil;

sisa = bil % 2;

if(sisa == 0)

cout<<bil<<" adalah bilangan genap"<<endl;

else

cout<<bil<<" adalah bilangan ganjil"<<endl;

getch();

}

Meningkatkan Kualitas Sebagai Seorang Programer

Salah satu fenomena unik yang saya lihat selama kuliah adalah, banyak mahasiswa semester akhir dibidang ilmu komputer tidak bisa melakukan installasi windows apalagi menguasai bahasa pemrograman, dan hasilnya saat mengerjakan tugas akhir atau skripsi kebanyakan mahasiswa membayar orang lain untuk mengerjakannya, terutama dalam hal pembuatan software sistem. Biasanya hal seperti lebih banyak dialami oleh wanita. Jika saya boleh berandai-andai, mungkin lebih dari 80% mahasiswa fakultas ilmu komputer di kampus saya tidak bisa bahasa pemrograman.

Berbagai alasan pun muncul dari mereka, ada yang bilang tidak mengerti dan malas untuk belajar, bahkan ada yang mengatakan "itu gak penting, yang penting dapat gelar dan ijazah". Apakah anda ingin saat tamat dan menyandang gelar sarjana komputer kemudian terjun ke masyarakat tapi justru anda dicap sebagai sarjana komputer yang gaptek dan tidak tahu apa-apa tentang komputer...?

Menurut saya ilmu pengetahuan, gelar dan ijazah sama pentingnya, sayang sekali jika anda menjadi sarjana tapi tidak memiliki pengetahuan yang cukup tentang bidang ilmu yang anda tekuni selama lebih kurang 4 tahun di universitas.

Untuk menjadi seorang perogramer sebenarnya tidak terlalu sulit, tergantung kemauan untuk belajar dan memperdalam ilmu. Berikut sedikit tips untuk anda yang ingin memulai belajar menjadi seorang programmer :

•  Niat Kuat Untuk Bisa

Anda harus mampu memotivasi diri sendiri agar niat untuk bisa itu timbul dalam diri anda. "Kenapa Orang Lain Bisa Tapi Saya Tidak Bisa...?", kata yang cukup menjadi pondasi awal semangat anda untuk mau belajar lebih jauh.

•  Lawan Rasa Malas

Jika anda sudah punya niat yang kuat, penghalang yang harus anda singkirkan terlebih dahulu adalah rasa malas dalam diri anda. Jika anda bisa mengatasinya maka peluang anda akan semakin besar.

•  Pilih Bahasa Pemrograman

Saat dibangku kuliah anda akan menemui banyak bahasa pemrograman yang menjadi mata kuliah di tiap semester. Anda tidak diharuskan menguasai semuanya, pilih salah satu yang anda rasa cukup anda minati dan anda pahami.

•  Mulailah Dari Yang Sederhana

Untuk tahap awal pembelajaran, anda tidak perlu memcoba mengerjakan sebuah sistem yang komplek, mulailah dari tahap dasar baru kemudian anda tingkatkan ketingkat yang lebih sulit.

•  Belajar Dari Berbagai Sumber

Ilmu yang anda dapatkan dibangku kuliah mungkin hanya sekitar 20-25% saja. Jadi mulailah mencari diluar kampus, anda bisa membeli buku panduan. Jika anda merasa membeli buku terlalu mahal, anda dapat memanfaatkan perpustakaan atau internet sebagai media belajar. Dari pada anda menghabiskan waktu berjam-jam untuk facebookan atau main game online, tidak ada salahnya sisihkan sedikit waktu anda untuk browsing.

•  Jangan Malu Bertanya

Belajar dari orang lain yang lebih ahli juga bisa diterapkan dalam cara belajar anda, jadi carilah orang yang lebih menguasai dan belajarlah darinya.

•  Jangan Mudah Putus Asa

Tidak semua orang bisa berhasil dengan mudah, jika anda gagal teruslah berusaha dan jangan langsung menyerah. Temukan cara belajar anda sendiri agar anda lebih mudah memahami apa yang sedang anda kerjakan.

• Jangan Pernah Menghafal Script

Bayangkan jika anda mengahafal script yang panjangnya hingga ribuan baris, cara yang lebih baik adalah dipahami. Jika anda menghafal anda justru akan cepat lupa, tapi jika anda memahami maka akan selalu tersimpan di memori anda.

•  Terus Berlatih

Jika anda terus melatih skill anda, otomatis anda akan lebih paham dengan pemrograman, tapi jangan monoton, kembangkan imajinasi, analisa dan logika anda hingga anda bisa membuat sebuah aplikasi yang lebih kompeks.

• Berani Menerima Tantangan

Disaat anda merasa kemampuan anda sudah lumayan, cobalah anda mengerjakan sebuah sistem komplek yang memiliki target penyelesaian. Contohnya, anda terima tawaran teman yang meminta anda mengerjakan program skripsinya. Disanalah anda akan mendapatkan tantangan baru, saat program tersebut mengalami banyak error, mau tidak mau anda harus mencari penyelesaiannya, dan mulailah tahap belajar ke tingkat yang lebih tinggi harus anda jalani sehingga logika dan analisa anda bisa menjadi lebih tajam dan ilmu yang anda dapatkan akan lebih baik. Manfaatkan peluang seperti ini maka anda akan mendapatkan penghasilan tambahan disini

• Jangan Pernah Pelit Ilmu

Prinsip saya, "Orang Cerdas Adalah Orang Yang Tidak Pelit Ilmu". Jangan sampai anda berfikir karena anda sudah bersusah payah belajar hingga bisa mencapai tingkat yang baik, anda tidak mau membagikan ilmu anda kepada orang lain yang juga ingin belajar. Karean saya secara pribadi lebih menghargai orang yang ingin belajar dari pada orang yang berfikir cukup dengan membayar maka skripsinya bisa diselsaikan.

Semoga tips-tips diatas dapat bermanfaat, langkah-langkah diatas saya terapkan secara pribadi dan hasilnya cukup memuaskan hingga hari ini.

Membuat Menu Dropdown Superfish Dengan CSS Dan JQuery

Membuat Menu Dropdown Superfish Dengan CSS Dan JQuery | Gho Blog's - Pentingnya menu sebagai navigasi dari sebuah web ada sesuatu hal yang wajib, agar mempermudah pengguna website dalam menemukan konten yang dicari. Posting kali ini saya akan membagi cara membuat menu drop down menggunakan CSS dan JQuery. Atas request seorang teman, tampilan menu yang akan saya buat bernuansa hitam.

Seperti biasa, untuk mempermudah anda, saya telah menyiapkan paket seluruh bahan yang dibutuhkan untuk membuat menu dropdown ini, anda cukup mendownloadnya Disini.  Atau download via mediafire Disini

Tapi tidak ada salahnya saya membagikan cara membuatnya. Silakan anda lihat demonya Disini.

Langkah pertama dan seperti biasanya lagi, buat tiga buah folder / directory berikut ini :

• js (letakkan seluruh file *.js didalamnya)
• css (letakkan seluruh file *.css didalamnya)
• images (letakkan seluruh image pendukung didalamnya)

Langkah selanjutnya membuat script HTML untuk menampilkan menu yang akan kita buat. Buka text editor yang biasa anda gunakan (minimal notepad) lalu copy paste script dibawah ini, atau jika anda sudah punya disain web, dan anda ingin memasang menu dropdown, silakan buka coding web anda, kemudian sisipkan script berikut ini sesuai dan sesuaikan dengan letak pada web anda.

<html> <head> <title>Superfish Dropdown Menu</title> <link rel="stylesheet" type="text/css" href="css/superfish.css"> <script type="text/javascript" src="js/jquery-1.4.js"></script> <script type="text/javascript" src="js/hoverIntent.js"></script> <script type="text/javascript" src="js/superfish.js"></script> <script type="text/javascript"> $(document).ready(function(){ jQuery('ul.sf-menu').superfish(); }); </script> </head> <style type="text/css"> <!-- body { padding : 30px; } --></style> <body> <table align="center" border="0" width="650"> <tr> <td> <ul class="sf-menu"> <li><a href="http://www.d-hidracyber.co.cc">Home</a></li> <li><a href="#">Artikel</a> <ul> <li><a href="http://www.d-hidracyber.co.cc/search/label/Hot%20Topic"> Hot Topic</a></li> <li><a href="http://www.d-hidracyber.co.cc/search/label/Tips%20And%20Trick">Tips And Trics</a></li> <li><a href="http://www.d-hidracyber.co.cc/search/label/Top%2010%20Info">Top 10 Info</a></li> <li><a href="http://www.d-hidracyber.co.cc/search/label/Visual%20Basic%206.0%20Programing">Visual Basic 6.0 Programing</a></li> <li><a href="http://www.d-hidracyber.co.cc/search/label/Web%20Programing">Web Programing</a></li> </ul> </li> <li><a href="#">Free Download</a> <ul> <li><a href="http://www.d-hidracyber.co.cc/p/free-software.html">Software</a></li> <li><a href="http://www.d-hidracyber.co.cc/p/free-ebook.html">E-book</a></li> </ul> </li> <li><a href="http://www.d-hidracyber.co.cc/p/link-exchange.html">Link Exchange</a></li> <li><a href="#">Contact</a> <ul> <li><a href="http://www.facebook.com/hidra.aktriyan">Facebook</a></li> <li><a href="https://plus.google.com/101844647769475527187/about">Google +1</a></li> <li><a href="mailto:freedomgothic@ymail.com">Email</a></li> </ul> <li><a href="http://www.d-hidracyber.co.cc/p/about-me.html">About Me</a></li> </li> </ul> </td> </tr> </table> </body> </html>

Anda tinggal menyesuaikan link pada perintah <a href="......">.....</a> dengan url link web anda.
Jika anda tidak menyukai warna menu yang saya buat, dan anda ingin mengganti sesuai dengan selera anda, cukup anda buka superfish.css yang berada pada folder/directory css kemudia edit warna sesuai keinginan anda. Perhatikan gambar dibawah ini, dsini bagian inilah kita dapat memainkan warnanya :

Anda bisa menggunakan Adobe Photoshop untuk mendapatkan kode warna, silakan anda utak-atik sendiri sesuai keinginan anda.

Sekian dulu artikel saya berjudul Membuat Menu Dropdown Superfish Dengan CSS Dan JQuery. Selamat Mencoba dan semoga bermanfaat ......

Pengenalan Bahasa Pemrograman Visual Basic 6.0

Visual Basic 6.0 merupakan salah satu development tools yang dibuat oleh Microsoft. Visual Basic 6.0 lebih bersifat fleksibel dibanding dengan development tools lainnya, karena Visual Basic 6.0 tidak terlalu begantung terhadap fungsi dari API (Application Programming Interface) pada Windows. API sudah dimasukkan oleh Microsoft ke dalam Visual Basic 6.0  sebagai file .dll.  

Visual Basic 6.0 juga dibuat dengan  interface yang sangat mudah dipahami, sehingga jika orang awam atau yang belum mengerti tentang pemrograman dpat membuat sebuah project aplikasi yang sederhana. Dengan kata lain interface Visual Basic 6.0 sangat user friendly.
Visual Basic 6.0 merupakan bahasa pemrograman yang cukup popular dan mudah untuk dipelajari. User dapat membuat program dengan aplikasi GUI (Graphical User Interface) atau program yang memungkinkan pemakai komputer berkomunikasi dengan komputer tersebut dengan menggunakan modus grafik atau gambar.

Visual Basic 6.0 menyediakan fasilitas yang memungkinkan user untuk menyusun sebuah program dengan memasang objek-objek grafis dalam sebuah form. Selain itu Visual Basic 6.0 juga menawarkan berbagai kemudahan dalam mengelola sebuah database. Kemudahan ini masih ditambah lagi dengan tersedianya sarana dan piranti yang lengkap.

Memulai Visual Basic 6.0

1. Langsung dari menu start, kemudian pilih All Programs, pilih Microsoft Visual Basic 6.0 dan klik Microsoft Visual Basic 6.0
2. Dari shorcut yang telah dibuat pada dekstop windows
3. Dari proyek Visual Basic yang pernah dibuka dan ada dimenu dokumen pada   menu start
4. Mengklik ganda file proyek (berekstensi *.vbp) yang tersimpan di komputer, misalnya melalui windows Explorer
5. Melalui menu klik kanan dekstop, caranya klik kanan dekstop-New-Visual Basic Project.

Operator Pada Visual Basic  dan Urutan Operasinya

Visual Basic juga menyediakan fungsi untuk aritmatika, contohnya penambahan, pengurangan, bagi, kali dan lain-lain. Tapi dalam aritmatika Visual Basic mempunyai urutan prosesnya. Proses perkalian akan didahulukan dibanding proses lainnya, kecuali jika pada proses tersebut diberi tanda kurung.

Aritmatika	Komparasi	Logika
Pangkat (^)	Sama(=)	Not
Negative (-)	Tidak Sama(<>)	And
Kali dan Bagi (*,/)	Kurang Dari (<)	Or
Pembagian Bulat (\)	Lebih Dari (>)	Xor
Sisa Bagi (Mod)	Kurang dari atau sama dengan (<=)	Eqv
Tambah dan kurang (+,-)	Lebih dari atau sama dengan (>=)	Imp
Penggabungan String	Like	-

Tipe-Tipe Data Visual Basic 6.0

Sebelum memulai  pemograman dengan Visual Basic, maka ada baiknya mengenal tipe data yang dapat digunakan dalam Visual Basic. Cakupan tipe data dalam Visual Basic, dapat dilihat dalam tabel berikut: 

Tipe Data	Ukuran Storage	Jangkauan
Byte	1 byte	0 s/d 255
Boolean	2 byte	True atau False
Integer	2 byte	-32,768 s/d 32767
Long	4 byte	-2,147,483,648 s/d 2,147,483,647
Single	4 byte	-3.402823E38 s/d -1.401298E-45 (-) 1.401298E-45 s/d 3.402823E83 (+)
Double	8 byte	-1.79769313486232E308 s/d -4.94065645841247E-324
Currency	8 byte	-922,337,203,685,477.5808 s/d 922,337,203,685,477.5807
Decimal	14 byte	79,228,162,514,264,337,593,543,950,335
Date	8 byte	1 Januari 100 s/d 31 Desember 9999
Object	4 byte	Menacu pada objek tertentu
String (panjang variable)	10 byte + panjang string	0 sampai lebih kurang 2 miliar
String (Panjang Tetap)	panjang dari string	1 sampai lebih kurang 65,400
Variant (dengan angka)	16 byte	Sembarang angka sampai jangkauan jenis double
Variant	22 byte + panjang string	Sama dengan jangkauan variable string

Struktur Pengambilan Keputusan

Struktur pengambilan keputusan, digunakan untuk memilih salah satu dari berbagai pilihan yang disediakan (bisa dua atau lebih).  Keputusan diambil berdasarkan referensi terpenuhi atau tidaknya syarat kondisi yang ditetapkan oleh struktur kontrol tersebut.

1. If…Then…(Else)
Struktur ini digunakan untuk mengeksekusi satu atau lebih perintah yang menyatakan keadaan.  Standar penulisan rutinnya:
       If  kondisi  then
                              [blok perintah  1]
                        else
                             [blok perintah 2];
       End If

2. Select  Case
Sruktur ini dapat digunakan sebagai alternatif pengganti dari struktur kontrol  if…then…else. Select Case mempunyai penulisan yang lebih mudah.
Select Case test kondisi
        
      [Case ekspresi 1
                    [perintah blok 1]]
       Case else
 [perintah blok n]]
 End Select

Struktur Perulangan

Struktur pengulangan digunakan untuk mengulang eksekusi sebagian rutin program, sehingga tidak perlu terus menerus menulis ulang rutin sebanyak pengulangan yang dibutuhkan. Struktur kontrol pengulangan  yang disediakan oleh Visual Basic meliputi:

1. Do….loop
Struktur ini digunakan untuk mengulang sebuah blok perintah sampai jumlah tertentu.
Do While kondisi
              Perintah
Loop

2. For…..Next
Sruktur ini digunakan untuk mengulang suatu blok perintah jika diketahui dengan pasti berapa kali pengulangannya.
For Variabel = awal to akhir
           Perintah
Next [Variabel]

3.    For Each….Next
For Each elemen InGroup
            Perintah
Next elemen

Elemen-elemen Program Visual Basic 6.0

1.  Jendela Utama
Jendela Utama terdiri dari jendela aplikasi, baris menu dan toolbar. Jendela  aplikasi menjelaskan file proyek (project) yang sedang diolah dan juga berisi indikator program Visual Basic dan Modulnya. Baris Menu terdiri dari tiga belas menu drop-down yang dapat dipanggil dengan menekan tombol hotkey atau mouse. Tollbar terdiri dari dua belas tombol yang digunakan sebagain jalan pintas untuk perintah-perintah yang sering dipakai dalam mempelancar perancangan program.

2. Jendela ToolBox
Jendela ini berisikan berbagai ‘peralatan visual’ pemrograman Visual Basic dan berperan penting. Toolbox memiliki piranti-piranti desain dan mencakup piranti-piranti tambahan untuk perancangan program yang sesuai dengan keinginan,

3. Jendela Form atau Project
Jendela Form merupakan tempat object dan hasil program diletakkan atau form adalah kanvas tempat anda secara visual membuat aplikasi.

Jendela project merupakan jendela tentang proyek yang sedang dibuka beserta semua sub-program dan modul pendukungnya.

4. Event
Event atau saat merupakan sesuatu yang akan dan mungkin terjadi pada suatu objek yang dibuat, bila dijalankan aksi program.Event merupakan suatu bentuk interaksi antara pemakai dan pada saat program tersebut dijalankan.

5. Jendela Properties
Properties mempunyai peranan untuk memberikan atau mengubah suatu setting pada object yang dibuat. Properties memberikan banyak kemungkinan setting pada suatu objek. Properties dapat menentukan suatu objek harus ditempatkan seperti apa yang dikehendaki oleh si pemrogram

Keunggulan Bahasa Pemrograman Visual Basic 6.0

1. Untuk membuat program aplikasi berbasis windows dan membuat objek-objek pembantu seperti file, help, dan sebagainya.
2. Menguji program (debugging) dan aplikasi program akhir berakhiran .exe yang bersifat executable atau dapat langsung dijalankan.
3. Memiliki compiler handal yang dapat menghasilkan file executable yang lebih cepat dan lebih efisien dari sebelumnya.
4. Memiliki beberapa tambahan wizard yang baru, yaitu sarana yang mempermudah di dalam pembuatan aplikasi dengan mengotomatisasi tugas-tugas tertentu.
5. Microsoft Visual Basic memungkinkan aplikasi pembuatan Graphical User Interface (GUI), atau pemrograman yang menggunakan tampilan grafis sebagai alat komunikasi dengan pemakainya.
6. Microsoft Visual Basic 6.0 mempunyai fleksibilitas yang sangat baik berhubungan dengan aplikasi lain. Kemampuan ini pada versi terdahulu menggunakan sistem Dynamic Data Exchange (DDE). Saat ini sudah digantikan oleh Object Lingking and Embedding (OLE), yang memungkinkan pembuatan hubungan antara bagian fungsi atau seluruh aplikasi dengan aplikasi lainnya.
7. Microsoft Visual Basic 6.0 sangat kompatibel dengan Visual Basic versi terdahulunya juga mendukung penggunaan Long File Name atau nama variabel sepanjang 255 character. Sedangkan untuk nama-nama form, control, modul dan class tidak dapat lebih dari 40 character.

Sekian dulu pengenalannya......
Semoga bisa menjadi referensi yang bermanfaat......

Membuat Aplikasi Enskripsi dan Deskripsi Menggunakan Algoritma Chiper Substitusi Dengan Visual Basic 6.0

Membuat Aplikasi Enskripsi dan Deskripsi Menggunakan Algoritma Chiper Substitusi Dengan Visual Basic 6.0 | Gho Blog's - Pada posting kali ini saya akan membagi sedikit ilmu pemrograman yang saya punya, saya akan menunjukan bagaimana cara membuat aplikasi kriptografi sederhana menggunakan bahasa pemrograman visual basic 6.0.

Sebelumnya akan saya jelaskan sedikit mengenai kriptografi bagi yang belum tau....

Kriptografi adalah ilmu dan seni untuk menjaga keamanan pesan yang dikirim sampai ke tujuan. 

Ilmu kriptografi dapat diklasifikasikan atas 2 bagian

• Kriptografi klasik
• Kriptografi modern 

Kriptografi mempunyai 2 proses :

• Enskripsi : Proses pengacakan data menggunakan sebuah key agar tidak dapat dibaca oleh pihak lain.
• Deskripsi : Proses mengembalikan data yang telah diacak menjadi data asli dengan sebuah key.

 Komponen kriptografi :

• Plaintext : Data asli
• Chipertext : Data yang telah diacak.

Berikut ini akan saya tunjukan bagaiman membuat sebuah aplikasi enskripsi dan deskripsi sederhana menggunakan salah satu algoritma substitusi chiper yang merupakan salah satu ilmu kriptografi klasik, yaitu Caesar Chiper dengan bahasa pemrograman Visual Basic 6.0.

Yang pertama, anda sebaiknya telah mengenal bahasa pemrograman visual basic, karena saya tidak akan menjelaskan secara detail mengenai bahasa pemrograman yang satu ini.

Buat disain form seperti gambar berikut, pastikan nama Text box dan command button nya sama dengan gambar, agar saat memasukkan script nantinya tidak terjadi kesalahan.

Bukalah form code dari disain diatas kemudian masukkan script berikut ini :

Private Sub Command1_Click() If Text5.Text = "" Then MsgBox "Anda Belum Menginputkan Bit Geser...!!", vbCritical, "Warning" Text5.SetFocus End If Var = Text5.Text Text2 = "" If Var < 26 Then N = Len(Trim(Text1)) For i = 1 To N C = Mid(Text1, i, 1) P = Chr(Asc(C) + Var) If Asc(P) > 90 Then Text2.SelText = Chr(64 + (Asc(P) - 90)) Else Text2.SelText = P Text1.Enabled = True End If Next Else MsgBox " Maksimal Bit Hanya 26...!!!", vbOKOnly + vbInformation, "Peringatan" Text5 = "" End If End Sub Private Sub Command2_Click() Var = Text5.Text Text4 = "" If Var < 26 Then N = Len(Trim(Text3)) For i = 1 To N C = Mid(Text3, i, 1) P = Chr(Asc(C) + 26 - Var) If Asc(P) > 90 Then Text4.SelText = Chr(64 + (Asc(P) - 90)) Else Text4.SelText = P End If Next Else MsgBox " Data Anda Salah..!!!", vbOKOnly + vbInformation, "Peringatan" Text5 = "" End If End Sub Private Sub Command3_Click() Text1 = "" Text2 = "" Text3 = "" Text4 = "" Text5 = "" Text5.SetFocus End Sub Private Sub Command4_Click() End End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) Text1.SetFocus If KeyAscii = 8 Then Exit Sub KeyAscii = Asc(UCase(Chr(KeyAscii))) If Not (KeyAscii >= 65 And KeyAscii <= 90) Then KeyAscii = 0 End If End Sub Private Sub Text2_KeyPress(KeyAscii As Integer) If KeyAscii = 8 Then Exit Sub KeyAscii = Asc(UCase(Chr(KeyAscii))) If Not (KeyAscii >= 65 And KeyAscii <= 90) Then KeyAscii = 0 End If End Sub Private Sub Text3_KeyPress(KeyAscii As Integer) Text3.SetFocus If KeyAscii = 8 Then Exit Sub KeyAscii = Asc(UCase(Chr(KeyAscii))) If Not (KeyAscii >= 65 And KeyAscii <= 90) Then KeyAscii = 0 End If End Sub

Sekian dulu tutorial Visual Basic 6.0 yang berjudul Membuat Aplikasi Enskripsi dan Deskripsi Menggunakan Algoritma Chiper Substitusi Dengan Visual Basic 6.0. Semoga bermanfaat  dan selamat mencoba

Cara Membuat Koneksi MySQL ODBC

Cara Membuat Koneksi MySQL ODBC | Gho Blog's - Masih seputar dunia pemrograman dan database, posting kali ini kita akan membahas bagaimana cara membuat koneksi antara program dengan database MySQL menggunakan ODBC Connector.

Metode yang akan dijelaskan berikut ini biasa digunakan untuk pemrograman desktop application seperti java dan visual basic, jadi untuk penggunaan pemrograman yang berbasis database server alias multy user, cara settingnya akan sedikit berbeda.

Sebelum membuat koneksi pastikan komputer sobat sudah terinstal mysql-connector-odbc-3.51. Jika belum punya sobat bisa download secara gratis, kapasitasnya pun kecil hanya sekitar 2 Mb.

Download mysql-connector-odbc-3.51

Cara Download :

• Klik link download diatas.
• Setelah page terbuka klik "» No thanks, just start my download!"

Setelah sobat download mysql-connector-odbc-3.51.msi, install file tersebut dikomputer sobat.

Jika sudah, ikuti langkah-langkah berikut untuk membuat koneksi MySql ODBC :

• Jalankan local server di komputer sobat, baik itu phptriad (apache), xamp dan lain sebagainya.
• Setelah itu, buka Control Panel kemudian pilih Administrative Tools.

• Kemudian pilih Data Source (ODBC).

• Setelah muncul kotak ODBC Data Source Administrator, klik tombol Add.

• Setelah muncul kotak Create New Data Source, pilih MySQL ODBC 3.51 Driver, kemudian klik Finish.

• Kemudian isikan form yang tersedia :

• Data Source Name = isi dengan nama database sobat
• Description = (kosongkan)
• Server = isi dengan nama localhost
• User = isi dengan nama root
• Password = (kosongkan)
• Database = klik panah bawah, kemudian pilih nama database sobat.


• Jika sudah, klik tombol Test, jika muncul pesan koneksi sukses, klik tombol OK.

Sekian tutorial dari saya yang berjudul Cara Membuat Koneksi MySQL ODBC. Selamat mencoba dan semoga bermanfaat.

Cara Membuat Program Backup Database Dengan Visual Basic 6.0

Cara Membuat Program Backup Database Dengan Visual Basic 6.0 | Gho Blog's - Setelah beberapa tutorial sebelumnya membahas tentang program simpan-edit-delete, membuat aplikasi multimedia dan animasi serta membuat aplikasi kriptografi dengan algoritma. Kali ini kita akan mencoba membuat aplikasi backup database yang menurut saya cukup penting dalam sebuah program aplikasi.

Program backup database ini digunakan untuk meng-copy database  dari satu directory ke directory lainnya. Database yang digunakan masih Miccrosoft Office Access seperti tutorial sebelumnya.

Nah, sekarang sobat tambahkan satu buah form pada project tersebut dan buat disain seperti gambar berikut ini :

Atur settingan pada File1 melalui kotak properties yang berada disebelah kanan. Pada pilihan Pattern ganti tulisan *.* menjadi *.mdb. Sehingga yang muncul pada File1 tersebut hanya database yang berekstensi .mdb. Perhatikan gambar diatas, pada File1 muncul database dengan nama latihan.mdb.

Setelah itu buka  layar coding program tersebut dan masukkan script berikut ini :

Private Declare Function SHFileOperation Lib "Shell32.dll" Alias "SHFileOperationA" (lpFileOP As shfileopstruct) As Long Private Const FO_copy = &H2 Private Const fof_allowundo = &H40 Private Type shfileopstruct hwnd As Long wfunc As Long pfrom As String pto As String Fflags As Integer Faborted As Boolean hnamemaps As Long sprogress As String End Type

Kemudian masukkan script berikut tepat dibawah script yang tadi sobat masukkan :

Public Sub copy(ByVal asal As String, ByVal tujuan As String) Dim X As shfileopstruct With X .hwnd = 0 .wfunc = FO_copy .pfrom = asal & vbNullChar & vbNullChar .pto = tujuan & vbNullChar & vbNullChar .Fflags = fof_allowundo End With SHFileOperation X End Sub

Setelah itu duoble klik pada tombol "Copy Database" dan masukkan script berikut ini tepat ditengah antara Private Sub Command1_Click() dengan End Sub :

On Error Resume Next If Text1 = "" Then MsgBox "Anda belum memilih file yang akan dicopy" Exit Sub ElseIf Text2 = "" Then MsgBox "Anda tidak memilih direktori tujuan peng-Copy-an" Exit Sub End If copy Text1.Text, Text2.Text MsgBox "File berhasil di copy"

Masih pada tombol "Copy Database", pilih Procedure KeyPress seperti gambar dibawah ini. Kemudian masukkan script berikut tepat diantara Private Sub Command1_KeyPress(KeyAscii As Integer) dengan End Sub  :

Dan masukkan script berikut :

If KeyAscii = 27 Then Unload Me

Kemudian duoble klik pada Drive1, dan masukkan script berikut tepat diantara Private Sub Drive1_Change() dengan End Sub :

Dir1.Path = Drive1.Drive

Lakukan hal yang sama pada Drive2, dan masukkan script berikut tepat diantara Private Sub Drive2_Change() dengan End Sub :

Dir2.Path = Drive2.Drive

Setelah itu duoble klik pada Dir1, dan masukkan script berikut tepat diantara Private Sub Dir1_Change() dengan End Sub :

File1.Path = Dir1.Path

Lakukan juga pada Dir2, dan masukkan script berikut tepat diantara Private Sub Dir2_Change() dengan End Sub :

Text2.Text = Dir2.Path

Terakhir, duoble klik pada File1, dan masukkan script berikut tepat dianatara Private Sub File1_Click() dengan End Sub :

Text1.Text = File1.Path & "\" & File1.FileName

Sekian dulu tutorial Visual Basic dari saya yang berjudul Cara Membuat Program Backup Database Dengan Visual Basic 6.0. Selamat mencoba dan semoga bermanfaat.

Cara Membuat Program Browse Dan Simpan Foto Dengan Visual Basic 6.0

Cara Membuat Program Browse Dan Simpan Foto Dengan Visual Basic 6.0 | Gho Blog's - Pada dua posting sebelumnya kita sudah membahas bagaimana cara membuat database dengan Microsoft Office Access 2003 dan mencoba menerapkannya dalam pembuatan sebuah aplikasi berbasis Visual Basic 6.0.

Pada posting kali ini kita akan mencoba mengembangkan program yang pernah kita buat sebelumnya dengan menambahkan fitur browse dan menyimpan foto. untuk lebih jelasnya sobat bisa buka kembali posting saya yang berjudul Cara Membuat Program Simpan Edit Dan Delete Dengan Visual Basic 6.0. Karena program dari form tersebutlah yang akan kita modifikasi.

Sebelumnya tambahkan satu buah field pada tabel "tmhs" yang kita buat pada posting saya yang berjudul Cara Membuat Database Dengan Microsoft Office Access 2003, seperti gambar berikut ini :

Jika sudah, modifikasi disain form sebelumnya seperti penjelasan gambar dibawah ini :

Sebelumnya

Edit tampilan form diatas dengan menambahkan beberapa tools, pada Label9 aturlah Visible nya menjadi False melalui properties box yang berada disebelah kanan. Sehingga hasilnya seperti dibawah ini :

Sesudah Dimodifikasi

Sekarang kita akan memodifikasi script yang pernah kita buat sebelumnya, pertama kita akan membuat tombol Browse, caranya double klik pada tombol Browse dan masukkan script berikut tepat diantara Private Sub Command5_Click() dengan End Sub 

CommonDialog1.Filter = "Picture files (*.jpg;*.bmp;*.gif;*.png)|*.jpg;*.bmp;*.gif;*.png" CommonDialog1.ShowOpen Image1.Picture = LoadPicture(CommonDialog1.FileName) Label9.Visible = False Image1.Visible = True

Kemudian kita ubah script pada tombol Simpan, caranya double klik pada tombol Simpan kemudian ganti script sebelumnya yang berada antara Private Sub Command1_Click() dan End Sub dengan script berikut ini :

Dim X If Text1.Text = "" Or Text2.Text = "" Or Text3.Text = "" Or Text4.Text = "" Or Text5.Text = "" Or Text6.Text = "" Or Text7.Text = "" Then MsgBox "Data Belum Lengkap", vbInformation, "Pesan" Exit Sub Else X = MsgBox("Apakah Data Ingin Disimpan...?", vbQuestion + vbYesNo) If X = vbYes Then Set rsmhs = New ADODB.Recordset rsmhs.LockType = adLockOptimistic rsmhs.CursorType = adOpenDynamic rsmhs.Open "SELECT * FROM tmhs", conn, , , adCmdText rsmhs.AddNew rsmhs.Fields(0) = Text1.Text rsmhs.Fields(1) = Text2.Text rsmhs.Fields(2) = Text3.Text rsmhs.Fields(3) = Text4.Text rsmhs.Fields(4) = Text5.Text rsmhs.Fields(5) = Text6.Text rsmhs.Fields(6) = Text7.Text rsmhs.Fields(7) = CommonDialog1.FileName rsmhs.Update MsgBox "Data Tersimpan...!", vbInformation, "Pesan" kosongform Image1.Visible = False Label9.Visible = True Else Exit Sub End If End If

Mudah bukan...??
Bagaimana dengan tombol Edit dan Delete....??

Untuk tombol Delete, tidak ada perubahan script yang harus dilakukan, hanya sedikit penambahan script pada tombol Edit, supaya tutorial ini makin lengkap kita bahas juga tombol Editnya.

Sebelumnya kita harus ubah terlebih dahulu script pada Text1_KeyPress, caranya double klik pada Text1 kemudian ganti script yang berada diantara Private Sub Text1_KeyPress(KeyAscii As Integer) dan End Sub dengan script dibawah ini :

If KeyAscii = 13 Then Set rsmhs = New ADODB.Recordset rsmhs.LockType = adLockOptimistic rsmhs.CursorType = adOpenDynamic rsmhs.Open "select * from tmhs", conn, , , adCmdText rsmhs.Filter = " nim= '" & Text1.Text & "'" If Not rsmhs.EOF Then Command1.Enabled = False Command2.Enabled = True Command3.Enabled = True Image1.Visible = True Text1.Enabled = False Text2.Text = rsmhs.Fields(1) Text3.Text = rsmhs.Fields(2) Text4.Text = rsmhs.Fields(3) Text5.Text = rsmhs.Fields(4) Text6.Text = rsmhs.Fields(5) Text7.Text = rsmhs.Fields(6) CommonDialog1.FileName = rsmhs.Fields(7) Image1.Picture = LoadPicture(CommonDialog1.FileName) If CommonDialog1.FileName = "" Then Label9.Visible = True Else Label9.Visible = False End If End If End If

Yang terakhir kita ubah script tombol Edit, caranya duoble klik pada tombol Edit, kemudian ganti script yang berada diantara Private Sub Command2_Click() dan End Sub dengan script dibawah ini :

Dim a a = MsgBox("Edit Data...?", vbQuestion + vbYesNo, "Pesan") If a = vbYes Then rsmhs.Fields(1) = Text2.Text rsmhs.Fields(2) = Text3.Text rsmhs.Fields(3) = Text4.Text rsmhs.Fields(4) = Text5.Text rsmhs.Fields(5) = Text6.Text rsmhs.Fields(6) = Text7.Text rsmhs.Fields(7) = CommonDialog1.FileName rsmhs.Update MsgBox "Data Berhasil Di Edit..!!", vbInformation, "Info" kosongform Text1.SetFocus Image1.Visible = False Label9.Visible = True Else Exit Sub End If

Jika dijalankan maka tampilan program akan menjadi seperti berikut ini :

Sekian dulu toturial Visual Basic 6.0 dari saya yang berjudul Cara Membuat Program Browse Dan Simpan Foto Dengan Visual Basic 6.0. Selamat mencoba dan semoga bermanfaat....

Cara Membuat Program Simpan Edit Dan Delete Dengan Visual Basic 6.0

Cara Membuat Program Simpan Edit Dan Delete Dengan Visual Basic 6.0 | Gho Blog's - Melanjutkan latihan pemrograman Visual Basic 6.0 kita pada hari ini, kita akan mencoba membuat sebuah program menggunakan perintah Simpan, Edit dan Delete.

Latihan kali ini kita akan menggunkan Microsoft Office Access 2003 sebagai database. Saya menggunakan database yang pernah dibuat pada posting sebelumnya. Untuk lebih jelasnya silakan sobat lihat lagi posting saya yang berjudul Cara Membuat Database Dengan Microsoft Office Access 2003. Database inilah yang akan kita gunakan sebagai bahan latihan hari ini.

Untuk memulai latihan, silakan ikuti langkah-langkah berikut ini :

• Sekarang bukalah sebuah project baru di Visual Basic 6.0, gunakan VB Enterprise Edition Controls. Karena akan lebih lengkap tools-toolsnya dibanding menggunakan Standart EXE.

• Kemudian buatlah disain form seperti berikut ini. Atur settingan Enabled pada tombol Edit dan Delete menjadi False. Tujuannya agar tidak  terjadi human error.

• Buatlah sebuah modul koneksi database dengan cara klik menu Project ==> Add Module ==> Open.
• Dan masukkan script berikut di modul tersebut

Global conn As ADODB.Connection Global rsmhs As ADODB.Recordset Sub koneksi() On Error GoTo gagal: Set conn = New ADODB.Connection conn.Provider = "microsoft.jet.oledb.4.0" conn.CursorLocation = adUseClient conn.Open App.Path & "\dbbelajar.mdb" Exit Sub gagal: If (Err.Number = -2147467259) Then MsgBox "Koneksi Aplikasi Ke Database Gagal...!", vbCritical, "Informasi" End End If End Sub

• Kemudian kembali pada disain form. Kita akan memanggil fungsi dari module koneksi yang baru dibuat, caranya double klik form tersebut kemudian masukkan perintah dibawah ini, tepat antara Private Sub Form_Load() dengan End Sub.

koneksi

• Buatlah sebuah program untuk membersihkan form dan mengembalikan kondisi form dalam keaadaan awal. Caranya, letakkan script berikut ini di tempat kosong pada di program. Program ini saya beri nama "kosongform".

Private Sub kosongform() Text1.Text = "" Text2.Text = "" Text3.Text = "" Text4.Text = "" Text5.Text = "" Text6.Text = "" Text7.Text = "" Text1.Enabled = True Command1.Enabled = True Command2.Enabled = False Command3.Enabled = False End Sub

• Selanjutnya kita akan membuat tombol simpan. Duoble klik pada tombol simpan dan masukkan script berikut diantara Private Sub Command1_Click() dengan End Sub.

Dim X If Text1.Text = "" Or Text2.Text = "" Or Text3.Text = "" Or Text4.Text = "" Or Text5.Text = "" Or Text6.Text = "" Or Text7.Text = "" Then MsgBox "Data Belum Lengkap", vbInformation, "Pesan" Exit Sub Else X = MsgBox("Apakah Data Ingin Disimpan...?", vbQuestion + vbYesNo) If X = vbYes Then Set rsmhs = New ADODB.Recordset rsmhs.LockType = adLockOptimistic rsmhs.CursorType = adOpenDynamic rsmhs.Open "SELECT * FROM tmhs", conn, , , adCmdText rsmhs.AddNew rsmhs.Fields(0) = Text1.Text rsmhs.Fields(1) = Text2.Text rsmhs.Fields(2) = Text3.Text rsmhs.Fields(3) = Text4.Text rsmhs.Fields(4) = Text5.Text rsmhs.Fields(5) = Text6.Text rsmhs.Fields(6) = Text7.Text rsmhs.Update MsgBox "Data Tersimpan...!", vbInformation, "Pesan" kosongform Else Exit Sub End If End If

• Sebelum kita membuat tombol Edit, kita harus membuat sebuah program pemanggilan data terlebih dahulu, gunanya agar tidak terjadi duplikasi pada primary key. Cara penggunaanya adalah, kita mengetikkan NIM yang ingin diinputkan pada Text1, kemudian tekan tombol Enter pada keybord. Bila NIM yang kita masukan tadi sudah didalam database, maka data lainnya seperti "Nama, Tmp/Tgl Lahir, Fakultas dsb" akan muncul berdasarkan NIM yang kita masukkan dan tombol Simpan akan di non aktifkan agar tidak terjadi duplikasi data yang disebabkan faktor human error.


• Cara membuat program tersebut yang pertama adalah, double klik pada Text1.Text. Setelah itu pilih metode KeyPress.

• Setelah itu masukkan script berikut diantara Private Sub Text1_KeyPress(KeyAscii As Integer) dengan End Sub.

If KeyAscii = 13 Then Set rsmhs = New ADODB.Recordset rsmhs.LockType = adLockOptimistic rsmhs.CursorType = adOpenDynamic rsmhs.Open "select * from tmhs", conn, , , adCmdText rsmhs.Filter = " nim= '" & Text1.Text & "'" If Not rsmhs.EOF Then Command1.Enabled = False Command2.Enabled = True Command3.Enabled = True Text1.Enabled = False Text2.Text = rsmhs.Fields(1) Text3.Text = rsmhs.Fields(2) Text4.Text = rsmhs.Fields(3) Text5.Text = rsmhs.Fields(4) Text6.Text = rsmhs.Fields(5) Text7.Text = rsmhs.Fields(6) End If End If

• Jika sudah, barulah kita buat tombol Editnya, caranya double klik pada tombol Edit dan masukkan script berikut diantara Private Sub Command2_Click() dengan End Sub.

Dim a a = MsgBox("Edit Data...?", vbQuestion + vbYesNo, "Pesan") If a = vbYes Then rsmhs.Fields(1) = Text2.Text rsmhs.Fields(2) = Text3.Text rsmhs.Fields(3) = Text4.Text rsmhs.Fields(4) = Text5.Text rsmhs.Fields(5) = Text6.Text rsmhs.Fields(6) = Text7.Text rsmhs.Update MsgBox "Data Berhasil Di Edit..!!", vbInformation, "Info" kosongform Text1.SetFocus Else Exit Sub End If

• Selanjutnya, kita buat tombol Delete, Caranya double klik pada tombol Delete dan masukkan script berikut diantara Private Sub Command3_Click()  dengan End Sub.

Dim Y Y = MsgBox("Apakah Data Ingin Dihapus..?", vbQuestion + vbYesNo) If Y = vbYes Then rsmhs.Delete MsgBox "Data Berhasil Dihapus..!!", vbInformation, "info" kosongform Text1.SetFocus Else Exit Sub End If

• Terakhir, kita buat tombol Exit, duoble klik pada tombol Exit dan masukkan script berikut diantara Private Sub Command4_Click() dengan End Sub.

Dim X X = MsgBox("Apakah Anda Ingin Keluar..?", vbQuestion + vbYesNo, App.Title) If X = vbYes Then Unload Me Else Cancel = 1 End If

Sobat bisa download project nya disini =>> Download Atau download project ini via mediafire disini  =>> Download Via Mediafire

Untuk selanjutnya sobat bisa ikuti tutorial saya yang berjudul Penggunaan DTPicker Dan Combo Box Pada Program Simpan Edit Delete Dengan Visual Basic 6.0 agar sobat bisa lebih memahami pembuatan program "Simpan, Edit dan Delete" dengan tambahan tools lainnya

Contoh Membuat Virus Dengan Aplikasi VB+ViMaker32

Setelah asik berselancar di dunia maya buat nyari-nyari referensi tentang virus dan visual basic, akhirnya nemu salah satu aplikasi yang (menurut saya) keren. VB+ViMaker32 aplikasi yang memungkinkan kita membuat virus secara instant. Berikut sedikit penjelasan tentang VB+ViMaker32 yang saya kutip dari dokumentasi aplikasi tersebut. 

"VB+ViMaker32 (Visual Basic Virus Maker) adalah sebuah software yang diciptakan untuk membuat program komputer yang berbasiskan security. Software ini merupakan sebuah editor yang berisi kode-kode untuk menjalankan suatu aksi/tindakan tertentu sesuai dengan kode yang diberikan. Software ini dapat membuat program (untuk security) yang bertujuan untuk melakukan test pada sistem komputer, mengubah berbagai pengaturan sistem, serta dapat digunakan sebagai program pembasmi malware yang telah menjangkiti komputer dengan tambahan berbagai modul/plugins.

Software ini juga dapat melakukan simulasi serangan program jahat (malware) serta menguji ketahanan sistem terhadap suatu serangan malware dan dapat mengembalikan pengaturan sistem yang telah diubah oleh suatu malware atau program tertentu. Walaupun software ini bertajuk 'Virus Maker', bukan berarti software ini hanya dapat membuat program jahat (malware) melainkan juga dapat digunakan untuk melawan program jahat (malware) lainnya yang telah ada dan aktif di dalam sistem dengan menggunakan teknik 'Malware vs Malware' atau dengan kata lain membasmi malware dengan malware (program) tetapi yang dapat dikendalikan. Sehingga anda dapat menggunakan software ini jika antivirus yang digunakan tidak dapat mendeteksi/membasmi malware yang aktif dikomputer anda atau minimal mengembalikan pengaturan sistem yang telah diubah oleh malware.

Software ini diciptakan menggunakan bahasa pemrograman 'Visual Basic', oleh karena itu untuk dapat menggunakan dan menjalankan software dan program yang diciptakannya, didalam sistem anda harus terdapat file runtime milik Visual Basic yaitu: MSVBVM60.dll. Software ini dibuat sebagai pengganti dari software sejenis terdahulu yang gagal dirilis yaitu: BCVCKIT32 (Bla@ck Cyber Virus Cre@tor Kit). Software ini telah mengalami berbagai revisi dan penggantian nama, dimulai dari: MesMew Virus Compiler (Tidak dirilis), V-Rez@constructor (RC01) dan terakhir VB+ViMaker32. Dengan pengembangan yang terus dilakukan, software ini telah menjadi sebuah tools/alat bantu yang sangat berguna (jika tidak disalahgunakan)."

Oke, langsung saja buat yang penasaran mau nyoba aplikasi ini, bisa diunduh gratis di website nya http://www.spyrozone.net

Berikut ini sedikit ulasan saya setelah mencoba aplikasi tersebut.

1. Tampilan awal

 
2. Klik menu File -> Project Baru (Full Load)


Inilah tampilan dimana kita bisa memulai membuat virus. Pertama kita bisa memasukan semua keterangan tentang virus yang nantinya akan dibuat, seperti pengaturan Informasi Virus, Registry, Message dll. Berikut tampilannya.






 Cukup dengan klik dan rubah.



3. Menu Tools

 

 

Aplikasi ini juga menyediakan menu Tools untuk Registry Action Selector dan Window Caption Selector.

Berikut ini penjelasan dari kedua fitur diatas, yang saya kutip dari dokumentasinya.

"Registry Action Selector: Fitur ini berisi kumpulan database yang memuat semua pengaturan/settingan registry yang dapat diubah. Anda masih dapat mengubah database ini dengan menambahkan atau memodifikasi nilai yang diberikan. Gunakan fitur ini untuk mendapatkan/mengubah/mengetahui suatu setting pada registry.

Window Caption Selector: Fitur ini berisi kumpulan database yang memuat semua judul (Caption) pada jendela (Window). Anda hanya tinggal memilih daftar caption pada database dengan menceklistnya. Gunakan fitur ini untuk memilih daftar Caption Window yang telah disediakan." 

Jadi,  untuk pengaturan tentang registry yang akan dirubah nantinya, kita hanya tinggal ambil di menu Registry Action Selector, terdapat 50 registry yang bisa kita pilih dan tinggal double klik saja. Pilih insert dan cut lalu paste pada section [REGISTRY]. Sedangkan untuk Window Caption Selector, terdapat 176 daftar yang bisa kita pilih untuk dimusnahkan.

Masih banyak fitur-fitur lainnya yang bisa kita gunakan, seperti icon virus yang bisa diganti dengan banyak pilihan icon yang sudah disediakan.

Setelah semuanya dirasa cukup dan selesai, sebelum virus dieksekusi kita bisa melakukan pemeriksaan kode yang telah diketik dengan cara mengklik menu analisa, atau klik Project->Analisa Project. Setelah analisa selesai dan tidak ada masalah maka project virus tersebut bisa langsung di compile, klik compile atau Project->Compile Project dan pesan peringatan akan muncul untuk menanyakan apakah proses compile akan dilanjutkan, apabila ingin dilanjutkan maka klik yes dan project virus yang telah kita buat akan langsung di compile menjadi file .exe.

Selesai, mungkin cukup sedikit ulasan saya tentang aplikasi VB+ViMaker32 semoga bisa bermanfaat. ;)

Cara Mengganti Warna Border Dengan CSS

Border adalah warna garis yang mengililingi sebuah text atau kotak, apa bila kita menggunakan HTML biasa kita akan membuatnya menggunakan Table border di sekitar text dan juga jika

kita menggunakan HTML biasa kita hanya bisa memberikan satu wana saja pada border tersebut. tapi dengan css border properties dapat dibuat border dengan efek yang lebih baik.

Contoh :

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <title>Untitled Document</title> <style type="text/css"> p.one { border-style: solid; border-color: #0000ff } p.two { border-style: solid; border-color: #ff0000 #0000ff } p.three { border-style: solid; border-color: #ff0000 #00ff00 #0000ff } p.four { border-style: solid; border-color: #ff0000 #00ff00 #0000ff rgb(250,0,255) } </style> </head> <body> <p class="one"> One-colored border!</p> <p class="two"> Two-colored border!</p> <p class="three"> Three-colored border!</p> <p class="four"> Four-colored border!</p> </body> </html>

Coba anda copy script di atas ke dalam local server kalian kemudan jalankan di browser anda, maka hasilnya akan seperti gambar di atas.

Tipe - tipe Operator Pada Java

Operator adalah sebuah karakter yang digunakan untuk menghasilkan suatu nilai dari operand. di java ada beberapa tipe operator, antaralain :

• Operator Aritmatika
• Operator Penugasan
• Operator Pembanding
• Operator Logika

1. Operator Aritmatika

Operator aritmatika yang sering digunakan untuk
menghitung sebuah pekerjaan matematika seperti jumlah, bagi, kali, pangkat, dll.

Operator	Keterangan
+	Penjumlahan
-	Pengurangan
*	Pengurangan
/	Pembagian
%	Sisa Pembagian

Contoh Program :

package oper_java; /** * * @author Jin Toples */ public class Oper_java { /** * @param args the command line arguments */ public static void main(String[] args) { int a=3; int b=2; int jum=a+b; int kur=a-b; int kal=a*b; int bag=a/b; int mod=a%b; System.out.println(jum); System.out.println(kur); System.out.println(kal); System.out.println(bag); System.out.println(mod); } }

2. Operator Penugasan

operator penugasan adalah operator yang digunakan untuk menugaskan suatu fariabel untuk melakukan sebuah proses. operator ini biasa digunakan pada perulangan sebagai increment atau decrement.

Operator	Keterangan
=	Pemberian Nilai
+=	Penambahan Bilangan
-=	Pengurangan Bilangan
/=	Pembagian Bilangan
%	Perolehan Sisa Pembagian

Contoh Program :

package oper_java; /* * @author Jin Toples */ public class Oper_java { /* * @param args the command line arguments */ public static void main(String[] args) { int a=1; while (a <= 5){ System.out.println(a); a+=1; } } }

3. Operator Pembanding

Operator pembanding adalah operasi yang digunakan untuk membandingkan antara dua nilai atau operand yang menghasilkan tipe data Boolean yaitu true/false. biasa digunakan pada perulangan dan kondisional.

Operator	Keterangan
==	Sama Dengan
!=	Tidak Sama Dengan
>	Lebih dari
<	Kurang dari
>=	Lebih dari sama dengan
<=	Kurang dari sama dengan

Contoh Program :

package oper_java; /* * * @author Jin Toples */ public class Oper_java { /* * @param args the command line arguments */ public static void main(String[] args) { int a=5; int b=8; boolean c=a > b; System.out.println(c); } }

4. Operator Logika

Operator logika digunakan untuk memmbandingkan dua kondisi yang menghasilkan nilai boolean yaitu true/false.

Operator	Keterangan
&&	Dan
||	Atau

operator AND / && akan menghasilkan seperti ini :

Kondisi 1	Kondisi 2	Hasil
False	False	False
False	True	False
True	False	False
True	True	True

operator Or / || akan menghasilkan seperti ini :

Kondisi 1	Kondisi 2	Hasil
False	False	False
False	True	True
True	False	True
True	True	True

Contoh program :

package oper_java; /* * * @author Jin Toples */ public class Oper_java { /* * @param args the command line arguments */ public static void main(String[] args) { int a=5; int b=8; boolean c=a > b; boolean d=a < b; boolean and = c && d; boolean or= c || d; System.out.println(and); System.out.println(or); } }

Sekarang kita telah selesai membahas semua tipe operator yang ada di java beserta contoh program - programnya masing - masing. silahkan anda praktekan dan pelajari.