
Hai.. sobat belajarhebat berjumpa lagi dengan saya, kali ini saya akan memberikan tutorial bagaimana Cara Membuat Form Style Windows 8 di vb net.
Langkah langkah:
- Masukkan 2 label, 1 timer dan 1 picturbox ke form
- Lalu atur seperti gambar dibawah
- Jika sudah double klik pada timer1 dan beri kode berikut
Detik -= 1
If Detik < 0 Then
Detik = 59
Menit -= 1
If Menit < 0 Then
Menit = 59
Jam -= 0
End If
End If
Label1.Text = Format(Jam, “00”) & “:” & Format(Menit, “00”) & “:” & Format(Detik, “00”)
If Jam = 0 And Menit = 0 And Detik = 0 Then
Timer1.Enabled = False
PictureBox1.Hide()
MsgBox(“loading style win8 selesai”)
End If
- Double klik pada form dan beri kode
Label1.Text = “00:00:00”
Label1.Visible = False
‘nilai awal (0 s/d 59) untuk hitung mundur’
Jam = 0
Menit = 2
Detik = 10
Label1.Text = Format(Jam, “00”) & “:” & Format(Menit, “00”) & “:” & Format(Detik, “00”)
Timer1.Enabled = True
Timer1.Start()
- Jika sudah klik picturebox – klik image (letaknya ada di properties) – centang local resource – import – dan pilih file loading.gif. bagi yang belum punya loading.gif nya bisa download di sini.
- Jika sudah maka tampilannya menjadi berikut
- Jika sudah mirip klik run (f5)
Mudah sekali bukan!!, nah sekian dari saya semoga bermanfaat bagi anda semua. salam HEBAT!!.
video tutorial: