By using the following code, when I click on the CommandButton, it opens a second Form2 and also an InputBox.
The problem is that, when I click OK on the InputBox it is called again. Only after I close it a second time, it makes what I want: to put the text on a label on the second form.
Where am I wrong? Here's the code.

Option Explicit
Dim Notes As String
_____________________________________________________________________

Private Sub Command1_Click()
Form2.Show
Form2.Picture1.Picture = Command1.Picture
Notes = InputBox("Introduza o texto para esta nota do RoadBook")
If Form2.Visible = True Then
InputBox ("Introduza o texto para esta nota do RoadBook")
End If
Form2.Label1.Caption = Notes
End Sub