35. Microsoft Visual Basic Coding Keluar

Pesan = MsgBox (“Yakin? ”, vbYesNo , “konfirmasi”)

IF pesan = vb yes Then

Do Until me. Height = 3

Me. Height = Me. Height -3

Do Events

Loop

End

End IF

End Sub