Vehicle Count Code Error. Please Help...VB

[muzamilsumra]

Hello, could someone guide me on what ma i doing wrong here as my game hangs with this code.

Public Class VehicleCounter

'Declarations

Public vehicles As Vehicle()

Public Veh As Vehicle

Dim VehCount As Integer

Public Sub New()

Me.Interval = 10

End Sub

Shadows Sub keydown(ByVal sender As Object, ByVal e As KeyEventArgs) Handles MyBase.KeyDown

If e.KeyCode = Keys.K Then

vehicles = World.GetNearbyVehicles(Game.Player.Character.Position, 50)

VehCount = vehicles.Count

UI.Notify(vehicles.count)

ElseIf e.KeyCode = Keys.J Then

Game.Player.WantedLevel = 0

End If

End Sub

Private Sub general_tick(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Tick

End Sub

End Class

[muzamilsumra]

Hey Guys, does it mean that this forums are quite dead?