mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Oggetto Printer e margini della pagina

Salve a tutti!
Dopo aver utilizzato Crystal Report 6.0 per la generazione di alcune stampe,
ho deciso di provare l'alternativa "oggetto Printer".
La domanda è la seguente: come posso sapere quali sono i margini inferiore,
superiore, desto e sinistro impostati sulla stampante di default? Il quesito
nasce dal fatto che se provo a stampare con questo codice:
For i = 1 To 150
        Printer.Print i
Next
la stampa inizia attaccata al margine superiore della pagina ma si
interrompe a circa tre righe dalla fine della pagina.
Qualcuno sa come aiutarmi?
Grazie....
---------------------------
Mauro Sagratella
Megaworks S.r.l.
m.sagratella@JAM_megaworks.it
Per e-mail, togli
JAM_ dall'indirizzo

Printer.ScaleMode=1 ' Twips
MargineW=(Printer.Width -Printer.ScaleWidth) / 2
' MargineW Conterrà in Twips Il bordo Desto ( o Sinistro)
Per convertirlo nell'unità di misura che vuoi puoi fare:
xx=Printer.ScaleX(MargineW,vbTwips,<unità di destinazione>)
Dove unità di destinazione è il valore che vuoi convertito.
Ciao, Fabio


Io userei l'API GetDeviceCaps().
Gli passi l'hDC dell'oggetto Printer e chiedi le informazioni sui bordi di
area non-stampabile con
PHYSICALOFFSETX       ' margine sinistro
PHYSICALOFFSETY       ' margine superiore
PHYSICALWIDTH            ' larghezza fisica della pagina
PHYSICALHEIGHT          ' altezza fisica della pagina
Controlla la documentazione delle API per ulteriori istruzioni.
--
Roal Zanazzi
z...@iol.it

...



Wow! Questa API non la conoscevo...
Si', direi che e' mooolto meglio!
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Help KeyCode

Buongiorno a tutti,
avrei bisogno di un piccolo aiutino ho una flexgrid che all'evento keydown
controlla il tipo di tasto spinto e fa le sue azione il codice è il
seguente:
Private Sub mfg_Elenco_KeyDown(KeyCode As Integer, Shift As Integer)
 
Select Case KeyCode
    Case 27
        Unload Me 'Tasto Esc
    Case 45
       'Inserisci 'tasto Ins
    Case 46
       'Cancella
    Case 112 'tasto F1
       'Ricerca
    case ? 'tasto Ctrl+Invio
       'Modifica
End Select
Il problema è il seguente che codice è Ctrl+Invio?
Grazie a tutti
--------------------------------
Inviato via 
http://usenet.libero.it

Se avessi letto l'help, ti saresti accorto che i tasti shift,
ctrl e alt vengono valorizzati dalla variabile shift as integer.
quindi il tuo ctrl + invio sarŕ la combinazione di shift = 2
(mi pare sia il 2 per il ctrl) e il tasto invio con il suo relativo
carattere ascii.
Quindi dovrai fare un confronto con l'operatore logico and.
Ti consiglio tuttavia di mettere il tuo codice di controllo
nell'evento keyup, cosěche se l'utente bizzarro si dovesse
divertire a tenere premuti i tasti, il tuo codice verrebbe
comunque eseguito una sola volta, nel momento in cui l'utente
rilascia i tasti, a meno che con una variabile static e un altro
paio di variabili non ti fai un controllo per vedere se dalla precedente
pressione a quella nuova i tasti premuti non sono cambiati.
-- 
Saluti
Andrea Moro

 ha
scritto:

Grazie tanto purtroppo nel posto in cui sto non ho la guida installata
Ciao e ancora grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: paolo

Ciao!!!!
Sono un appasionato e principiante della programmazione con "VISUAL BASIC 5"
e avrei un paio di domande da porre ,se qualche anima gentile puo' aiutarmi.
1)Come faccio ad usare un controllo "progressbar" affinche' compaia nel
momento in cui faccio partire una routine che carica i nomi di molte
directory in una  "listbox"?
2)Qualcuno sa come fare per convertire i files *.mid dal formato 0 al
formato 1
e viceversa?
3)(Non prendetemi per sfacciato)Avrei bisogno di sapere , qual' e' il codice
per poter visualizzare il testo (KARAOKE) dei suddetti midifiles
Ringraziamenti........A presto!

 wrote in message
