Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles Button1.Click
        Dim Datum1() As String = Nothing
        Dim i As Integer
        For i = 0 To DataGridView1.SelectedRows.Count - 1
            Datum1(i) = DataGridView1.SelectedRows(i).Cells( _
              "Datum").Value.ToString
        Next i
        Dim Form2 As New Planung_eingabe(Datum1)
        Form2.Show()
        Me.Close()
    End Sub

Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt.