Saya mencoba membuat applikasi sederhana dengan menggunakan VB 2005 Express
Edition.
Didalam aplikasi saya, saya tambahkan sebuah label dengan interval 10 ms
dimana fungsinya adalah menggerakan label.left -1 apabila status = 1 dan
menggerakan label.left + 2 apabila status = 2.
Status tersebut saya set 1 apabila label.left sudah menyentuh angka 500 dan
saya set 2 apabila sudah menyentuh angka 1, code-nya kira2 seperti ini :
Public Class Form1
Dim moveTarget As Integer = 1
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Timer1.Tick
If moveTarget = 1 Then
Label1.Left = Label1.Left - 1
End If
If moveTarget = 2 Then
Label1.Left = Label1.Left + 1
End If
If Label1.Left = 1 Then moveTarget = 2
If Label1.Left = 500 Then moveTarget = 1
End Sub
End Class
Programnya lancar2 saja, labelnya bergerak kekiri dan kekanan dengan baik
tanpa error......., tapi saya menemukan kasus kalau saya membuka dokumen
Power Point dengan animasi slide, dia akan terus2an melakukan animasi tanpa
henti...., sebenarnya ini error dari VB, .NET Framework, atau PowerPointnya
?, solusinya bagaimana yah ?