8sd687$2ae$1...@pluto.sm.dsi.unimi.it...
| Ciao!!!!
| Sono un appasionato e principiante della programmazione con "VISUAL BASIC
5"
| e avrei un paio di domande da porre ,se qualche anima gentile puo'
aiutarmi.
|
| 1)Come faccio ad usare un controllo "progressbar" affinche' compaia nel
| momento in cui faccio partire una routine che carica i nomi di molte
| directory in una  "listbox"?
devi creare in fase di progettazione un controllo progressbar, con la
proprietà prb.visible = false, poi quando ti serve metti prb.value = 0,
scegli il prb.Max e poi metti prb.Visible = True. Alla fine del ciclo in cui
metterai prb.Value = prb.Value+1, metti prb.Visible=False per tornare come
all'inizio.
| 2)Qualcuno sa come fare per convertire i files *.mid dal formato 0 al
| formato 1
| e viceversa?
Dovresti settare il decimo byte a 1, ma poi probabilmente vengono fuori
casini...
| 3)(Non prendetemi per sfacciato)Avrei bisogno di sapere , qual' e' il
codice
| per poter visualizzare il testo (KARAOKE) dei suddetti midifiles
| Ringraziamenti........A presto!
In un MIDI ci sono (oltre a titoli di traccia, copyright e roba del genere)
due principali titpi di testo che vengono usati per scrivere appunto il
testo della canzone, uno è la lirica  che a quanto ne sò è il più
utilizzato, l'altro è il testo normale. Entrambi sono preceduti da una
specie di Tag se così si può chiamare che indica il tempo in cui viene
svolto l'evento successivo e il tipo di evento (che nel caso di liriche e
testi in genere o fine traccia o marker viene denominato meta-evento). per
la lirica è (in esadecimale) [tempo] FF 05, seguito dal numero di byte del
testo e dal testo codificato in ASCII. L'altro tipo di testo è codificato
come [tempo] 01 sempre seguito dal numero di byte del testo e dal testo
codificato in ASCII. a te comunque il tempo non serve perchè non ho mai
trovaro un midi con prima magari il tempo18 e poi il 15, vanno tutti in
ordine cronologico (però tieni conto che viene seguito canale per canale,
quindi dovresti mettere nel tuo programma una combo con i vari numeri di
canale( da 0 a 15). Il riferimanteo "ufficiale" è comunque 
www.wotsit.org
 ,
se vuoi ti posso mandare un parser (si dice così vero?) fatto da me.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: stampa

ciao a tutti,
il mio problema e' questo,
vorrei stampare il contenuto di 5 oggetti label
con un font diciamo di 24 punti come posso fare?
e vorrei anche che la stampa a partire dall'alto del foglio venisse fatta
nel centro.
qualcuno puo' farmi un'esempio?
grazie a tutti ciao.

Ciao
anche io sto impazzendo per lo stesso identico motivo, e non ne esco fuori.
Se riuscissi a risolvere il problema in qualche modo, fammelo sapere e
naturalmente anche io faro' lo stesso.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Rieccomi...

Avrei ancora un quesito da porvi  :P Con il Vostro aiuto dell'altra volta e 
quallo di un mio amico ho fatto questo programma che mi consente di stampare 
immagini in un Picturebox. Adesso vorrei sapere e possibile far stampare  lo 
stesso pictorebox in tre righe diverse della stessa colonna avente come 
coordinate delle x, y corrrispondenti a 5,5 - 5,120, 5,350????
Qualcuno mi saprebbe dare la formula gia scritta da inserire nel mio 
programmino in modo tale che poi lo completo io con le restanti 7 righe.
Qui sotto ho messo il codice completo di come l'ho fatto in VB2005.
http://www.pega73.net/Codice-V2.doc
"Se ci fossero errori di ortografia scusatemi".
Luca. 

 
http://www.pega73.net/Codice-V2.doc
Ma secondo te, non è al limite dell'imbecillità incollare del codice 
sotto word anzichè postarlo direttamente?

 ha scritto nel messaggio 
news:e66cf8$nov$1...@area.cu.mi.it...

Si hai ragione ma sono riuscito a fare tutto.

Newsgroup: it.comp.lang.visual-basic
Titolo: editor VB x Resource Files

Qualchuno mi sa indicare il miglior modo per editare un file di 
risorse in VB5. 
Grazie in Anticipo
Gianluigi Masciulli


Ciao,
Esiste un add-in per VB5 che permette di editare un file di risorse
incluso all'interno di un progetto aperto e che si trova nella zona
download dell'owner's area di VB nel sito Microsoft.
	Benedetto Zurlo

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO ADO -- SHAPE

Stò cercando di capire come funziona la sintassi del comando Shape, ma vb mi
ritorna sempre un errore di Run time
Errore di sintassi nella posizione 48 del comando shape ecc..
io ho scritto..
Dim cnn As New ADODB.Connection
Dim rst As New ADODB.Recordset
cnn.Provider = "MSDATASHAPE"
cnn.Open "Data Provider=MSDASQL;DSN=cpe"
rst.StayInSync = False
rst.Open "SHAPE  {Select * from tblArticoli } COMPUTE (SUM(COSTO)) AS
viewCosto BY IDCategoria", cnn

Aiutati con il Data Environment e vedi cosa scrive lui.
Caio
Mansueto Francesco <Mansueto_...@Alitalia.it> wrote in message
news:7hbgpd$92m$1...@fe1.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: collegamento di file

Come faccio a collegare un file txt o doc ad un programma di visual basic
tramite un command button o una voce di un  menù a tendina?
Ciao Luca

 tramite un command button o una voce di un  menù a tendina?
Cosa intendi per "collegamento"? Che quando clicchi sul command button di
cui parli succede... cosa vuoi che succeda? Che si veda in una text box il
testo contenuto nel file, per esempio? E l'utente puo' modificarlo o no? E,
se lo modifica, il nuovo testo deve sostituire quello vecchio o no?
Eccetera. Oppure intendi proprio un "link" di tipo OLE?
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] corsi/esempi

Salve a tutti,
qualcuno di Voi saprebbe dirmi dove posso trovare delle spiegazioni
(comprensive di esempi pratici) di come gestire l'accesso simultaneo di più
utenti ad uno stesso DB Access?
Sul Sito Comune non ho trovato niente del genere, ma anche su MSDN non
saprei cosa cercare!!
Se ci fossero anche dei siti con corsi on-line sarebbe uguale (purchè
abbiano degli esempi)!!
Grazie 1000 a tutti.
Ciao.
Paolo.

 ha scritto nel messaggio
news:6UDq7.1116$dJ3....@news1.tin.it...

