สอบถามปัญหา คำสั่งปุ่ม Seach ใน Microsof visual Studio 2010 หน่อยครับ รบกวนช่วยด้วยครับ

 Public CarName As String
Private Sub TblCarbrandDataGridView_RowHeaderMouseClick(sender As Object, e As DataGridViewCellMouseEventArgs) Handles TblCarbrandDataGridView.RowHeaderMouseClick
        If e.RowIndex >= 0 Then
            CarName = TblCarbrandDataGridView(1, e.RowIndex).Value
            Close()
        End If
    End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim f As New Form2()
        f.ShowDialog()
        TextBox1.Text = f.CarName
    End Sub