Ciao a tutti ho un problemino

ho un modulo e un form
nel modulo
codice:
Public Sub cambianome(frmvalue As Control, valore As String)
frmvalue.Caption = valore
End Sub
nel form

codice:
Private Sub Command1_Click()
*****Dim x$
*****x$ = CStr(Text1.Text)
Call cambianome(Form1, Text1.Text)
End Sub
il codice non funziona.
NOn capisco perche devo definire nel modulo frmvalue as control non dovrebbe essere di tipo form?
Poi quando la richiama mi dice che non funziona e che il tipo è sbagliato

ho provato pure ad inserire la parte asteriscata ma niente