Caro Paolo .. quello che ti serve è solo un po' di buona fantasia e
inventiva.
Nessuno ti insegnerà una regola (come quella per ex. dei nomi di variabili o
dell'indentazione del codice ecc) per gestire le concorrenze di accesso.
Da parte mia ti posso consigliare le solite tabelle di Lock che sembrano
funzionare egregiamente.
Questo sembra un metodo utilizzato da quasi tutti per la soluzione del tuo
stesso problema.
Nei vecchi post dovresti trovare un po' di discussioni in merito.
Saluti

Newsgroup: it.comp.lang.visual-basic
Titolo: attivazione eventi

se sto scrivendo del testo in una textbox e premo il tasto <TAB> si
attiva solo l'evento _LostFocus od anche il _KeyPress ?
Aranar
http://www.nettaxi.com/citizens/Aranar/
   (above all VgaPlanets)
http://www.tempolibero.com/user/aranar
    (sopratutto VgaPlanets)

attiva solo l'evento _LostFocus od anche il _KeyPress ?
Se la textbox è l'unico oggetto sulla form che può ricevere il focus, il
<TAB> attiva l'evento keypress
In caso contrario il <TAB> sposta il focus sul prossimo oggetto con
tabstop=true
Ciao
Daniele
Newsgroup: it.comp.lang.visual-basic
Titolo: : [?2] Ripristinare la GUI

Ciao a tutti.
Volevo proporre il seguente quesito:
Sostituendo nel system.ini la linea Shell=explorer.exe con
Shell=mioprogramma.exe si ha come effetto che, alla partenza di Windows,
l'interfaccia grafica viene sostituita dal mioprogramma.exe .
Quello che vorrei sapere e' come fare (con VB6) a ripristinate l'interfaccia
grafica originale senza la necessita' di reboot.
p.s. : Ho gia' provato a lanciare explorer.exe dal mio programma ma compare
solo "Esplora risorse" e non la taskbar e le icone del desktop.
Grazie .
DaX
--= Remove all 'x' to reply =--

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Perfavore aiutatemi ho un problema con l'update

Buongiorno a tutti, nel mio pgm ho 4 tabelle collegate tramite 'LEFT JOIN'
quando faccio l'inserimento di nuovi record prima di fare l'update riempo i
campi collegati e non ho problemi, però quando provo a posizionarmi su una
riga e faccio qualche modifica(dimenticavo di dirvi che uso una datagrid)
nel momento in cui eseguo l'update mi da questo errore.:
'Le informazioni sulla colonna chiave non sono sufficenti per effettuare
l'aggiornamento'
Perfavore datemi una mano perchè per non riesco a capire come risolverlo.
GRAZIE A TUTTI. ANDREA

 l'aggiornamento'
Non puoi eseguire un update su una query contente campi modificati
provenienti da tabelle diverse unite con una left join... il motore database
non è in grado di mantenere l'integrità dei
dati. Devi usare una inner join (o query diverse).
ciao
ugo

 ha scritto nel messaggio
news:9q4um5$fbq$1...@pegasus.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 e Win XP

Ciao a tutti
Ho un pc nuovo con installato Win XP 
ho installato il visual studio 6, ma alcune cose non mi
funzionano, ad esempio certi componenti di VB non vengono accettati
qualcuno ha riscontrato incompatibilita' tra visual basic 6 
e XP ?
Grazie a tutti
Ciao
Alberto
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG



Quali componenti? Cosi' li testo e ti faccio sapere.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Registrare chiamate telefoniche

E' possibile tramite Visual Basic interfacciarsi da "qualche parte" e
registrare Numeri chiamate effettuate e ricevute?
Esiste qualche OCX e/o DLL e/o componente che può fare al caso mio?
Sto navigando qua e là ma non trovo molta documentazione.
Grazie.
Andrea.
8

On Fri, 10 Oct 2003 08:23:13 GMT, 
andrea....@libero.it
 (Andrea)
wrote:
[CUT]
Sto utilizzando MsComm32 e con un copia-incolla dalla guida ho creato
una form solo che al momento di ricevere "OK" dal modem continua a
verificare e questo benedetto "OK" non arriva. Ho provato tutte le
porte. Idee?
Andrea.
8

 ha scritto nel messaggio
news:3f8681f3...@powernews.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Mi hanno staccato il telefono

poichè mi sto trasferendo in un'altra casa, ho fatto la disdetta alla linea
telefonica. Come già annunciato la mia email ottomano@fastwebnet è
inutilizzabile da oggi.
Per contattarmi prendete l'email dal mio sito 
www.nicolaottomano.it
Per quanto riguarda la risposta ai messaggi sul NG cercerò di connettermi
(quando possibile) dall'università o da qualche amico (come sto facendo ora)
:-)
bye
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 poichè mi sto trasferendo in un'altra casa
a me hanno staccato il gas, perche non ho pagato la bolletta.
ciao.


 :-)
Meno male non vedremo più i tuoi innumerevoli post! ;-))
Ciao, Vincenzo

 a me hanno staccato il gas, perche non ho pagato la bolletta.
LOL!
bye


 ha
scritto:

Vana speranza! :-P
Il Politecnico mi offre 2 ore di connessione gratuita al giorno. Certo, non
è come la 10Mbit dell Fibra, ma 10Kbit non mi dispiacciono (soprattutto in
mancanza d'altro).
(ritornerò, ve lo prometto!)
bye (una promessa o una minaccia?)



Nooooooooooooooooooooo !!!! ;-))
Ciao, Vincenzo (che ha una linea moolto veloce!)

 a me hanno staccato il gas, perche non ho pagato la bolletta.
Fai come lui.
Vai da un amico per cucinare :-)!


 
E come minchia fa a cucinare se l'amico non c'č? Va al Polimi? :-PPP
bye


 Ciao, Vincenzo (che ha una linea moolto veloce!)
Maledetto! :-P
Anch'io avevo una linea molto veloce... finchè non abbiamo fatto la disdetta
a fastweb per poter cambiare casa...
Ma a Settembre andrò in una nuova casa... con fastweb
hahahUAUAUHAAUAHAHAUAHH!!!
bye (impazzito dal fatto che 10Kbit/s sono veramente pochi...)

Newsgroup: it.comp.lang.visual-basic
Titolo: Pasword per i miei software

Qualcuno mi sa dire qualche buon Trucchetto per proteggere i miei programmi
contro la copia ??!!
Per esempio il sistema per calcolare una password in bale al nome tente o
qualcosa del genere.
Ciao e grazie


wrote:

  Puoi fare qualsiasi calcolo logico/matematico tu voglia sul nome
dell'utente e poi fornirgli il risultato come codice di sblocco, pero'
questo tipo di trucchetti possono essere aggirati da qualsiasi
professionista.
  Ciao :-)
  Massimo
  Nell'indirizzo, sostituire DIESPAMMERS con MC1258
  In the address, replace DIESPAMMERS with MC1258

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema DCOM per programmatori esperti BIS

Il problema è il seguente:
ho un oggetto remoto Exe Activex che fornisce un accesso ai dati che chiamo
Server.exe;
devo tenere il conto del numero di client che accedono ai dati;
ho creato l'oggetto con la classe (MultiUse)  per l'accesso ai dati e con un
modulo.bas che contiene una variabile Public per il conteggio dei client,
che viene incrementata nell'evento class_inizialize;
ovviamente ho compilato con il modello di threading  "pool di threads" con
un solo thread, altrimenti la variabile globale non la posso condividere con
tutte le istanze.
Tutto funziona bene se apro più client dalla stessa workstation, ma se apro
un client dal PC1 e un client dal PC2 mi trovo sul server due oggetti
Server.exe aperti, invece che due istanze dello stesso oggetto.
In questo modo ovviamente perdo il numero globale di Client collegati.
Come posso fare per avere solo un Server.exe in esecuzione che crea istanze
della classe, anche se le chiamate arrivano da PC diversi ?
Spero di essere stato chiaro.
Grazie,
                                            Cristiano.

> ho creato l'oggetto con la classe (MultiUse)
sicuro che vada Multiuse? provane altre...
-- 
Posted from 
smtp.technorail.com
 [195.103.144.19] (may be forged) 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.visual-basic
Titolo: Come creare un tabbed dialog

Volevo replicarmi il tabbed dialog della microsoft.
Ho provato a dare uno sguardo nelle api - se casomai
come per il drawframecontrol esistesse qualcosa
che le "generasse" al volo. - ma non ho trovato nulla
di helpfull.
Ho in mente un'idea su come realizzarla, ma vorrei
avere anche il vostro parere su come la fareste.
Ciao Andrea

