>>176

------------------------------------------------
Form2
------------------------------------------------
Private m_strCD As String

Public Property Let PR_strCD(ByVal l_strCD As String)
m_strCD = l_strCD
End Property

------------------------------------------------
Form1
------------------------------------------------
Load Form2 '<-- 無くても動くけど書いた方が良い
Form2.PR_strCD = "001"
Form2.show

※注意する点としてはプロパティを渡す時点でForm2のForm_Load は既に通過しているという点




教えすぎ？