Pages

Saturday, March 10, 2012

Basic VB

Program Basic VB

Program ini digunakan untuk membuat project pada sebuah form yang terdiri dari label, command dan text box. Agar lebih menarik, program ini juga dapat membuat berbagai warna pada tampilan dengan property forecolor.


Nama File              : Project1
Nama Program       : Visual Basic
Input / Deklarasi    : label
                                 command
                                 caption  
                                 fontsize
                              forecolor
                                 msgbox

LISTING PROGRAM :

Private Sub Command1_Click()
Label1.Caption = Text1.Text
End Sub

Private Sub Command2_Click()
Label1.FontSize = Label1.FontSize + 2
End Sub

Private Sub Command3_Click()
Label1.FontSize = Label1.FontSize - 2
End Sub

Private Sub Command4_Click()
cek = MsgBox("Are you sure want to exit?", vbYesNo + vbQuestion, "Confirm exit")
If cek = vbYes Then
Unload Me
Else
Exit Sub
End If
End Sub

Private Sub Label2_Click()
Label1.ForeColor = vbRed
End Sub

Private Sub Label3_Click()
Label1.ForeColor = vbGreen
End Sub

Private Sub Label4_Click()
Label1.ForeColor = vbBlue
End Sub

Output :



No comments:

Post a Comment