Ciao motogpdesmo16.
Nell'esempio che segue si disabilitano le voci del menù e le icone
Naturalmente per abilitarle basta sostituire False con True; inoltre ti conviene inserire il codice in un modulo così è facilmente richiamabile la routine (nell'esempio: Call DisabilitaTaglia).codice:' Disabilita le icone Copia,Taglia,Incolla, Elimina e Canc Dati: Public Sub DisabilitaTaglia() On Error Resume Next ' Barra dei menù: FrmMAIN.mnuEditCut.Enabled = False FrmMAIN.mnuEditCopy.Enabled = False FrmMAIN.mnuEditPaste.Enabled = False FrmMAIN.mnuEditDelete.Enabled = False ' 1^ Barra delle icone: FrmMAIN.tbToolBar.Buttons.Item(18).Enabled = False FrmMAIN.tbToolBar.Buttons.Item(19).Enabled = False FrmMAIN.tbToolBar.Buttons.Item(20).Enabled = False FrmMAIN.tbToolBar.Buttons.Item(21).Enabled = False FrmMAIN.tbToolBar.Buttons.Item(23).Enabled = False End Sub
Ciao!

Rispondi quotando