sono un po' duro non mi funzona ancora...
riepilogo ciò che ho fatto
NEL CONTROLLO ACTIVEX OCX:
nel modulo di classe
NEL PROGETTO DI PROVA: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
vado nei componenti e lo spunto
lo inserisco nel form e lo chiamo BS
poi, nel form, in risposta all'evento di un commandbutton
in questo modo però non vedo Blo_Sblo come metodo dell'ocx, e soprattutto dà errore sulla riga "Call BS.Blo_Sblo(Me)"codice:Private Sub Command1_Click() Call BS.Blo_Sblo(Me) End Sub
(impossibile trovare il metodo o il membro dei dati)

Rispondi quotando