Se replichi qualcosa di standard ti consiglio di non usare controlli, ma
singole picture su cui disegni tutti gli elementi e definisci le varie
regioni per il controllo degli eventi.
Non necessariamente (secondo me) devi usare API, basta strutturare bene il
disegno degli elementi e qualche user type o classe per le varie
caratteristiche.
Se riesci a riprodurre lo standard con una semplice PictureBox (o più di una
a seconda dei tabs) ti accorgerai di quanti ampliamenti ci puoi fare, lo
stesso che è successo a me per le toolbar :)
se lo completi fammi un fischio, che la cosa mi interessa
Fabio

Newsgroup: it.comp.lang.visual-basic
Titolo: Ci sa come si fa e' un GENIO!!

Forse dire genio non è adatto, sarebbe meglio dire GURU. (non vaffanguru).
In pratica vorrei fare un programma che crei una Toolbar sull'internet
Explorer come  la address bar o i collegamenti o Alexia o Boh!!!
Ciao e grazie.
Sergio

 wrote in message
news:9ctroh$3ss$1...@fe2.cs.interbusiness.it...


Concordo, oltretutto il problema è maggiore in un newsgroup come questo dove
ci sono centinaia di messaggi al giorno, io tendo direttamente a saltarli se
da oggetto non capisco cosa chiede.

Questo è stato un caso eccezzionale? ^__^
Ciao, Luciano.

E giusto riconoscere i propri errori e cercare di non rifarli..
in questo caso riconosco che l'intestazione della mia domanda non è stata
professionale o adeguata alla news, vi prego di scusarmi
Saluti Sergio.

 bar o i collegamenti o Alexia o Boh!!!
Qui lo trovi di sicuro:
http://www.domaindlx.com/e_morcillo/default.asp
Ciao.
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Sviluppare prg Free per ente presso cui faccio servizio civile, posso ?

Mi piacerebbe, per velocizzare alcune attivita' di ufficio presso l'ente
dove svolgo il servizio civile, sviluppare un piccolo programmino (free)
in VB6.
Quello che mi chiedevo e':
1) Posso farlo ?
2) Posso mettere il mio nome ?
3) Che diritti ho su quel prg ?
4) Visto che puo' considerarsi un regalo che faccio all'ente, devo per
forza procurarmi una versione di VB6 con licenza ? (Penso proprio di si)
5) Se la risposta precedente e' si, come risolvo il prb non avendo la
licenza
e non volendo spendere soldi per un regalo ?
6) Se invece mi limito a creare macro in excel o access (l'ente ha le
licenze)
le risposte date alle prime 3 domande sono sempre valide ?
Grazie per le risposte
Pasquale

 wrote in message
news:391827EE...@inwind.it...


Non ho capito, era una battuta ?



Non penso fosse una battuta dal momento che Microsoft ha un programma
speciale in cui fornisce ad enti ed organizzazioni i suoi applicativi a
prezzi superconvenienti (una volta Word era £29.000 per una scuola) se hanno
certi requisiti ... dovresti cercare sul Sito Microsoft !!!!
--
Ciaps
Stracca
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------

 licenze) le risposte date alle prime 3 domande sono sempre valide ?
metti il tuo nome in una macro ? ancora ancora capisco se fai il programma
in access. pero' se poi il prg glielo lasci, cerchi di proteggere il db,
magari dopo sei mesi che hai finito ti vengono a suonare di notte perche' si
e' inchiodato -- e faresti fatica a dirgli di no.
se, come dici tu, e' un "programmino (free)", non ti conviene (= non fai
*molto* prima) a farlo, lasciarglielo, e fare tesoro dell'esperienza che ti
fai ?
ciao, a.

 licenza learning, ecc. ecc.
Mi permetto di correggerti... ^___^
La licenza learning, o meglio il "VB6 Learning", non è la versione per
studenti,
ma solo una versione *limitata* che costa 250 Klire circa.
La versione EDU di VB6 (che costa 170 Klire circa) è la versione
Professional
(salvo modifiche degli ultimi mesi ^_^;;;)
La differenza fra le due è che con la versione Learning puoi fare programmi
e poi venderli, con la versione EDU invece no.
--
Ciao!
----------------------------------------------------------
* NUOVA versione per AutoQuote! (1.08.0001), il
* programma FREEWARE per permette di quotare VELOCEMENTE
* i messaggi che Outlook Express non quota in automatico!!!
* lo trovi nel mio sito, sezione "I Miei Programmi")
===========================================================
Daniele Pinna  Email: 
dap...@lycosmail.com
Nell'indirizzo Email eliminare la parola "OOPS."
Sito Web: Il DoCFa in Pillole: 
http://dapinna.freeweb.org
ICQ UIN: 24567484
Newsgroup: it.comp.lang.visual-basic
Titolo: Pulsanti che non si disattivano

All'interno di una sub routine debbo eseguire un loop che richiede molto
tempo di esecuzione, perciò prima di iniziarlo, per evitare che si facciano
danni, disabilito alcuni pulsanti, che riabilito al termine del loop, prima
di uscire dalla sub routine stessa.
Succede però che durante l'esecuzione del loop se premo un pulsante
disattivato, al momento non succede nulla, ma al termine del loop, appena
riabilito i pulsanti, il programma esegue le istruzioni associate al
pulsante stesso, come se il mio click fosse stato non ignorato, ma
memorizzato da qualche parte.
Le ho provate di tutte, ma senza esito.
Grazie in anticipo per l'aiuto
cordialità Vito.

 memorizzato da qualche parte.
[...]
Permettimi di vaneggiare un po':
Indipendentemente dal tempo, che ci fai nel loop? Sei sicuro che tale
attivita' non sia asincrona? Detto in maniera grossolana, Win32 fa un po'
quello che vuole coi processi.
Brutalmente: nascondi il form e sostituiscilo con una sua immagine. Questa
(forse) e' una battuta ma, a mali estremi...
Imposta una macchina di stato (cosi', se vuoi, puoi anche far interrompere
il loop prima del termine).
Usa uno stack per gli eventi.
Gestisci inizio e fine loop con una variabile globale che venga testata dai
pulsanti.
Ciao.
Maurizio




 riabilito i pulsanti, il programma esegue le istruzioni associate
Appena prima di riabilitare i pulsanti, fai un DoEvents. In questo modo il
tuo programma processa la coda dei messaggi e il click del mouse si
spiaccica contro il pulsante disabilitato. 8-)
Se non fai così, la coda dei messaggi viene interpretata alla fine
dell'elaborazione, e a quel punto il pulsante è stato già riabilitato.
Occhio che durante il doevents tutto quello che non è disabilitato funziona.
Quindi accertati che sia disabilitato proprio tutto e soprattutto fai
attenzione ad evitare che ti rientrino nella stessa routine.
Ciao
*Roby*
Newsgroup: it.comp.lang.visual-basic
Titolo: Comparazione di stringhe ?

