vb窗体调试问题

用VS 编译器， VB语言写程序时
从本窗体调试能正常运行，
但是从启用窗体确不能正常运行是为什么呀!
代码如下：
      Dim ccmain As New frmccmain

        If txtempno.Visible = True Then
            ccmain.cmbempno.Text = dgvempno.Rows(dgvempno.CurrentCell.RowIndex).Cells(0).Value.ToString
            ccmain.txtname.Text = dgvempno.Rows(dgvempno.CurrentCell.RowIndex).Cells(1).Value.ToString
            ccmain.txtdeptempname.Text = dgvempno.Rows(dgvempno.CurrentCell.RowIndex).Cells(2).Value.ToString
            ccmain.txtkind.Text = dgvempno.Rows(dgvempno.CurrentCell.RowIndex).Cells(3).Value.ToString
            Me.Close()
        End If

我想dgvempno(datagridview)获取来的值传递给frmccmain窗体的某一个TEXTBOX栏位
从本窗体调试没有问题， 但是从启用窗体调式就不行没有报错， 但是就是取不值
请问各位是什么原因呀

---

贴完整的代码。

还有这个好像是.NET不是VB吧。

---

我自己搞定了，
先在frmccmain中声明一个窗体的全局变量
public shared ccmain as new frmccmain
然后在在frmccmain_locd中初始话窗体
me.ccmain