sono un po' duro non mi funzona ancora...
riepilogo ciò che ho fatto

NEL CONTROLLO ACTIVEX OCX:
nel modulo di classe
codice:
    Public Sub Blo_Sblo(vForm As Object)
      Dim co As Control
      For Each co In vForm.Controls
        If TypeOf co Is TextBox Then co.Enabled = False
        MsgBox co.Name
      Next
    End Sub
NEL PROGETTO DI PROVA:
vado nei componenti e lo spunto
lo inserisco nel form e lo chiamo BS
poi, nel form, in risposta all'evento di un commandbutton
codice:
    Private Sub Command1_Click()
      Call BS.Blo_Sblo(Me)
    End Sub
in questo modo però non vedo Blo_Sblo come metodo dell'ocx, e soprattutto dà errore sulla riga "Call BS.Blo_Sblo(Me)"
(impossibile trovare il metodo o il membro dei dati)