Dim codicefunzione, motivononaccesso, nomecognome, codicebancautente, emailutente, sottoeambienteutente, accrbanche As String

Funzione(Me.Text2.Text, Me.Text3.Text, codicefunzione, motivononaccesso, nomecognome, codicebancautente, emailutente)