Ho bisogno di comparare due stringhe per verificarne la loro eventuale
diversità.
Mi basta avere come ritorno un valore booleano (true/false)
Esiste qualche funzione e/o metodo che realizza questo ?
Grazie
Aldo

if stringa1 <> stringa2 then
...
Non basta ?
PotresTi anche metterlo in una variabile booleana :
bVar = (stringa1 <> stringa2)
Fabio GRANDE

 ha scritto nel messaggio
news:Vb5W6.7415$7S1.2...@news.infostrada.it...


 Mi basta avere come ritorno un valore booleano (true/false)
scusa la domanda banale, ma vuoi sapere *in cosa* sono diverse o
semplicemente se non sono uguali tra loro?
In questo caso basta
If strA = strB then MsgBox "uguali!"
e quindi anche
If strA <> strB then MsgBox "diverse!"
If strA > strB then MsgBox "maggiore!" ecc.
per ignorare maiuscole/minuscole puoi usare LCase(strA) = LCase(strB).
In effetti, se vuoi, esiste anche la funzione StrComp che restituisce un
intero...
Ciao
--
Luca Dormio
luca....@tin.it

 ha scritto nel messaggio
news:9gan57$rvc$1...@fe1.cs.interbusiness.it...

Grazie mille

 In questo caso basta
---- cut ---
Grazie.
Sopratutto per la dritta su StrComp !
Ciao
Aldo

 endif
Grazie

Aldo ha scritto nel messaggio ...

Il metodo più veloce è  usare la StrComp()
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: dove posso trovare...?

Dove posso trovare info riguardo l'oggetto Treeview?
Grazie
--
*************************************
             Robertinik 83
 
kob...@libero.it
    ICQ Number: 46378799
*************************************

> Dove posso trovare info riguardo l'oggetto Treeview?
F1 ?


http://www.it-lang-vb.net/
  > Cerca > Treeview
giuseppeD
Newsgroup: it.comp.lang.visual-basic
Titolo: VB 6.0 Access

Ho un programma realizzato con access 2.0 che devo convertire in visual
basic 6.0.
Poichè è il primo lavoro di questo tipo che affronto chideo se qualcuno mi
può dare le seguenti indicazioni:
- cosa si può recuperare del vecchio prodotto e come
- come è meglio procedere nel recupero o riscrittura
- eventuali siti o articoli che parlano dell'argomento
Grazie   Giancarlo

 - come č meglio procedere nel recupero o riscrittura


basic 6.0.
Sicuramente, tutte le chiamate a DLL a 16 bit vanno convertite a 32.( usando
l'API viewer per i nuovi alias)
Le sub e function potrebbero essere (con dedite modifiche) inglobate nel
progetto VB6.
Sicuramente lo sviluppo fatto in Access 2 si basa sul modello DAO, quindi se
non vuoi convertire tutto in ADO devi tenere come Riferimento la libreria
DAO appunto.
Le form vanno replicate in VB6, ma non so se esiste un wizard o un modo per
esportarle direttamente in VB (forse esiste in Access97, ma prima dovresti
convertire il db).
Il db dovrebbe funzionare correttamente( nel senso di tabelle, indici ecc.).
Ti consiglio cmq di convertire il tuo db in Access97.
Bye.

Newsgroup: it.comp.lang.visual-basic
Titolo: Domandine

Scusate l'irruenza, ma passiamo subito al sodo e vi sarei grato se mi
rispondeste:
1 Come si copia un file sapendo la dir di partenza e la dir di "arrivo"?
2 Non riesco a visualizzare i file cpl in Win2000. La stringa
%windir%\system32\control.exe inetcpl.cpl non funziona +. Come mai?
3 Io di solito per estrapolare la dir di windows usavo %windir% ma
steranamente con Vb6 e win 2k non funziona. Come mai?
4 C'è la possibilità in Vb6 di creare un EXE indipendente, cioè senza
copiare i file di runtime e le ocx in windows?
Grazie dell'aiuto prestatomi........

 copiare i file di runtime e le ocx in windows?
http://groups.google.com
--
Faber


Se n'è parlato tempo addietro, mi sembra di ricordare che in linea di
massima no, però se metti le librerie di run-time di vb sul path dell'exe
dovrebbe funzionare, ma non ne sono sicuro, la norma sarebbe creare un
pacchetto di installazione sai com'è...
Ciao
Davide

 Se n'è parlato tempo addietro
Veramente questa settimana è stata chiesta almeno tre volte :)
Ciao

 ha scritto nel messaggio
news:E_eb8.1722$8F6.1...@twister2.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Condivisione OCX

Ciao a tutti!
Qualcuno ha un'idea su come si condividono gli ocx in rete?
Grazie, Lino
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


spiegati meglio, cosa intendi per 'condividere gli ocx in rete' ?
che tipo di rete: internet(intranet) o locale?
non tenerci sulle spine :-)
bye
R

 Qualcuno ha un'idea su come si condividono gli ocx in rete?
