TUGAS VISUAL BASIC 3: MEMBUAT FONT STYLE DAN FONT COLOR

TUGAS VISUAL BASIC 3: MEMBUAT FONT STYLE DAN FONT COLOR

Posted: 8 Januari 2013 in Visual Basic
Kaitkata:belajar visual basic, Visual Basic

0

Halo sobat semua,, yuk kita belajar Visual Basic lagi,, sekarang materinya adalah membuat font style dan font color, penasaran?? Yuk kita buat bareng – bareng…..

1. Seperti biasa buka dulu aplikasi visual basic nya
2. Buat form seperti gambar berikut

 

3. Berikut adalah rumus option1 sampai option6 (red-black):

Private Sub Option1_Click()

lbljudul.ForeColor = vbRed

End Sub

Private Sub Option2_Click()

lbljudul.ForeColor = vbBlue

End Sub

Private Sub Option3_Click()

lbljudul.ForeColor = vbGreen

End Sub

Private Sub Option4_Click()

lbljudul.ForeColor = vbYellow

End Sub

Private Sub Option5_Click()

lbljudul.ForeColor = vbWhite

End Sub

Private Sub Option6_Click()

lbljudul.ForeColor = vbBlack

End Sub

4. Dan berikut adalah rumus check1 sampai check3 (bold, italic, underlined)

Private Sub Check1_Click()

If Check1.Value = 1 Then

lbljudul.FontBold = True

Else

lbljudul.FontBold = False

End If

End Sub

Private Sub Check2_Click()

If Check2.Value = 1 Then

lbljudul.FontItalic = True

Else

lbljudul.FontItalic = False

End If

End Sub

Private Sub Check3_Click()

If Check3.Value = 1 Then

lbljudul.FontUnderline = True

Else

lbljudul.FontUnderline = False

End If

End Sub

5. Selesai,,, gampang bukan…

Berikut adalah hasilnya:

 

Oke sobat, semoga postingan ini bermanfaat bagi sobat semua….