vb窗体调试问题

Question

用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栏位 
从本窗体调试没有问题， 但是从启用窗体调式就不行没有报错， 但是就是取不值 
请问各位是什么原因呀

Answer 1

贴完整的代码。还有这个好像是.NET不是VB吧。

Answer 2

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