-1

frmMain のテキスト ボックスの値を frmDepartment のテキスト ボックスに渡そうとしています。うまくいくと思った次のコードを試しましたが、うまくいきません。私は VB の新規ユーザーであり、シーションを設定するだけの単純な作業であった PHP のバックグラウンドから来ました。誰でもこれを手伝ってもらえますか?さらにコードを表示する必要がある場合は、お問い合わせください。どうもありがとう

txtDeptCustomer.Text = frmMain.txtCustomerActive.Text

frmMain では、次のような値を取得しています。

Dim value As Object = UserDataGridView.Rows(e.RowIndex).Cells(0).Value
txtCustomerActive.Text = CType(value, String)

Private Sub btnDepts_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDepts.Click
        frmDepartment.Show()
End Sub

frmMainに表示されているものは大丈夫です。

frmDepartment には、このコードがあります

Private Sub txtDeptCustomer_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtDeptCustomer.TextChanged
    'Dim customer As String

    txtDeptCustomer.Text = frmMain.txtCustomerActive.Text
End Sub
4

1 に答える 1