nahhhh pada artikel kali ini saya akan memberikan sesuatu kepada
kalian semua, saya akan membuat Form pada VB 6.0 akan membuka dan
menutup dengan sendirinya kayak lagi berkedip-kedip gitu kawan .
Langkah langkah pembuatanya adalah sebagai berikut :
1. Buatlah Form dan tempelkan sebuah timer, biarkan nama form tetap Form1 dan Timer tetap Timer1
2. Klik View code atau dobel klik pada area Form
3. Pada Form load ketikan listing program : Timer1.Interval = 100
4. Pada Timer1 Timer ketikan listing code :
- If Form1.Visible = True ThenForm1.
- Visible = FalseElseForm1.
- Visible = TrueEnd If
- Atau bisa juga langsung ketikan kode :
- Private Sub Form_Load()Timer1.Interval = 100
- End Sub
- Private Sub Timer1_Timer()If Form1.
- Visible = True ThenForm1.Visible = FalseElseForm1.
- Visible = TrueEnd If End Sub
Selamat mencoba kawan…

0 komentar:
Post a Comment