se intendi l'utilizzo di ocx su pagine il gioco funziona cosi :
metti l'ocx su una pagina web , l'utente che la carica se non ha l'ocx
installato lo scarichera' e lo istallera' , se lo ha gia istallato apre la
pagina e basta ( al massimo dovra' accettare la sua esecuzione )

 Qualcuno ha un'idea su come si condividono gli ocx in rete?
Rete locale? Non credo sia possibile in quanto ogni controllo deve essere
registrato su ogni macchina che lo utilizza.

 R


 che ne dite?
ok, adesso ci siamo.
per eseguire una operazione del genere l'unica cosa che
potresti fare e' quella di creare un batch, da eseguire
su ogni macchina; in questo batch metti un serie di
comandi tipo questi:
IF NOT EXIST <nomefile>.OCX GOTO NO_<Nomefile>
REGSRV32 /U <nomefile>.OCX
COPY \\server\cond\<nomefile>.OCX
REGSRV32 <nomefile>.OCX
:NO_<nomefile>
IF ... etc etc ...
potresti metterlo anche nella directory _condivisa_
e lo esegui spostandoti sulla directory dove sono
installati gli ocx sui PC.
purtroppo, questo batch va' eseguito su tutti i PC
localmente.
HTH
bye
R

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Query su MDB

Sto imparando ADO con VB6 su un MDB di Access.
In un Form visualizzo l'elenco di libri di testo...
Tipicamente nell'archivio esiste Scuola, specializzazione, classe e sezione.
Io faccio una query sul DB per visualizzare solo i libri appartenenti ad una
certa scuola, spec., classe e sez. Questa query è ovviamente generale, ma
quando mi imbatto in una scelta dove non c'è per esempio sezione, non mi
restituisce nulla.
Credo di NON essere stato chiaro:
    rssc.Source = "select distinct classe from p_scuole where
p_scuole.scuola='" & Trim(scu) & "' and p_scuole.spec='" & Trim(spe) & "'"
In questo esempio, se scu="ITI" e spe="FISICA" funziona, se scu="LICEO" e
spe="" (il liceo non ha specializzazioni, solo classi) fallisce
ho quasi risolto con un  if spe="" ...  ma mi sembra poco elegante.
Ciao a tutti
Leonardo

 ho quasi risolto con un  if spe="" ...  ma mi sembra poco elegante.
Probabilmente il campo p_scuole.spec se non assegnato ha valore Null che è
ben diverso da ""
Prova a giocare con
... p_scuole.scuola='" & Trim(scu) & "' and (p_scuole.spec='" & Trim(spe) &
"'" OR ISNULL(p_scuole.spec))
In tutta sincerità non ricordo la sintassi corretta per NULL/ISNULL...

 In tutta sincerità non ricordo la sintassi corretta per NULL/ISNULL...
Mmm... E' un'idea da approfondire!
Per ora ho inserito una & IIf(spe = "", "'", "' and p_scuole.spec='" &
Trim(spe) & "'")
che risolve abbastanza bene.
Grazie !
Leonardo.
Newsgroup: it.comp.lang.visual-basic
Titolo: Mi date qualche info sui moduli VBA?

Qual e' la differenza tra l'inserire del codice VBA nei vari foglio1,
foglio2, ecc.(situati nella cartella Microsoft Excel Oggetti) ed
invece inserirlo in "modulo1" o in "modulo2"?
Grazie


wrote:


Newsgroup: it.comp.lang.visual-basic
Titolo: Fatta una classe che implementa interfacce... fare una collezione di interfacce?

Salve!!!!!!!!!!
Dopo aver brillantemente risolto il mio problema con l'implementazione di
una classe, ora si crea il casino di fare una collezione di interfacce...
qualcuno ha mai giocato con la cosa?
Sapete come si fa?
Grazie di qualsiasi aiuto possiate darmi,
Andrea

 qualcuno ha mai giocato con la cosa?
Dunque...
Creare delle custom collections in VB non é cosa esattamente semplice...
anzi...
Trovi molti post in merito, ma se posso consigliarti io leggerei il
paragrafo in merito sul libro di Francesco Balena "Programma Visual basic 6"
che é il testo sacro di VB6... Tale libro é disponibile nelle seguenti
versioni:
*Cartaceo (77 ?) 1100 pag include l'ebook sul cd allegato
*I primi 31 capitoli (rimane fuori quasi solo ASP) ci sono nella versione
economica a circa 10 ?  ed include l'ebook completo sul cd allegato
*L'ebook sul sito mondadori
ftp://ftp.volftp.mondadori.com/pub/pc/windows/win98/docs/programmare_vb6.zip
                    Ciao
                                        Allanon
--
- SPAMKILLER
 L'indirizzo delle risposte é 
itlangv...@michele.sytes.net
 LASCIATE il NOSPAM fa parte dell'indirizzo :-)
  Per superare le impostazioni di protezione antispam scrivete
  nel testo del messaggio la scritta "SPAMKILLER"
Scusate il disturbo, ma non posso più di pubblicità

Mi spiace dirvelo, ma non è + online all'indirizzo che mi hai indicato :(
Andrea

 Mi spiace dirvelo, ma non è + online all'indirizzo che mi hai indicato :(
Nella lista c'è...
http://web.volftp.mondadori.com/pub/pc/windows/win98/docs/
Se non te lo dà, è più probabile che il server sia sovraccarico
di utenti "Anonymous".
Prova ad entrare in 
ftp://ftp.volftp.mondadori.com/
 e vedi cosa
ti risponde, se è l'errore 530 devi aspettare e provare di notte :-)
Se (per pura fortuna con la C) ti fa entrare, vai passo-passo
fino alla dir segnalata.
Se proprio non riesci, e hai una casella dove ti entra (tieni presente
che lo ZIP è da 13 MEGA !), fammelo sapere e te lo mando io.
Bye, G.

Newsgroup: it.comp.lang.visual-basic
Titolo: Da MDB a SQL

Ciao,
devo fare un piccola form che, selezionato un archivio .MDB, lo importi in
in database SQL. Come posso procedere? Non ho mai fatto nulla di simile.
Grazie per l'aiuto.

Dovresti aprire il file MDB con un data control, fare un ciclo for per
scannare ogni tabella, aprire una connessione ODBC al database SQL
d'interesse e importare i dati... un'operazione cmq non molto semplice
anche se non impossibile 

Newsgroup: it.comp.lang.visual-basic
Titolo: Domanda sulle reti per esperti

Chi sa come funziona nei dettagli il RAS o i metodidi accesso
all'hardware/software di accesso alla rete=
Dovrei costruire una scheda ISA che scambia dati HTTP: i dati quando
arrivano alla scheda, che poi trmaite il suod river li porta al computer, da
chi devono essere interpretati=Dal modulo TCP/IP? E come si fa?
Ing. De Marco

 li porta al computer
[...]
Il driver di cui parli, come "porta al computer" i dati ?
Suppongo che tu intenda dire che il driver legge i dati dalla scheda.
L'interpretazione dei dati è quindi a carico del driver, che, come
sempre, è l'unica "entità" in grado di sapere come accedere ad una
risorsa hardware. Immagino che il "driver" sia un "virtual device
driver", in questo caso.
A questo punto, il driver deve far conoscere al resto del mondo
il risultato della sua opera, ossia risalire dal livello "Trasport" fino al
livello "Application".
Lo scopo può essere ottenuto tramite un'interfaccia, nella fattispecie
una libreria dinamica collegata al device driver, la quale esporterà
delle funzioni tramite le quali sarà possibile accedere finalmente ai dati,
nel formato che ritieni più opportuno.
A questo punto, non ti resta che cercare un programmatore mediamente
esperto, dotato di compilatore C/C++, DDK e dei documenti (RFC)
che definiscono nel dettaglio i protocolli dello stack TCP/IP.
Mi spiace se risulto un po' spigoloso.
E' una giornata così.
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Nella pasta con i fagioli ci va il parmigiano?

Salve ragazzi.. ho una domanda per tutto il newsgroup e sono mesi che
non ottengo una risposta...
Nella pasta con i fagioli ci vuole il parmigiano?
Siete pregati di rispondermi subito.
Ciao, Icy
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Io di solito lo metto ;-P
CiaoZ
SebaMix


A me pasta e fagioli non piace, quindi quando sono costretto a mangiarla la
riempio di parmigiano in modo da coprire il gusto... diciamo che diventa
parmigiano ai fagioli...
ciao
Ghigo    ;o)

 Siete pregati di rispondermi subito.
