双击DGV行时，第一次出错，第二次以后就正常

将数据表作为DGV数据源
双击DGV行，将内容显示到界面的控件中
但是第一次双击时出错，提示找不到XXX列
但是再次双击，以后就都正常能显示了
每次都这样，不知道为什么？？？

代码如下：
  Private Sub DataGridView1_CellDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellDoubleClick
        If Bool_开关 = True Then
            双击列表DGV(e.RowIndex)
       End If
    End Sub  '//双击DGV行

    Sub 双击列表DGV(ByVal e As Integer)
        REM----- 将显示控件双击的行返回到窗体控件中，如有空值，需要强制转换    --------------
           If Bool_开关 = True Then
                Bool_开关 = False
                Dim DGVRW As Object = DataGridView1.Rows(e)
                所属项目部.Text = DGVRW.Cells("所属项目部").Value.ToString
                Tex分包合同ID.Text = DGVRW.Cells("分包合同ID").Value.ToString
                Comb项目合同编号.Text = DGVRW.Cells("项目合同编号").Value.ToString
            end if
     end sub