|
Declare Function RegComCtl32 Lib "ComCtl32.OCX" Alias _
"DllRegisterServer" () As Long Declare Function UnRegComCtl32 Lib "ComCtl32.OCX" Alias _ "DllUnregisterServer" () As Long Const ERROR_SUCCESS = &H0 'Codice 'Per registrare i Microsoft Common Controls utilizza questo 'codice: If RegComCtl32 = ERROR_SUCCESS Then MsgBox "Registrazione Avvenuta" Else MsgBox "Registrazione Non Riuscita" End If If UnRegComCtl32 = ERROR_SUCCESS Then MsgBox "Rimozione Avvenuta" Else MsgBox "Rimozione non riuscita" End If 'Nota: 'ogni chiamata alla funzione DLL puo' prendere anche 5 'secondi. Questo tip descrive come i controlli ActiveX possono essere registrati e rimossi direttamente da Visual Basic. Ogni controllo ActiveX contiene due funzioni che possono essere chiamate e che istruiscono il file OCX a registrarsi e rimuoversi dal sistema. Queste funzioni si chiamano DLLRegisterServer e DLLUnregisterServer. Il tip seguente mostra come registrare e rimuovere il file OCX Microsoft Common Controls, ComCtl32.OCX. |