ASSOLUTAMENTE NO!
Se per pasta con i fagioli intendi quella che intendiamo noi toscani
(abbastanza liquida).
VA obbligatoriamente condita con un filo di Olio delle colline
toscane.......di Carmignano č ottimo.
Se proprio sei in vena di abbellimenti 2/3 crostini di pane toscano
tostato...
Se ci metti il parmigiano non ti rispondo piů.....eretico!!!!!


Ragazzi, lo scherzo č bello quando dura poco.
Ora dico basta!!!!!!!!
O mi postate la ricetta in modo che anke io possa dire
la mia, oppure uno di voi esperti mi invita a mangiare :-)
Saluti,
Pusky.
PS: da ignorante in materia io suggerisco di non metterci
il parmigiano, ma come giŕ suggerito da altri, un bel filo
d'olio.

 Io di solito lo metto ;-P
:-/  vabbe' ti risparmio perche' sei ancora un "ITHNers" ^_^;

Salve
ci tengo a precisare che il messaggio della pasta e fagioli
era solo una provocazione. Frequento questo NG da un paio di
anni ed in questi ultimi giorni ho riscontrato un calo
terrificante della qualita' dell'intero newsgroup.
Mi spiace che qualcuno se la sia giustamente presa e gli debbo
delle personali scuse, ma era esattamente ciò che volevo
ottenere... ragazzi datevi 'na mossa.. questo ng sta sfiorando
livelli qualitativi da osteria.
Basta con tutti gli OT.
Se qualcuno (un provocatore come me) posta un OT non rispondete.
C'è gente che si rompe. Molti hanno già lasciato il newsgroup
per queste ragioni.
Non sono un troll, ma soltanto uno che tiene personalmente
MOLTO al newsgroup. Capisco che gli ultimi arrivati non ci
vedano nulla di male, ma in questi ultimi giorni si è esagerato
davvero molto, anche da parte mia con questo messaggio
provocatorio.
Spero in una ripresa qualitativa
Ciao
Icy
Marco Costantini


 C'è gente che si rompe. 
LLTA
-- 
ciao, hal



eheh... con questa pasta e fagioli hai scatenato un casino... non era meglio
se andavi da Mc Donald's ? :-)
aho era una battuta, mica mi volete linciare?
Mario
Newsgroup: it.comp.lang.visual-basic
Titolo: Disassemblare file eseguibile

AIIIUUUTTTOOOOOO!!!!
Ho perso le ultime modifiche fatte e non so come fare per recuperarle. Sò
che è un impresa disperata, ma se qualcuno può darmi qualche dritta per
recuperare i file sorgenti vi bacio tutti.
Utilizzo la versione 6...
Vi prego vi prego vi prego


 Tu devi essere fuori ,prima di tutto il file sorgente non lo recuperi ,e
poi vieni a chiedere nel posto sbagliato !!! Secondo me nessuno di dirà come
decompilare un programma. Dimmi quale programmatore di dice come decompilare
un suo programma....  eheheeheh !! bye bye
e poi leggi i vecchi post  non sei l'unico a chiedere sta cosa almeno di
rendi conto delle risposte !!!


E vai coi flames..........

Ragazzi, scusatemi se scrivo sta risp come domanda ma ho dei problemi ;((
Allora, se m mandi una mail a 
newbie_...@katamail.com
 ti rispondo,xň 
m devi spiegare meglio il problema e contattarm presto, xkč venerdě 
parto...senň aspetti fino al 20 agosto...k :)
ciao

 recuperare i file sorgenti vi bacio tutti.
Bah, concludendo così ti dovevi firmare con un nome da bella topona ...
l'.exe non te l'avrebbe disassemblato nessuno (piccoli problemi tecnici)
però avresti ricevuto qualche e-mail di solidarietà ;-))
Fai il bravo, Max

 ha scritto nel messaggio
news:3D3F0A0B...@tin.it...

Attento a te, ... per almeno due cose (una sta nel topic, l'altra/altre nel
testo)

Lupo wrote:


Tra non molto nei curriculum oltre alle competenze , non mi meraviglerei
aggiunte di:
Assoluta  conoscenza italiano e relativa grammatica.
Con questo modo di esprimersi in codice siamo di cattivo esempio
sopratutto per i nuovi.
giuseppeD
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Newsgroup: it.comp.lang.visual-basic
Titolo: (ot) libri informatica meta' prezzo

Xml passo per passo mondadori £ 70.000 **** 35.000
laboratorio di Vba Apogeo £ 32.000 **** 16.000
Laboratorio di visual basic 6 Apogeo £ 36.000 **** 18.000
Visual basic 6 facile £ 35.000 **** 17.000
Access 2000 per immagini  £ 34.000 **** 17.000
visual basic 6 speedy mcGraw-hill £ 18.000 **** 9.000
Spaghetti hacker £ 30.000 **** 15.000
Linux for dummies £ 42.000 **** 21.000
Linux facile £ 39.000 **** 14.000
Java 2 i fondamenti £ 79.000 **** 38.000
Linux Guida completa Mc Graw hill £ 116.000 **** 80.000
Da windows a linux £. 42.000 **** 20.000
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


di cosa si occupa spaghetti hacker?
chi sono gli autori e la casa editrice?

 chi sono gli autori e la casa editrice?


si ma che argomenti tratta?

 wrote in message
0b1d3a0bef163260a5e...@mygate.mailgate.org...


 ha scritto nel messaggio
news:80Y%7.6664$sW5.2...@news2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Sito Comune

Ho dei problemi ad accedere al sito comune. Ho questo indirizzo,
http://www.murialdo.it/it_lang_vb
, e' giusto o e' cambiato?
Grazie a tutti
Bye by Massimo 8-]

Leggendo un msg precedente, ho trovato come indirizzo
http://www.murialdo.it:8000/it_lang_vb
, e funziona!
Scusate il disturbo
Bye by Massimo 8-]


 ha scritto nel messaggio
news:39B8A451...@txt.it...

