Membuat Program RGB Color dengan VB 2008

"Om Swastiastu"

Ini adalah program sederhana lainnya. Kalian tentu tahu RGB color kan. Biasanya ketika kalian mengedit poto di Photoshop atau aplikasi lainnya, maka pasti terdapat warna ini. Ini adalah warna kombinasi dari Red, Green, dan Blue. Dan tiap warna memiliki nilai 0 sampai 250. Bagaimana kalau ini kita implementasikan dalam Visual Basic 2008? Bukalah aplikasi VB 2008 kalian, lalu desain sebuah form baru seperti gambar dibawah ini:

Dalam gambar diatas terdapat 4 buah Label, 3 buah TextBox, dan 3 buah Button. Aturlah Label agar nampak seperti gambar diatas.
Kemudian double klik Button1 atau Button dengan nama 'Display', lalu masukkan kode berikut ini:


        Dim rgb1, rgb2, rgb3 As Integer
        rgb1 = TextBox1.Text
        rgb2 = TextBox2.Text
        rgb3 = TextBox3.Text
        Me.BackColor = Color.FromArgb(rgb1, rgb2, rgb3)


BackColor digunakan agar warna background yang berubah ketika nilai RGB dimasukkan dari masing-masing TextBox. Untuk kode Color.FromArgb(rgb1, rgb2, rgb3) digunakan untuk mengambil kode dari RGB, dimana TextBox 1, 2, dan 3 dijadikan tempat penginputan data. Disini VB secara otomatis telah menentukan bahwa rgb1 untuk Red, rgb2 untuk Green, dan rgb3 untuk Blue.
Jika sudah, double klik Button2, lalu masukkan kode berikut ini:


        TextBox1.Clear()
        TextBox2.Clear()
        TextBox3.Clear()


Perintah Clear() ini berfungsi untuk membersihkan angka-angka yang terdapat dalam tiap TextBox. Dan terakhir, masukkan kode End pada Button3 yang berfungsi untuk mengakhiri program. Silahkan jalankan program kalian dengan menekan tombol F5. Maka hasilnya akan seperti ini:

"Om Santhi, Santhi, Santhi, Om"