Private Sub DataGridView1_CellContentDoubleClick(ByVal sender As _
   System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) _
   Handles DataGridView1.CellContentDoubleClick
 
        StraßeTextBox.Text = DataGridView1.CurrentRow.Cells(1).Value.ToString
        OrtTextBox.Text = DataGridView1.CurrentRow.Cells(2).Value.ToString
        OrtsteilTextBox.Text = DataGridView1.CurrentRow.Cells(3).Value.ToString
 
    End Sub