http://www.murialdo.it:8000/it_lang_vb
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

Newsgroup: it.comp.lang.visual-basic
Titolo: Da C++ a VB

Ciao a tutti!
Chi mi aiuta a convertire in VB questo codice ripreso da C++?
for (k = z; k >= a; k--)
Grazie per l'eventuale aiuto.

 wrote in message
G#r5MMaR...@newsmst.mcis.galactica.it...


penso... ciao ^__^
E confermo la correttezza
o meglio per essere piu precisi:
for k = z to a step -1
    ' qui metti il codice contenuto nel ciclo for
    '
next k
-- 
Sidewinder  
---------------------------------------------------------------------
/*
 *     Please skip to the bottom of this file if you ate lunch recently
 *                             -- Alan
 */
	-- from Linux kernel pre-2.1.91-1
---------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: se la connessione a internet è attiva inviare un e-mail

Salve a tutti, in un mio programma vorrei poter effettuare la seguente
operazione:
ad ogni primo giorno del mese alle ora 9.00 per esempio,
se č attiva una connessione internet allora deve inviare un e-mail ad un
indirzzo
da me deciso ma in modo trasparente, senza cioč passare dal programma di
posta
e che poi ne resta una copia nella posta inviata, bensi una e-mail diretta e
basta.
qualcuno sa darmi qualche dritta?

da me deciso ma in modo trasparente, senza cioè passare dal programma di


 >da me deciso ma in modo trasparente, senza cioč passare dal programma di



Nel sito comune 
www.it-lang-vb.net
 se cerchi smtp c'è un esempio di sorgente
per inviare email, io l'ho scaricato da poco e debbo usarlo in un prog, se
hai difficoltà e no ntroppa fretta scrivimi in privato.
Ciao
Luther

Newsgroup: it.comp.lang.visual-basic
Titolo: pulsanti di comando in visual basic

Vorrei creare un'applicazione e fare in modo che quando il mouse si sposta
su un pulsante o sul menu, questo appaia in rilievo, quando il mouse si
sposta di nuovo, il pulsante deve tornare allo stesso livello degli altri.
In pratica vorrei utilizzare lo stesso sistema di explorer4.0 e windows 98
nelle cartelle e nei menu.
Qualcuno sa indicarmi la via per fare ciň??
Grazie

Guido Maurano wrote:

Ammesso che tu abbia una matrice di command_button , in questo esempio sono 6
buttons, basta
aggiungere il seguente codice nell'evento MouseMove del controllo Command1.
Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As
Single, Y As Single)
    Dim I As Integer
    For I = 0 To 5
        Command1(I).FontBold = False
    Next
    Command1(Index).FontBold = True
End Sub
Ciao

...



-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/
       Search, Read, Discuss, or Start Your Own    


---------
Ciao!
Per creare ToolBar "flat" (piatte), i cui pulsanti appaiono in rilievo se ci
si passa sopra col mouse (come in Word 97 e VB5), trovi un esempio sul Sito
Comune dei programmatori VB, 
http://www.murialdo.it/it_lang_vb
.
Fammi sapere se hai altri problemi
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260/
http://www.armaditaggia.com/marco
Newsgroup: it.comp.lang.visual-basic
Titolo: VBa Excel cancellare gli spazi indesiderati.

Salve di nuovo a tutti.
Rispetto al precedente post vorrei esporre il problema nella completezza.
Ho un foglio di excel che contiene dei testi. I testi non sono allineati
perche' contengono degli spazi indesiderati.
Selezionando una parte del file (un range) vorrei utilizzare una macro che
cancellasse gli spazi iniziali dei valori contenuti nelle celle.
Mi potete aiutare?
Spero di essere stato chiaro.
*frankyz

 cancellasse gli spazi iniziali dei valori contenuti nelle celle.
Soluzione :-):
Sub TrimRange()
    For Each c In Selection.Cells
        c.Value = Trim(c.Value)
    Next
End Sub
Cosě com'č cancella anche gli eventuali spazi finali,
se vuoi eliminare solo gli spazi iniziali usa LTrim invece di Trim
--
Massimo Di Bello
Prometheo
Corsi di Informatica in Franchising
http://www.prometheo.it/


...cut...
Intanto grazie infinite! La rutine funziona benissimo.
Vorrei disturbarti ancora un attimo. Posso?
Vorrei inserire una macro tipo AUTOAPRI e AUTOCHIUDI che inserisca un
pulsante (o una voce di menu) all'apertura del file XLS.
Ad esso vorrei attribuire la Tua macro TRIMRANGE e alla chiusura vorrei
rimuovere il pulsante.
Ho provato a registrare la procedura:
Application.CommandBars("Worksheet Menu Bar").Controls.Add Type:= _
        msoControlButton, Id:=2950, Before:=11
Pero' il registratore non registra l'assegnazione della macro al pulsante ma
solo il suo inserimento. ARGHHH.
Come posso fare? Hai qualche altra idea per risolvere il problema?
Ciao e grazie 1000 ancora
*frankyz

 Come posso fare? Hai qualche altra idea per risolvere il problema?
Prova un po' con una cosa del genere:
    Set mybut =
Application.CommandBars("Standard").Controls.Add(Type:=msoControlButton)
    mybut.OnAction = "TrimRange"  'assegna la macro
    mybut.FaceId = 30 'assegna l'icona
    mybut.Caption = " togli spazi a range di celle" 'assegna un tip
descrittivo



...cut...
Semplicemente perfetto!
Grazie!
*frankyz

Newsgroup: it.comp.lang.visual-basic
Titolo: VB3 e VB5 inseme

Ciao a tutti.
Possono convivere sulla stessa macchina VB3 e VB5 a 16 bit, maga ri su
due dischi diversi?
Ci prego di rispondermi in privato perchč non passo spesso da queste
parti. :-)
Grazie e Ciao.
Lucio
mailto:
lu...@mywebpages.com
---------------------------

...

parti. :-)
Questo implica che il tuo tempo valga piů del mio, e non mi trovo
d'accordo.
Ciao
--------------------------------------------------------------------
Fulvio Senore
Eliminate "zz" dall'indirizzo e-mail per scrivermi (spammers...)
Remove "zz" from e-mail address to write me (spammers...)
--------------------------------------------------------------------




Newsgroup: it.comp.lang.visual-basic
Titolo: DLL per Cryptografare dati

Rimamgo a Vostra disposizione
Ecco bravo, stai fermo li' e finiscila di fare stupidaggini.
-- 
hal

 Rimamgo a Vostra disposizione
Allora posso anche mandarti a quel paese visto che sei così ben disposto!
:-)