Nesne başvurusu bir nesnenin örneğine ayarlanmadı.

Public Class Form1 
   
   
      Dim oran As Integer = 15 
      Dim ilkyukseklik As Double = Me.araba.Top + Me.araba.Height 'Hata aldığım satır burası. 
      Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick 
          If LineShape3.Y1 > araba.Top + araba.Height Then 
   
              araba.Top = araba.Top + oran 
              Timer1.Start() 
          ElseIf LineShape3.Y1 = araba.Height Then 
              oran = oran - 1 
              araba.Top = ilkyukseklik - oran 
          End If 
      End Sub 
   
      Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
          Timer1.Start() 
      End Sub 
  End Class