Pegando Valor de uma TextBox de Outra Form, e inserir no Access

Olá Amigos,

Bom Galera, estou com problemas quanto a pegar o Valor de Uma TextBox da Form1, e joga-la em outra TextBox da Form2 e Inseri-lá no Banco de Dados.

Crio uma Variável, pública para receber o Valor da TextBox1.Text da Form1, e depois, chamo ela já na Form2, e atribuo está Variável na TextBox da Form2. Até ai tudo bem...

Quanto vou salvar, outras duas TextBox, que são Descrição do Produto, e Preço salva Normal. Vai para o Access de boa, más no Campo 'Usuário que Registrou', FICA VAZIO, ou seja, sem Nenhum VALOR.

E deveria ir, pois fiz a ligação do Campo 'Usuário_que_Registrou', com a TextBox3.Text da Form2 que tem o valor recebido da TextBox1.Text da Form1.



Na Form 1 fiz:

Public Id_Usuario As String

Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load

       Me.UsuáriosTableAdapter.Fill(Me.Banco_de_dados1DataSet.Usuários)

       Id_Usuario = TextBox1.Text

   End Sub




Public Class Form2

   Public ValorRecebido As String


   'Load
   Private Sub Form3_Load(sender As Object, e As EventArgs) Handles MyBase.Load
     

'TODO: This line of code loads data into the 'Banco_de_dados1DataSet.Usuários' table. You can move, or remove it, as needed.
       Me.UsuáriosTableAdapter.Fill(Me.Banco_de_dados1DataSet.Usuários)
       

       Form1.Id_Usuario = ValorRecebido


   End Sub


   'Botão Editar
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

       Me.Close()
       Form4.Show()


   End Sub


   'Botão Adicionar Novo
   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

       Me.ProdutosBindingSource.AddNew()

       TextBox1.Enabled = True
       TextBox1.Text = "Destrancado"
       Descrição_do_ProdutoTextBox.Enabled = True
       PreçoTextBox.Enabled = True
       Button3.Enabled = True



   End Sub



   'Botão Salvar

   Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click

       ''AQUI ESTÁ PARA PEGAR O VALOR RECEBIDO, NO CASO DECLAREI
        Id_Usuario = ValorRecebido

       Me.ProdutosBindingSource.EndEdit()
       Me.TableAdapterManager.UpdateAll(Me.Banco_de_dados1DataSet)
       TextBox3.Text = ValorRecebido


       TextBox1.Enabled = False
       TextBox1.Text = "Trancado"
       Descrição_do_ProdutoTextBox.Enabled = False
       PreçoTextBox.Enabled = False
       Button3.Enabled = False

   End Sub

Ajudem? Obrigado!

Um tanto quanto confuso o código, mas vamos lá, poderia dizer exatamente em que momento você passa os dados do form1 para o form2? É algum botão no form1 que abre o form2 com os dados?
As vezes você pode fazer algo mais simples que faz a mesma coisa ao invés de tentar corrigir ao complexo.


Abs