cara buat popup pada taksbar
Salah satu contoh Biasanya pesan ini muncul ketika suatu Antivirus meminta untuk Update, atau menampilkan laporan ketika sudah terupdatenya Antivirus yang anda gunakan seperti Avast berikut ini : Seperti pada judul posting untuk kali ini, saya akan membuat pesan muncul pada sudut kanan taskbar menggunakan Visual Basic 6.0, Langsung saja : Buat satu form terserah design ada, tapi jangan terlalu besar . Lalu tambahkan components : Timer1 : - interval = 10 Untuk properties form : Border-style harus bernilai 'none' . ShowInTaskBar bernilai false Tambahkan Source kode : Dim DirectionIsUp As Boolean Private Sub Form_Load() Me.Top = Screen.Height + 10 Me.Left = Screen.Width - (Me.Width + 100) DirectionIsUp = True End Sub Private Sub Timer1_Timer() If DirectionIsUp Then Me.Top = Me.Top - 50 If (Me.Top <= Screen.Height - (Me.Height - 10)) Then Timer1.Interval = 4000 DirectionIsUp = False End If Else Me.Top = Me.Top + 50 If Me.Top >= Screen.Height + 10 Then
