basta che usi il metodo

Public Class Form1

Public Shared nuovo As String
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
nuovo = IDTextBox.Text

Public Class Form2
Form2.ParametroIDCliente = IDTextBox.Text
Form2.Show()
End If
End Sub

Private m_ParametroIDCliente As Long
Public WriteOnly Property ParametroIDCliente() As Long
Set(ByVal value As Long)
m_ParametroIDCliente = value
End Set
End Property

Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.xxxxxxxTableAdapter.FillBy(Me.CLIENTEDataSet.xx xxxxx, Me.m_ParametroIDCliente)
End Sub