Select Language



Followers

IT Programmer. Powered by Blogger.

25 August 2010

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"



Comments:

Ada 1
Chacrix said...
pada hari 

saya Iik dari Kuningan Jabar.

sya mu tanya tentang konversi bahasa dari VB.6 ke VB 2008 itu gmana?

contohnya saya membuat Gradien di VB 6,, nah untuk bisa di pakai ke VB 2008 itu gmana..? saya blum tahu bahasa yang dipakai.

Social Media


Facebook Page

Programming Tutorial


Info


Tips
Downloads
Friends
 
This Blog is proudly powered by Blogger.com | Template by Bali Web Development | Privacy Policy | Rise Up!!