Newsgroup: it.comp.lang.visual-basic
Titolo: Toolbar 97

Nell'installazione di Office 97 si legge che sono disponibili le toolbar e i
menu usati da Office 97, cioč con la stessa interfaccia "3D". Pur avendo
installato Office 97, non sono riuscito a trovare il controllo o la libreria
che fornisse tali oggetti.
Qualcuno č a conoscenza della cosa o č solo una panzana?
Grazie 1000.

Avevo già provato con questa libreria, ma non riesco a farci nulla!
Non riesco nemmeno ad istanziare un oggetto.
Probabilmente sono io che non ci arrivo (o mi sfugge qualcosa), ma il VB non
mi permette (nonostante il riferimento) di creare nuove istanze degli
oggetti della libreria.
Esempio: Dim x as new Office.oggettoqualsiasi = errore nell'utilizzo di
New!!!
Sono io che sbaglio qualcosa o devo impostare qualche parametro?
Please, help me!

Prima cosa, creare il riferimento alla libreria che ti ho detto (MSO97.DLL)
Poi con il pulsante DX del mouse puntato su una BarraMenu crei una ToolBar e
gli dai un nome (Es. Anagrafiche)
Poi con un po' di codice di questo tipo riesci ad aggiungere i controlli
necessari (combo o textbox)
Esiste un insieme nel oggetto commandbar che si chiama Controls. In realtà
si tratta di aggiungere controlli a questo insieme con il metodo Add
Prova altrimenti ci sentiamo
Dim CmdBar As CommandBar
Dim oCntrl As CommandBarControl
Set CmdBar = CommandBars("Anagrafiche")
CmdBar.Visible = True
CmdBar.Controls.Add Type:=msoControlComboBox  ' ti crea un controllo tipo
combobox sulla toolbar
'per visualizzare i controlli usi la proprietà Visible
 For Each oCntrl In CmdBar.Controls
      oCntrl.Visible = True
 Next oCntrl


Altro problema: anche leggendo l'help in linea sembra che il tuo esempio sia
corretto, perņ l'istruzione
Set CmdBar = CommandBars("Anagrafiche")
genera l'errore "Sub or Function non definita" sull'insieme CommandBars.
A dire la veritą sembra che (nonostante il riferimento alla DLL) il VB non
trovi l'insieme CommandBars, o meglio, non lo riconosca come un oggetto
valido.
Ho provato anche a creare da codice una barra (come indicato anche
nell'help) con "Set CmdBar=CommandBars.Add" ma viene generato l'errore
"Necessario oggetto".
Sono un po' al perso.
Un'altra cosa: non ho capito cosa intendevi con puntare con tasto Dx e
creare una barra nuova. Per caso devo aggiungere una Barra tra quelle di
VB???

...


...

CHE COS'E' LA TOOLBAR 97? Per caso è la Sheridian Toolbar?


No.. BAKA
L'ho capito anch'io che è poco che uso VB.... è la libreria che ti installa
office 97... e non è un controllo. Se vuoi usarla credo che devi richiamare
direttamente la dll... dico bene?
Ciao

Set CmdBar = CommandBars("Anagrafiche")
da' errore in compilazione ("Sub o Function non definita").
Inoltre ho anche provato con CreateObject("Office.CommandBar")... niente,
non si puo' creare.
Mi sorge un dubbio... non e' che tu ti stavi riferendo a VBA da _dentro_
applicazioni Office?
Oppure mi sono perso qualche passo?
--
Roal Zanazzi
z...@iol.it

Penso che il tuo dubbio sia lecito.
Sono diversi giorni che sto impazzendo. Sono sul punto di rinunciare in
quanto sembra davvero impossibile usare questi oggetti senza un
"contenitore" valido (vedi applicativi office).

...



Ah, ah!!!
Scoperto l'arcano!
Porca miseria, potevi dirlo subito che l'avevi fatto in VBA di Access! ;-)
In Access hai gia' la collection CommandBars (sono le toolbar di Access...)
Quindi in Visual Basic NON si possono creare controlli della libreria Office
8.0.
Peccato.
--
Roal Zanazzi
z...@iol.it