Belajar Visual Basic

CARA MEWARNAI,ITALIC,BOLD,UNDERLINE,STRIKEOUT HURUF

DENGAN APLIKASI VISUAL BASIC

1.       Anda buka aplikasi

Lalu anda buat 3 label padal kolom form, dengan cara meng klik LABEl pada area toolbox

    

             Kemudian arahkan krusor ke arah table form dan klik kiri sekali danakan mucul seperti gambar di bawah ini

      Dan buat juga radioButton, Button, text box dan checkbox semua itu bias anda liat di area toolbox. Jika sudah akan muncul gambar seperti di bawah ini:

       Kemudian anda doble klik pada area form untuk meng koding rumus spaya program yang anda buat bias berjalan, dan akan muncul gambar seperti di bawah ini:

      Kemudian masukan rumus nya

·         Untuk member nama program gunakan rusmus

Me.text=”SUJAM”

·         Untuk mengubah nama label gunakan rumus

        Label1.Text = "Belajar Pemograman VB 2010"

        Label2.Text = "masukan text di bawah ini"

        Label3.Text = ""

Label3 sengaja di kosongkan karna label3 di gunakan untuk output hasil proses

·         Untuk mengedit button1 gunakan rumus

Button1.Text = "proses"

·         Untuk mengedit/mengubah nama radiobuttom gunakan rumus

        RadioButton1.Text = "merah"

        RadioButton2.Text = "kuning"

        RadioButton3.Text = "hijau"

        RadioButton4.Text = "biru"

·         Untuk member warna radiobuttom gunakan rumus

        RadioButton1.ForeColor = Color.Red

        RadioButton2.ForeColor = Color.Yellow

        RadioButton3.ForeColor = Color.Green

        RadioButton4.ForeColor = Color.Blue

·         Untuk mengubah checkbox gunakan rumus di bawah ini

        CheckBox1.Text = "italic"

        CheckBox2.Text = "bold"

        CheckBox3.Text = "underline"

        CheckBox4.Text = "strikeout"

·         Untuk mengubah style tulisan pada checkbox gunakan rumus

        CheckBox1.Font = New Font(Font, FontStyle.Italic)

        CheckBox2.Font = New Font(Font, FontStyle.Bold)

        CheckBox3.Font = New Font(Font, FontStyle.Underline)

        CheckBox4.Font = New Font(Font, FontStyle.Strikeout)

Semua rumus itu dapat anda masukan dalam satu prose seperti gambar di bawah ini

Setelah di RUN program yang anda buat akan seperti gambar di bawah ini

  Langkah selanjutnya agar program yang anda buat dapat berjalan saat di RUN

Ø  Masukan rumus pada button1 dengan cara double click pada button1 dan masukan rumus seperti di bawah ini:

(Label3.Text = TextBox1.Text)

Seperti gambar di bawah ini:

Untuk mencoba program yang di buat anda tinggal klik RUN atau seperti symbol play dengan cara singkat tekan tombol F5

dan masukan tulisan pada textbox yang telah di buat jika anda klik prosen dan muncul output seperti yang telah di tulis pada area textbox, program yang anda buat berhasil, seperti gambar di bawah ini ;

Ø  Untuk mengubah warna tulisan output gunakan rumus (Label3.ForeColor = Color.Red).dengan cara double clic pada radiobutton1 kemudian run jika telah ter output klik merah dan akan berubahseperti gambar di bawah ini

Dan untuk warna kuning gunakan rumus(Label3.ForeColor = Color.Yellow) untuk warna hijau gunakan rumus(Label3.ForeColor = Color.Green) untuk warna biru gunakan rumus (Label3.ForeColor = Color.Blue). gunakan cara yang sama untuk memasukan rumus yaitu double clik pada setiap radiobuttom.

Untuk mengubah jenis tulisa anda double click checkbox1 dan anda coding dengan menggunakan rumus

Ø  If CheckBox1.Checked Then

            Label3.Font = New Font(Label3.Font, Label3.Font.Style Or FontStyle.Italic)

        Else

Ø  Label3.Font = New Font(Label3.Font, Label3.Font.Style And Not FontStyle.Italic)

        End If

Gunakan rumus ini pada checkbox2 checkbox3 dan checkbox4 dan anda tinggal menggati jenis huruf yang telah anda disain dan mengganti nomor checkbox sesuai dengan nomor checkbox yang anda click.

Contoh koding dalam bentuk gambar

Jika anda telah melakukan semua proses pengkodingan anda dapat mengetes program anda dengan cara di RUN(F5), dan coba satu persatu. Seperti gambar di bawah ini :

Coba satu persatu warna jika berubah sesuai dengan warna yang anda pilih berarti program anda berhasil.

“Selamat mencoba”

MASUJAM

MIA.2

14.MI.089