1.1 MEMBUAT PROGRAM PERKENALAN
Assalmualaikun wr,wb …
Disini kita akan coba buat program untuk menampilkan nama kita ……!!
Yang anda butuh sebagai berikut ..:
object | Nama | Property | Value |
Label1 | Label1 | caption | Masukan nama anda |
Label2 | Label2 | caption | kosong |
Text1 | Text1 | text | kosong |
Frame1 | Frame1 | caption | Pilih property |
Chekbox1 | miring | caption | miring |
Chekbox2 | tebal | caption | tebal |
Chekbox3 | underline | caption | Garis bawah |
Option1 | Center | Caption | center |
Option2 | Left | Caption | Left justify |
Option3 | Right | Caption | Right justify |
Command1 | cmdtampil | Caption | Tampil |
Command2 | Cmdreset | Caption | Reset |
Command3 | Cmdforecolour | Caption | Forecolour |
Commonialog | O | ------------ | -------------- |
· Cara untuk menampilkan commondialog anda lakukan :
1. Click project pilih components
2. Centang Microsoft common dialog control 6.0
Private sub cmdtampil_click ()
Label2=””
Label2.caption= text1.text
End sub
Private sub cmdreset_click ()
Text1.text=””
Label2=””
Text1.setfocus
End sub
Private sub cmdforecolour_click ()
o.showcolor
label2.forecolor= o.color
Private Sub miring_Click()
Label2.FontItalic = miring.Value
End Sub
Private Sub tebal_Click()
Label2.FontBold = tebal.Value
End Sub
Private Sub underline_Click()
Label2.FontUnderline = underline.Value
End Sub
Private sub center_click ()
Label2.Alignment = 2
End Sub
Private sub left_click ()
Label2.Alignment = 0
End Sub
Private sub rigth_click ()
Label2.Alignment = 1
End Sub
Gampang kan selamat mencoba …!! Semoga bermanfaat ..
Wassalamualaiku ..


0 komentar:
Posting Komentar