codice:
Private Sub CmdIPC_MouseOver(X As Single, Y As Single)
Text1.Text = "ciao"
End Sub
(spero siano giusti gli argomenti della sub... controlla)