UserFrom1のCommandButton1をクリックした際に、変数Aに10を代入。(変数Aはパブリック変数)その後UserFrom2.Showで、UserFrom2を表示させ、UserFrom2のMsgBoxに、変数Aの内容を表示させるにはどの様なコードになりますでしょうか?
現在、UserFrom2内のプログラムで、MsgBox UserFrom1.Aとしていますが、10が表示されません。
UserFrom1のCommandButton1をクリックした際に、変数Aに10を代入。(変数Aはパブリック変数)その後UserFrom2.Showで、UserFrom2を表示させ、UserFrom2のMsgBoxに、変数Aの内容を表示させるにはどの様なコードになりますでしょうか?
現在、UserFrom2内のプログラムで、MsgBox UserFrom1.Aとしていますが、10が表示されません。
UserFrom2を呼び出すタイミングなどが分からないのですが、
こちらのコードで試すとUserFrom2のボタンを押すとUserFrom1.Aに収めた値が表示されました。
UserFrom1
Option Explicit
Public A As String
Private Sub CommandButton1_Click()
A = 10
UserFrom2.Show
End Sub
UserFrom2
Option Explicit
Private Sub CommandButton1_Click()
MsgBox UserFrom1.A
End Sub