im using ldr to sense the revolution of the motor per minute or per second, pls help im a beginner and still don't know how to program well.

my program is not working


dim x as integer
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Label1.Text = Inp(889)
X = X + 1

End Sub

End Sub