mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: HELP: lettura CDaudio Identity

Sto cercando di realizzare un CDplayer con funzioni personalizzate,
ma sono bloccato ancora in una fase iniziale.
E' mia intenzione realizzare un programma che, oltre a suonare
i CDaudio, mantenga anche un database dei titoli e delle informazioni
dei vari dischi, mostrandoli all'inserimento del disco.
Per fare questo, (ho giŕ realizzato il controllo vero e proprio    play, ff,
rew, pause .... ecc.)
devo ovviamente leggere il "CD id", che identifica univocamente il disco
inserito.
Utilizzo le API con la funzione:
    mciSendString "info cd identity", id, Len(id), 0
    If Val(id) <> 0 Then GETCDID = Hex(id)
PROBLEMA:
Tutto funziona correttamente al primo disco inserito....... poi č il caos.
Nel senso che, senza logica alcuna, quando sostituisco il primo disco con
un altro, sembra che la funzione suddetta continui a restituirmi sempre il
codice del primo.
Il fatto "interessante" č che questo non č sempre vero!
A volte vengono riconosciuti due dischi successivi, ma poi il mio programma
sembra "incantarsi", e la funzione suddetta continua a restituire l'ultimo
ID letto.
Non serve neppure uscire dal programma e rientrare.
Anzi, aprendo il 'Lettore CD' di windows, sembra "incantato" anche questo.
Pensavo di avre dimenticato aperto il device fra un disco e l'altro. Ma ogni
prova
in questo senso non ha dato alcun frutto.
Insomma non ci capisco piů niente.
Qualcuno di voi ha pratica con le API multimediali?
Grazie mille in anticipo!

ogni prova in questo senso non ha dato alcun frutto.
SOLUZIONE:
Per fare il check del cd-id e relativa presenza del disco nel lettore
utilizzavo un timer che andava a fare un controllo-lettura ID ogni secondo.
Sembra che queste letture continue cosě ravvicinate nel tempo siano in
grado di combinare un gran casino.
Dopo mille (per davvero!) prove ho capito che impostando il timer con
un intervallo piů lungo il tutto funzionava correttamente.
Ora, impostato a 2 secondi (non meno), tutto va che č una meraviglia.
Perň non so esattamente il motivo  di tutto ciň.
Se qualcuno conosce esattamente i vari meccanismi delle funzioni
multimediali
(di questa in particolare) e ha voglia di farmi sapere qualcosa gliene sarei
molto grato.
Per il mometo un grazie a chiunque si fosse interessato al problema.
A risentirci al prossimo !!!

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] E' possibile cambiare colore a una porzione di testo

E' possibile cambiare colore a solo una porzione ti testo
contenuto in una RichTextBox o TextBox.
In pratica vorrei per esempio far cambiare colore ad una
singola parola.
Vi ringrazio in anticipo
Saluti
Corrado

...

In una RichTextBox si, cerca nell'help la proprieta' "SelColor"...
Ciao.
--
Luca Dormio
l...@sig-la.com
ldo...@tin.it
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB .NET] Formattazione Label

Non sono riuscito a capire se è possibile modificare la formattazione di 
un label per quanto riguarda una singola parte.. mi spiego meglio..
Se ad esempio dovessi scrivere:
"L'algolo d'attrito vale  delta (carattere greco)"
Altro problema, come posso scrivere l'elevazione a potenza?

 ha scritto nel messaggio 
news:43e8fe70$0$12601$4faf...@reader3.news.tin.it...

Non ho capito nessuna delle due domande...
Ciao
-- 
Free .Net Reporting Tool - 
http://www.neodatatype.net
 

 ha scritto nel messaggio 
news:43e8fe70$0$12601$4faf...@reader3.news.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?]datareport e assegnazione iva a runtime

Ciao a tutti vorrei sapere se è possibile assegnare ai controlli di un
datareport dei valori a runtime. Esempio vorrei fare una sum su un campo con
l'oggetto function poi da codice calcolare l'iva sul totale e assegnare il
valore ottenuto ad una label.
Visto che non dispongo di altri generatori di report vorrei risolvere con il
data report se possibile altrimenti mi devo scrivere tutto attraverso il
buon oggetto print ma mi diventa lunghina.
Grazie
Dani


Le Label del datareport sono pressochè identiche alle label normalissime
(c'è solo una serie di caratteri speciali che stampano titolo del
datareport, ecc..., ma con numeri sei a posto).
Per cui, puoi tranquillamente usare la sintassi Label.Caption="1234,56"
Ciao
Alberto

 Alberto
Si ma dal codice del report non riesco ad accedere forse lo devo fare dal
codice del form ?  a questo punto calcolo il valore prima di lanciare il
report e lo assegno alla label poi lancio lo show del report ?
Dani

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB 2005] Creare oggetti da codice

Vorrei creare degli oggetti da codice. Inoltre, quando si fa clic su
uno di questi controlli, l'applicazione dovrebbe essere in grado di
riconoscere quale è stato cliccato.
Grazie

1. crei l'oggetto (es. dim mycommand as new commandbutton(...)
2. ne imposti le proprietą (mycommand.text="Pippo")
3. lo aggiungi ai controlli del form: this.controls.add(mycommand)
4. ridisegni
L'oggetto che ha scatenato un evento č passato alla routine di gestione 
come parametro sender (devi fare, o tentare, una conversione).
Puoi associarlo agli eventi con addhandler, vedi la guida o msdn...

 Puoi associarlo agli eventi con addhandler, vedi la guida o msdn...
Thanks!!
Newsgroup: it.comp.lang.visual-basic
Titolo: Eseguire una stored Procedure

Ciao amici sapete indicarmi come posso eseguire da visual basic, una Stored
Procedure d'inserimento di un database sql server.
Questa stored oltre a fare l'inserimento dei dati,mi torna il valore dell id
del record inserito.
Grazie

 ha scritto nel messaggio
news:Rdha8.65240$3J1.1...@news2.tin.it...

Ti rispondo per conoscenze e non per esperienze (leggi : dovrebbe essere
così ma non l'ho mai provato !!!)
Attenzione : il codice non è ottimizzato (l'ho scritto un po' a memoria e
velocemente...)
##################################
Dim Cmd as ADODB.Command
Dim Param as New Parameter
'Usa la sintassi ODBC per connetterti a SQL Server
cmd.CommandText = "{? = call <NomeProcedura> (?,?) }"
cmd.CommandType = adCmdStoredProc
cmdName = "MyProc"
Set Param = new Parameter
param.Type = adInteger 'scegli il tipo di dato appropriato
param.Direction = adParamReturnValue
cmd.Parameters.append param
Set Param = new Parameter
param.Type = adInteger 'scegli il tipo di dato appropriato
param.Direction = adParamOutput
cmd.Parameters.append param
Set Param = new Parameter
param.Type = adInteger 'scegli il tipo di dato appropriato
param.Direction = adParamOutput
cmd.Parameters.append param
Set cmd.ActiveConnection = <TuaConnessione>
Set Param = new Parameter
param.Type = adInteger 'scegli il tipo di dato appropriato
param.Value = <valore>
param.Direction = adParamOutput
cmd.Parameters.append param
'Eseguiamo la storedProc
cmd(1) = <ValoreParametro>
cmd(2) = <ValoreParametro>
cmd.execute
############################
--
                  \/
                 -   -
                 (.) (.)
----o0O0o--(_)--o0O0o----
<<Oh Grande Spirito,
Concedimi la serenità
Di accettare le cose
Che non posso cambiare,
Il coraggio di cambiare le cose
Che posso cambiare,
E la Saggezza di capirne la differenza.>>
               (Preghiera Cherokee)
Ciao
Franco

L'esecuzione di una stored procedure necessita dell'implementazione
degli oggetti adodb.command e adodb.parameter.
Il fatto che ti restituisca o meno parametri non ti condiziona in nulla;
necessita esclusivamente che tu vada a leggerti la regolare documentazione
sull'oggetto Activex Data Object (ADO)
Ciao Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: pattern observer su VB5

Salve,
esiste qualcosa di già fatto in Visual Basic 5 per il pattern
dell'osservatore?

dell'osservatore?
Cosa sarebbe?
--
ciao
  Stefano


Probabilmente intende questo
http://msdn2.microsoft.com/en-us/library/ms954621.aspx
http://www.dofactory.com/Patterns/PatternObserver.aspx
http://www.codeproject.com/vb/net/ObserverVB.asp
E altrettanto probabilmente con "Visual Basic 5" intende VB2005.
Bye
Raf 


Il suo nick doveva mettermi sull'avviso     ;-)
--
ciao
  Stefano

   Stefano
Purtroppo non mi server per VB2005, ma per Visual Basic 5/6.
In pattern è quello indicato nei link, in pratica consente di
programmare ad oggetti concentrandosi sullo stato che assumono.
In pratica dato un oggetto A, l'oggetto B può mettersi in ascolto su A
ed essere avvertito quando cambia di stato.
In realtà è il pattern che sta alla base per tutti i meccanismi sugli
eventi, indipendentemente dal modo in cui vengono implementati.
Il fatto è che non vorrei realizzarlo da 0.....

 Il fatto è che non vorrei realizzarlo da 0.....
Beh, non dovrebbe essere comunque difficile adattare quello in 
VB.NET
 di 
CodeProject, probabilmente è sufficiente utilizzare un'interfaccia al posto 
di una classe astratta (Subject) e una collection al posto di un ArrayList 
(_observers).
Ne parla sicuramente Stephen Hopkins nel numero di Settembre 2000 del Visual 
Basic Programmer's Journal.
Solo che non è più disponibile online, ma lo puoi trovare all'interno di una 
qualche vecchia MSDN (es. Ottobre 2001).
Altrimenti, forse in questo libro trovi qualcosa di specifico per VB6:
http://www.microsoft.com/mspress/books/2322.aspx
Bye
Raf
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] - Il nuovo .NET 2003, supporta la modifica del codice in fase di debug senza la necessità del riavvio per eseguirlo?

Volevo sapere se qualcuno sa dirmi qualcosa riguardo alla domanda in
oggetto. Sul sito della M$ non ho trovato un H.
Dario Di Marino

 oggetto. Sul sito della M$ non ho trovato un H.
Non saprei ho fatto ieri sera il primo progettinino in 
VB.NET
; però IMHO no.
Ale


.A
UGIdotNET - User Group Italiano .NET
http://www.ugidotnet.org

Andrea Saltarello wrote:
ZAC!
cioč fammi capire
gia si passa ad un vs2003?
Cavolo?!
e allora mi tengo vb6 per ora!...dire che stavo per comprare la versione
pro!
mah!
Non son cose belle perņ!
Un minimo di stabilitą!
BAH!
M$ M$ M$.... ma che se ne faranno di tutti i miardi che guadagnano?
ci si fodererą la bara zio Bill!??!
<wodka ecumenico>
Tanto nudi veniamo al mondo....
nudi ce ne andiamo!
</wodka ecumenico>
--
Il Wodkino Nazionale č a : 
www.martek.it
Pagina Vb/Bestiario/Lamer Experience :
http://www.martek.it/go.asp?portamia=2
 Quotefix e altro:
http://www.martek.it/go.asp?portamia=4
Usr: ICLVB Pw: amici

 l'anno prox.
Come i cursori diversi dal readonlyforwardonly?
Stiamo entrando nel campo delle promesse da marinaio....
Salutoni
Sergio

 gia si passa ad un vs2003?
Si, e come dice andrea è già annunciata la versione 2004.
Microsoft ha pubblicato la road map di VS .net, che prevede, se non ricordo
male, quasi una release all'anno. La speranza è che gli aggiornamenti li
facciano pagare poco, mi pare che da 2002 a 2003 siano 30$, se è così anche
per le prossime ci può stare, dal punto di vista economico.
Dal punto di vista tecnico, se non assicurano la totale retrocompatibilità
dei sorgenti, sarà un bagno di sangue.
Salutoni
Sergio

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] HEX 46 45 52 49 45

il Subject che convertito in char diventa ....
^____^ Bhe che dire , si ritorna a lavoro a Settembreeeeeeeeeeee !!!
Anche i Gigi vanno in vacanza ^_-
-- 
<Gigio2K>
Sito Comune 
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

 Anche i Gigi vanno in vacanza ^_-
Che tempi,
con tutto quello che ancora resta da fare
la gente pensa alle vacanze.
E' vero, non ci sono piů le mezze stagioni.
Attento ai punti patentati.
Enjoy yourself
giuseppeD

> Anche i Gigi vanno in vacanza ^_-
si ma che ce frega?
vai un po' ndo te pare...
Basta con questi OT inutili,il newsgroup non č una chat perciň smettela ...

 si ma che ce frega?
Cerca con google!
http://groups.google.com/groups?q=don%27t+feed+the+trolls+group:it.comp.lang
.visual-basic&hl=it&lr=&ie=UTF-8&oe=UTF-8&selm=k2kcevgvqued0sclhfn9qbg1f0m5t
qn69o%
404ax.com
&rnum=3

 qn69o%
404ax.com
&rnum=3
e allora ???
sei hai qualcosa da dire fallo direttamente...
soliti maleducati

soliti maleducati
^K
Newsgroup: it.comp.lang.visual-basic
Titolo: Access 7.0 -> 2.0

Trasformare da 2.0 a 7.0 e' facile (lo so fare anch'io!) ma il contrario e'
possibile? Come?
Grazie, Lucio


non si puo fare.... ho almeno non facilmente....
l'unico modo è creare un database con access 2.0, creare le tabelle e le
query manualmente identiche all'altro database e poi copiare i dati tramite
una query di aggiornamento da access 7.0.....
Flavio

Newsgroup: it.comp.lang.visual-basic
Titolo: Applicazione che non si installa...Aiuto!!

Avevo già postato qualche giorno fa ma il problem non si è risolto...
Ho creato un'applicazione in vb5 che utilizza un database mdb. In
particolare uso cRystal Report....
Fatto sta che lanciando il prg. da vb tutto è ok, mentre se creo il
prg. di installazione, andando ad installare, il tutto mi dice che è
impossibile installare o aggiornare alcuni files e il sistema se
questi sono in esecuzione (chiaramente non c'e' nient'altro in
esecuzione, se non Explore e Systray!). L'installazione mi fa
proseguire. Funziona tutto eccetto le stampe con Crystal.....
Nessuno ne sa qualcosa......?
Grazie....

...



Magari!!!! Per levarmi ogni dubbio ho preso un pc "fresco", installato
da capo W98 e poi ho provato l'installazione...
Medesimo risultato..:-(((((

...


Non è che per caso non ci sia nessuna stampante installata nel sistema ?
Magari fosse questo il problema!!! Ho installato il programma su 3 pc
differenti, due W98 e un W95, due con stampanti locali e uno con
stampante di rete. Non so davvero cosa fare.....Compare sempre il
mesaggio che c'e' un prg in esecuzione per cui non puo' aggiornare
files di sistema in uso. 
Purtroppo dovrei consegnare il prg a giorni...echepalle!!!!!

 >Non č che per caso non ci sia nessuna stampante installata nel sistema ?


Se hai usato il setup di VB, nella directory di installazione del programma
dovresti avere un log dell'installazione, che si chiama ST5UNST.LOG; č un
semplice file di testo, lo puoi aprire col Notepad.
Cosě dovresti riuscire almeno a trovare qual č il file che ti crea l'errore.
Stai attento a NON modificare il LOG, altrimenti rischi di non poter piů disinstallare
il tuo programma.
Bye, G.
--
---------------------------------------------
    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 !
---------------------------------------------
Real E-address: 
gaet...@hotmail.com

On Tue, 31 Aug 1999 23:56:02 +0100, "Paperino" <non...@lo.dico> wrote:
Purtroppo niente ha funzionato per adesso..
Purtroppo non potro' consegnare il prg. in tempo...
Colgo l'occasione per ringraziare tutti quelli che si sono prodigati
per me...l'ho apprezzato molto..
Grazie a tutti!!!!!

Newsgroup: it.comp.lang.visual-basic
Titolo: DDE, excel & malditesta

Ancora una volta chiedo aiuto...
Ho un progetto in vb5 che tramite dde passa delle dati ad excel, ora mi
piacerebbe che alcune celle (righe) venissero evidenziate con dei
colori. Ma non ci riesco proprio... (riesco solo a cambiare il font
della singola cella).
Il risultato di svariati tentativi e consultazioni varie e' stato un
forte DOLORE DI CAPO....
Grazie ....

...


Gradirei sapere come fare per eseguire collegamento DDE con un programma in
esecuzione,(per es. Vtplus) ed elaborare o meglio archiviare dati in un
database di access, grazie.
Si potrebbe anche archiviare le notizie del televideo, o no?

Io non sono molto pratico ma ti mando il codice che ho utilizzato per
l'apertura di un link dde verso excel (codice preso dall'help del vb5)
  If Text1.LinkMode = vbNone Then
    Text1.LinkTopic = "Excel|Foglio1"
    Text1.LinkItem = "R1C1"
    Text1.LinkMode = vbLinkManual
  End If
Quindi occorre creare una textbox.
 Text1.LinkItem = "R1C1"
  Text1.Text = "Ragione Sociale"
  Text1.LinkPoke
qui chiedi di Pokare (spingere dentro) il contenuto del text1 nella casella
R1C1 del foglio excel.
Linkitem quindi serve per passare dei parametri all'altro programma.
Esiste ancghe il comando
    Text1.LinkExecute Cmd
dove Cmd è una stringa di comandi (tipica per ogni applicazione, quindi excel
avrà i sui comandi word altri etc..).
Spero di esserti stato utili (ti consiglio di verificare ogni cosa che ho
scritto, ti ripeto che non sono molto pratico). Per qualsiasi alta informazione
rimango (per quanto posso) a dispozione
                        Ciao
"G." ha scritto:


Usando Excell, dove occorre inserire questo passaggio?
Gradirei conoscere passo passo la procedura che hai usato, sono
autodidatta,grazie.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] minimizare più form in una volta sola

come faccio a minimizzare più form in una volta sola?
mi spiego:
voglio che all'evento "minimize" (che non so come si ottenga!! ditemelo) il
form principale venga minimizzato e vengano minimizzati anche altri form,
che non sono MDI.
allo stesso modo, quando il form principale viene riingrandito (non a tutto
schermo, ma alla posizione originale), vengano ripristinati anche gli altri
form.
-io uso vb5 pro
ringrazio fin d'ora
--
ciao renzo

 form.
L'evento e' Form_Resize, li puoi testare la proprieta' WindowState, ad es:
Private Sub Form_Resize()
If Me.WindowState = vbMinimized Then
    Form2.WindowState = vbMinimized
ElseIf Me.WindowState = vbNormal Then
    Form2.WindowState = vbNormal
End If
End Sub
oppure, meglio ancora
Private Sub Form_Resize()
If Me.WindowState <> vbMaximized Then
    Form2.WindowState = Me.WindowState
End If
End Sub
infine la soluzione ottimale: carica le finestre figlie impostando la form
principale come parent con
Form2.Show vbModeless, Me
e a questo punto non hai bisogno affatto del codice che ti ho suggerito
perche' il comportamento desiderato e' automatico.
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett Brown
Newsgroup: it.comp.lang.visual-basic
Titolo: inserire file wav o midi in un form

Scusate i miei termini a volte poco informatici:))))))
Ma ho iniziato da poco con VB e per di più da autodidatta!
Desidererei sapere come fare ad inserire un file wav o midi in un form.
Ho provato e funziona, solo però se risulta visibile l'oggetto all'avvio
del progetto con i pulsanti play ecc...
Invece vorrei che risulti invisibile e che il file wav o midi avvii il
suono automaticamente all'avvio del progetto.
Io nei componenti inseribili ho mplayer, quindi mi dà:
Private Sub midfile1_GotFocus()  ???
Poi ho provato mille modi ma non so come fare.
Qualcuno molto cortesemete mi può fornire un codice funzionante?
Grazie 1000 in anticipo
Ciao a tutti
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

suono automaticamente all'avvio del progetto.
Una soluzione facile e' piu' o meno cosi':
Private Declare Function sndPlaySound Lib "winmm.dll" Alias _
"sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) _
As Long
Call sndPlaySound(environ$("windir") & "\Media\Chimes.wav", 0)
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: problemi con formtnumber

ho usato l'istruzione
FormatNumber(eurprz, 2, vbTrue). Il problema è che non vorrei che questa
facesse gli arrotondamenti, ad esempio se eurprz è 476.28516, il risultato è
476.29, mentre io vorrei che fosse 476.28.
Qualcuno può aiutarmi?
Grazie a tutti

 ha scritto nel messaggio
news:97j1d1$d3s$1...@fe1.cs.interbusiness.it...

Matematicamente dovrebbe andare cosi':
eurprz = Int(eurprz * 100) / 100

Semplicemente prima di arrotondare sottrai 0.01
ciao Mauro

 ciao Mauro
Forse non ho capito io, ma non mi e' chiaro.
Se, per esempio, inizialmente ho:
eurprz = 89.243
e poi applico il tuo metodo, non si ottiene 89.23 ?
Mi puoi spiegare meglio?

Scusami devi sottrarre 0.001 cosě se hai
temp=476.28516
temp=temp-0.001 [ 476.28416]
round(temp,2)->476.28
Scusami ora penso di essere stato piů chiaro
ciao Mauro

 ha scritto nel messaggio
news:97j4jh$jle$1...@pinco.nettuno.it...

Neanche cosi' funziona. Ad esempio, se tu hai:
eurprz = 89.249
e ci sottrai 0.001 ottieni:
eurprz = 89.249-0.001 = 89.248
Se poi arrotondi a due decimali, ottieni 89.25, ma Giovanna vorrebbe 89.24.

Credevo che il problema fosse l'arrotondamento quando il numero decimale era
5 e vb arrotonda al numero superiore!
Se si volesse fare in modo che quando il numero decimale è 5 si arrotonda al
numero inferiore la soluzione è quella di prima!
se non vuoi arrotondare ma prenedere solo le prime due cifre decimali la
prima cosa che mi viene in mente è questa:
dim temp as string
dim numero() as string
dim arotondato as integer
private sub Command1_click()
  temp ="4956.568"  ' il numero che vuoi arrotondare
  numero = split(temp,",") ' inserisci la virgola o il punto a seconda di
quale impostazione internazionale utilizzi
  temp= numero(0) & "," & left(numero(1),2)
  arrotondato = val(temp)
endsub

 ha scritto nel messaggio
news:97j702$kbl$1...@pinco.nettuno.it...

Quando devi risolvere un problema e' bene che ti accerti che la tua
soluzione ne risolva l'intera classe. E' per questo che io avevo suggerito,
piu' semplicemente, la soluzione che ora ripropongo anche a te:


 wrote in message
97j1d1$d3s$1...@fe1.cs.interbusiness.it...

Si si si si... sembra facile...
Prova questi sulla finestra immediata di VB:
for i=.4 to .6 step 0.01:print i;round(i):;next i
for i=.4 to .6 step 0.1:print i;round(i):;next i
Confronta e medita.
Devi mettere un controllo supplementare, es.:
Diff=eurprz-round(eurpz,2)
diff=(0.000001 > diff)
eurprz=round(eurprz,2)
eurprz=formatnumber(eurprz+(diff>0.00001),2,true)
Newsgroup: it.comp.lang.visual-basic
Titolo: Recuperare oggetto container da ocx

E' possibile recoperare l'oggetto container che contiene un ocx nel senso
che ho necessita' di sapere in che oggetto (form,picturebox,etc...) viene
posizionato un mio controllo ocx.
Ho trovato la collezione usercontrol.ParentControls che contiene tutti gli
oggetti contenuti nel form su cui e' posizionato il mio controllo ma nulla
che mi dica se il mio ocx e' stato messo direttamente dentro ad un form o
all'interno di un ulteriore controllo container tipo picturebox.
CIAO
------------------------------------------------------------
+ Dott. Bruni Emiliano - Graduated in Physics +
------------------------------------------------------------
+ Cisco Certificated Designer Associate +
+ Software developer & Network Administrator +
+ Nick Handle: EB1346-RIPE BE1484 ICQ: #16774468 +
+ E-Mail: 
br...@micso.it
 +
+ Web: 
http://www.ebruni.it
 +
+----------------------------------------------------------+

 posizionato un mio controllo ocx.
Prova cosě:
Private Sub UserControl_Click()
   If TypeOf UserControl.Parent Is Form Then
      MsgBox "form"
   End If
Endif
Puoi mettere tutte le if che vuoi con i TypeOf di tutti i controlli di tipo
container
Ciao
*Roby*

 +----------------------------------------------------------+
Attento che la tua firma č MOSTRUOSA!!!!!!
Non vorrai farci pagare 100euro di bolletta????
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Ottenere numero della sim

Il post precedente non si publica, in caso di duplicazione, chiedo
scusa!
Stò sviluppando un software con VB6 per invio\ricezione sms.
Adesso vorrei leggere il numero di telefono della sim caricata nel
modem gsm, notare, non larubrica, vorrei proprio il numero della sim
che diventa poi il mittente dell'sms.
Qual'è il comando AT per recuperare tale dato?
Grazie per evnetuali risposte.
Buona serata,
Mauro

 wrote in news:1193241186.791973.279090
@
t8g2000prg.googlegroups.com
:

non credo sia fattibile.
per quella che è la mia esperienza, il numero di telefono sulla sim non 
c'è proprio.
un esempio: da me in azienda abbiamo alcune sim 'vergini'.
se le inserisci in un telefono, non si collegano a nessuna rete 
cellulare.
quando dobbiamo attivare un nuovo numero di telefono, si chiama il nostro 
fornitore, gli si comunica l'id univoco (una specie di mac address) del 
pezzettino di plastica e poi il fornitore ci dice quale sarà il numero 
telefonico, dopo aver associato il 'mac address' al numero di telefono 
nei suoi database.
secondo me puoi al massimo leggre questo identificativo, ma non il numero 
di telefono.
aperto a smentite, ovviamente, non essendo un operatore del settore...
:-)
-- 
paoloopg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--
Newsgroup: it.comp.lang.visual-basic
Titolo: Mostrare form in VB .NET

Come si fa ad far aprire un form in VB .NET?
Voglio dire: una volta (fino al glorioso VB 6) si faceva NomeForm.show... e
adesso?
Grazie a chiunque sapesse aiutarmi!

 adesso?
se non mi sbaglio è uguale .... prima però devi instanziare un oggetto di
tipo form ...
CIAO

 ha scritto nel messaggio
news:sL5M8.17426$86.4...@twister1.libero.it...

nelle'evento clic
         Dim f As New formDaAprire()
        f.Show()
giuseppeD

 ha scritto nel messaggio
news:H18M8.18347$86.4...@twister1.libero.it...


 ha scritto nel messaggio
news:sznM8.19518$5i1.7...@news2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: VB4 e registro di configurazione

Come si puo' fare per inserire dei valori nel registro di configurazione con
VB4 ?
Praticamente io ho un  .reg che dovrei far "partire" ,il quale dovrebbe
inserirmi delle chiavi per l'esecuzione automatica di un eseguibile.Che
funzione posso usare, dato che la Shell non mi permette di chiamare un file
con estensione diversa da EXE ?
Grazie e mille
P.S: Se avete dei suggerimenti diversi per fare in modo che all'avvio di
Windows parta il mio programma (evitando di inserire un collegamento in
"Esecuzione Automatica", vi sarei grato

 -- 
Spero di esserti stato d'aiuto
Ciao, Edoardo
Email: 
gian...@tin.it

Se vuoi io per usare il registo di configurazione uso un ocx di 20 kb
che ti permette di smanettare come meglio credi. Si chiama RegEdit
Light
Ciao.
""""""""""""""""""""""""""""""""""""""""""""""
 -----------Federico Emanuele Galli----------
 ----------Visual Basic's Programmer---------
 
 Sideralis Programs (Visual-Basic and Delphi)
 
http://www.geocities.com/colosseum/loge/2151
""""""""""""""""""""""""""""""""""""""""""""""
                 Trust no ONE.

Newsgroup: it.comp.lang.visual-basic
Titolo: CERACSI COLLABORATORI X RIVISTA DI PROGRAMMAZIONE

via Mailgate Server - 
http://www.mailgate.org

Ciao e a presto
"
www.aspide.it/freeweb/thecodersprimer
".
Scusate, ma come amministratore di Aspide ci tengo a segnalare che il
link e' valido e che il sito contiene solo materiale originale, se le
poche parole dell'intenditore volevano insinuare la presenza di
materiale hackerato.
Anche se gli spazi freeweb sono comunque spazi liberi, su cui Aspide
non ha controllo diretto, siamo sempre intervenuti tempestivamente per
le (fortunatamente pochissime) segnalazioni di contenuti pirata
Saluti
--------------------------------------------------
giov...@aspide.it
 
http://www.aspide.it/freeweb/africa

Ha ragione Roberto,il sito segnalato non esiste o ha cambiato nome
questo almeno è quello che risponde il server a chi tenta di connettersi.
carlo


Il sito esiste sono appena andato a vedere l'indirizzo e' :
http://aspide.it/freeweb/thecodersprimer/
provate :-)
Newsgroup: it.comp.lang.visual-basic
Titolo: Visual studio installer

Salve a tutti!
Ho alcuni problemi con VSI e in particolare con la creazione degli Shortcuts
!!
Praticamente mi accade che nel collegamento creato! non mi viene valorizzata
la proprieta "DA" cioč il percorso sul quale il programma collegato deve
avere effetto!
Spero di essere stato chiaro e vi ringrazio anticipatamente!

 !!
Materiale della Microsoft (se puņ esserti di aiuto)
Sito 
www.microsoft.com
 ; ricerca
digitando vsidemo .
Collegamento al punto 1 o 2.
Dowload file VSIDemo.exe , scompattabile con Winzip.
Esegui le istruzioni .
giuseppeD

Newsgroup: it.comp.lang.visual-basic
Titolo: numero porte COM

Ho bisogno di sapere quante porte come sono presenti in VB.
Esiste un Api per questa funzione.
Grazie.
--
Peace & Love & Roby

 ha scritto nel messaggio
news:Tl9B7.78355$1H1.7...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Dubbio su dll

Ho un dubbio su come dichiarare le funzioni contenute in una dll.
Allora ho scritto una piccola dll con 2 funzioni in c sotto Visual C
Per usarlo in VB non ho capito bene come dichiarare le funzioni...
Sidewinder
---------------------------------------------------
"C'e' una luce in fondo al tunnel....
   ... E' Tux con il casco da minatore!"

 wrote in message
news:37807ccd....@194.243.161.66...




Newsgroup: it.comp.lang.visual-basic
Titolo: Insert da VB6 a database access

Ciao a tutti,
    sto provando a inserire un valore numerico in access da vb... La insert
è giusta ma il problema sorge sulla virgola. Se il numero(0,11) ha la
virgola come separatore decimale come immaginate la insert non funziona...
quindi metto il punto(0.11) nella query... ma il numero mi viene archiviato
come intero considerando il punto come separatore delle migliaia. Come posso
fare? Il campo in access è un "Precisione Singola".
Idee?
Grazie

 un "Precisione Singola".
I numeri per database (tutti) prevedono il punto come separatore
interi/decimali.
Eventuali altri separatori vanno eliminati. Il campo ricevente deve
ammettere, coerentemente, i decimali.
(mammamiamaquantomalehafattoMsAccess!!!)

Si ma su un rapido controllo su + valori con la virgola ho notato che se
metto Precisione Singola e cifre decimali automatiche access mi mette 2
cifre decimali e mi arrotonfa l'ultima cifra che se è 1.67 diventa 1.68
senza che gl'abbia chiesto!!! e se è 0.11 lui scrive 11 ... e lo 0 lo toglie
come se il punto fosse il fivisore delle migliaia... ma è stupido?
Ciao.

 Ciao.
ciaociao
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Creare una query su un database relazionale

Ciao a tutti.
Ho un database con dieci tabelle relazionate.
Vorrei sapere se si può, con visual basic, eseguire delle query su alcune
delle tabelle che tenga conto
delle relazioni già esistenti tra le tabelle (praticamente saltando nelle
istruzioni sql i Join di relazione tra
le tabelle).
Ringrazio in anticipo.
Lele

...


Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto visual basic errore!!!!

Ciao a tutti sono nuovo in questo neswgroup ho installato da poco visual
basic 6.0 versione learning sto lavorando con  il controllo winsock e ho
degli errori il seguente:
Errore: non sono disponibili informazioni sui diritti di licenza per questo
componente .Non sono disponibili i diritti di licenza necessari per
utilizzare questa funzione in ambiente di progettazione . non so come mai mi
dia questo errore ho installato lo stesso programma su un'altro pc e non mi
da questo errore . grazie per l'aiuto ciao ciao.

 componente
Ma vi siete messi d'accordo per avere tutti questo
problema oggi ? :-))). Leggi anche tu il post di Javalab
nel thread "messaggio che non capiso", inviato stanotte
all'1:11.
Bye, G.
--
Le risposte alle tue domande sono sul Sito Comune
di questo NewsGroup: 
http://it-lang-vb.net/
... e nell'help in linea !

Newsgroup: it.comp.lang.visual-basic
Titolo: Campo AtoIncrementante

Come faccio a recuperare subito dopo un AddNew con ADO il valore di un 
campo autoincrementante di Access ? Questi campi si possono azzerare 
(dopo aver cancellato i record) in modo che ripartano da zero ?
Grazie a tutti.

 (dopo aver cancellato i record) in modo che ripartano da zero ?
Compattando il database.
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Goose ha scritto:

http://www.techonthenet.com/access/tables/reset_counter.htm

 Grazie a tutti.
Se č Access >= 2000 puoi fare in ogni momento (esempio):
Function ModifyIdentity(cn As ADODB.Connection, tabella As String, campo
As String Optional PrimoNumero As Integer = 1, Optional Incremento AS
Integer = 1)
cn.Execute "ALTER TABLE [" + tabella + "] ALTER COLUMN [" + campo + "]   
COUNTER(" + CStr(PrimoNumero) + "," + Cstr(Incremento) + ")"
End Function
(Attenzione all'execute perchč l'ho scritta qui dovrebbe risultare qualche
cosa del genere)
ALTER TABLE [tabella] ALTER COLUMN [campo] COUNTER(10,2)
Cambiato il contatore "campo" della tabella "tabella" partendo da 10, ogni
incremento di 2 in 2
-- 


Grazie a tutti
Newsgroup: it.comp.lang.visual-basic
Titolo: Progress Bar

Ciao a tutti
Come posso ottenere una progress bar continua e non a
" blocchetti " ?
Ciao e Grazie
Alberto Omonimo
_________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at 
http://www.hotmail.com
.
-- 
Posted from [194.243.48.2] by way of 
f102.law10.hotmail.com
 [64.4.15.102] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Con i Common Controls di VB6 basta impostare
ProgressBar.Scrolling = ccScrollingSmooth
Ciao
--
Luca Dormio
luca....@tin.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Trascinare RtfBox con le api?!

Salve a tutti!
Un po' di tempo fa qualche gentilissimo frequentatore del ng mi aveva
fornito di una bellisima API con cui posso trascinare i controlli in fase di
esecuzione, ed è quella che vi riporto:
Public Declare Sub ReleaseCapture Lib "USER32" ()
Public Declare Function SendMessage Lib "USER32" Alias "SendMessageA" (ByVal
hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As
Long
Public Const WM_SYSCOMMAND = &H112
Public Const SC_MOVE = &HF010&
Public Sub MuoviControllo(ByVal Handle As Long)
    ReleaseCapture
    SendMessage Handle, WM_SYSCOMMAND, SC_MOVE, 0
End Sub
Per trascinare il controllo mi basta ora scrivere MuoviControllo
Controllo.hWnd
Funziona benissimo con qualunque controllo tranne che col Rich Text Box
Control di Microsoft: a schermo funziona benissimo (si vede il
trascinamento), ma quando poi provo a richiamare la proprietà Top del RTFBox
spostato mi restituisce quella che il box aveva all'avvio dell'applicazione.
E sottolineo che tutto cio' non succede con altri controlli, come
PictureBox, TextBox e altri.
Qualcuno sa suggerirmi un sistema (va bene anche un trucchetto ignobile ;-)
per risolvere il mio problema? Io pensavo magari ad un'API (se la conoscete
segnalatemela) che mi possa estrarre la proprietà top senza passare per
quella standard di vb, che evidentemente non funziona nel mio caso!
Grazie a tutti e ciao!
Luke

 quella standard di vb, che evidentemente non funziona nel mio caso!
GetWindowRect()
hth
Faber

 GetWindowRect()
E poi GetWindowRect non riesco a usarla... sono alle primissime armi con le
APi,
Beh, comunque grazie!
Luke
Newsgroup: it.comp.lang.visual-basic
Titolo: refresh data e ora

ciao a tutti e scusate la mia "notevole" ignoranza nei confronti del VB, tra
i tanti problemi che stò affrontando per creare piccole cose in VB c'è
quella di voler effettuare un "refresh" della data e dell'ora poste in due
label su una form..Inoltre dove pongo le procedure che voglio siano sempre
attive sulla form?;infine sapete poi dirmi dove posso far riferimento per
imparare queste cose basilari del VB?
Grazie ;-)
--------------------------------
Inviato via 
http://usenet.libero.it

 basilari del VB? Grazie ;-)
Tasto F1!
O meglio vedi il post periodico che contiene una miniera di link e
suggerimenti...

 ha
scritto:



 ha
scritto:

Grazie!!


 ha scritto nel messaggio
[snip]
hehe, servono info sul quoting, he?
Ciao

 attive sulla form?;
sempre il timer per qualsiasi procedura che vuoi ripetere ogni tot tempo

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Codec?

Ho un filmato .mov e vorrei vedermelo, ma mi si dice che non c'è il codec
giusto x la decompressione. Dove posso trovare sti' benedetti codec?


Qui li trovi quasi tutti: 
http://pages.prodigy.net/jagfire3
bye
_____________________________________________
James Tiberius Kirk, matricola SC 937-076 CEC
  Nato a Riverside, nello Iowa, USA, Terra
            il 1277.1 (26/03/2233)

Grazie!!!!

 > giusto x la decompressione. Dove posso trovare sti' benedetti codec?
E' possibile estrarre dal file MOV il nome del codec da scaricare?
ho almeno due filmati che non riesco a visualizzare.
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud

Newsgroup: it.comp.lang.visual-basic
Titolo: rendere VBMODAL un form e toglierlo successivamente

Ciao a tutti,
    mi chiedevo se fosse possibile rendere un form aperto con un normale
".show" senza parametri in modal successivamente...
E poi se un form è aperto come modal chiaramente non posso aprirne un altro
altrettanto modal... sapreste dirmi come togliere il modal a uno aperto?
Grazie!

"aaa" <a...@aaa.aa> ha scritto

scaricarlo e ricaricarlo?

"aaa" <a...@aaa.aa> ha scritto nel messaggio
news:D1Pve.30829$bc.2...@tornado.fastwebnet.it...

Per caso il tuo problema è che il primo form deve essere aperto Modal e in certi
casi vuoi far comparire un secondo form Modeless sopra a questo (es. un form di
avanzamento) ma VB dà un errore appena cerca di eseguire il metodo Show?
Non c'è rimedio se non quello di visualizzare Modeless anche il primo form ma
con un trucco simulare la modalità Modal (scusa il bisticcio di parole).
    ' Qui disabilita l'eventuale form sottostante
    frmBackground.Enabled = False
    Form1.Show vbModeless, frmBackground
    Do While Form1.Visible
        DoEvents
    Loop
    frmBackground.Enabled = True
    ' Riporta in primo piano il form sottostante che altrimenti tende ad andare
"sotto"
    frmBackground.ZOrder
Bye
Raf

     frmBackground.ZOrder
Si beh così faccio ora... Una cosa simile comunque...
Ti ringrazio... cercherò di moderare le visualizzazioni come vbmodal
Grazie!
Newsgroup: it.comp.lang.visual-basic
Titolo: Macro e distribuzion di probabilità

Mi serve una mano
Devo creare una macro che generi dei numeri a partire da una distribuzione
di probabilitą con parametri noti e li inserisca in una riga di Excel.
Non sono riuscita a trovare niente al riguardo nella guida in linea di
Microsoft VB.
Grazie mille per l'aiuto
--------------------------------
Inviato via 
http://usenet.libero.it

 Inviato via 
http://usenet.libero.it
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Se mi spieghi come hai fatto a generare i numeri casuali a partire dalla
distribuzione mi daresti un grosso aiuto.
Lo scopo del mio lavoro è generare questi numeri, inserirli nel foglio per
poterli elaborare
Annalisa


Newsgroup: it.comp.lang.visual-basic
Titolo: Esecuzione automatica e taskmanager

1. Come faccio avviare la mia applicazione ad ogni riavvio di win ?
2. Come faccio a far diventare la mia applicazione un servizio di win, in
modo che non possa essere terminato ?
Infinitamente grazie
Armix

 Infinitamente grazie
Infinitamente prego
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it

 ha scritto nel messaggio
news:1IZ9c.14993$jY1....@tornado.fastwebnet.it...


Non necessariamente. Io ho scritto in VB dei servizi di monitoraggio
basi dati e inoltro posta, e son li che girano su un server presso un
data center da un bel po'....
Ciao!
Luca


 data center da un bel po'....
Ok, però leggiti il thread che ha aperto dopo....
bye


Newsgroup: it.comp.lang.visual-basic
Titolo: accedere ad un control in una classe

per l'esattezza il controllo in oggetto è un timer.
Siamo alle solite, ho un form principale, con un contenitore che vado a 
riempire con un controllo utente. In questo controllo utente, oltre a vari 
controlli, è presente un timer.
Ho provato in tutti i modi a trovare il controllo in oggetto del tipo
dim tm as system.windows.forms.controls,
.controlcollection
me.panel.controls.controlscollection
riesco a vedere i vari controlli presenti solo sotto la voce OWNER ma non 
riesco a capire come accedere a tutto il percorso o che tipo di cast devo 
fare per potervi accedere
 

Ciao Enzo,

è sbagliato l'approccio, cosa stai cercando di fare?
.m
-- 
Mauro Servienti
{C67C0157-5D98-4733-A75E-93CAEE4BADC8}
Microsoft MVP - Visual C# / MCTS
http://mvp.support.microsoft.com
blog @ 
http://milestone.topics.it
whynot [ at ] topics [ dot ] it
Newsgroup: it.comp.lang.visual-basic
Titolo: Assi Cartesiani

Scusate se faccio sempre la stessa domanda ma forse non sono stata chiara.
Io ho le coordinate cartesiane di alcuni punti e li vorrei raffigurare in
un sistema di assi cartesiani (x,y), cioč vorrei  visualizzare una cosa
simile:
                              |
                      .       |  .
                    --------+--------
                       .  .   |       .
                              |  .
come posso fare???
N.B. I punti  nell'esempio  sopra sono 6
         Grazie a tutti , ciao Mariotta.
P.S. Non sono molto esperta!

 come posso fare???
Potresti iniziare con il metodo Picture|Form.Pset().
Poi vai avanti con l'F1.
Poi cerca SetPixel() (ma questo č un _poi_).
Consiglio: Metti Picture|Form.ScaleMode = vbPixels
Ciao
------------------------- SiDB Simple DataBase engine ----
------------------------- adParser Expression evaluator --
 
http://space.virgilio.it/zntf...@tin.it/
----------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: intercettare tasto TAB

ciao a tutti
non riesco a trovare il modo di intercettare quando viene premuto il tasto
Tab.
Ho provato mettendo dei punti di interruzione  su keyup, keydown, keypress
ma non riesco a beccarlo. Mi serve xche l'utente non possa muoversi da una
text finchč non verifico che i dati immessi siano corretti.
grazie,
Ciao


gestisci l'evento validate della texbox
--
bye BlackMagic
ICQ: 85485468

 Ciao
Pascal ;)

 Tab.
Curiosità mia: Perchè non va bene fare un controllo sul keydown?
Starla

 Curiositŕ mia: Perchč non va bene fare un controllo sul keydown?
Perchč, in condizioni normali, viene prima intercettato da Win e non passato
anche al programma.


in mancanza di meglio puoi sempre mettere a false la proprietà tabstop di
tutti i controlli e poi gestire tu il tab.
ciao :)

Newsgroup: it.comp.lang.visual-basic
Titolo: File recenti

Ciao!
una domanda: se io volessi cancellare i files recenti da VB6..... (lo
storico che si porta dietro)........avete mica idea di come potrei fare ???
Comincio ad averne troppi.....si lavora egualmente, certo, ma...   ci sono
anche quelli che non esistono piu'!
(solo per prova ho cancellato alcuni di quelli recenti che il 2K si porta
dietro, ma nel VB restano ugualmente)
Grazie a TUTTI!
Ciao, Fabry

 storico che si porta dietro)........avete mica idea di come potrei fare
???
Li trovi nel registro, precisamente in
HKEY_CURRENT_USER\Software\Microsoft\Visual Basic\6.0\RecentFiles
ciao,
termoPilucco

GRAZIE!
Ciao, Fabry
Newsgroup: it.comp.lang.visual-basic
Titolo: Generare immagini da una picture

Salve a tutti,
sono disperato: devo generare un'immagine a partirte da altre due; in
particolare devo incollare un'immagine (piccola) in un punto di quella +
grande quindi supposto che io abbia un form con due picturebox
Picture1 (la + grande)
Picture2 (la + piccola)
devo poter salvare il risultato della sovrapposizione delle due immagini
ottenuta con il metodo Picture1.PaintPicture...
Quindi ho scritto la seguente sub:
Public Sub Picture_mover(newX, newY, FilePath)
   Picture1.PaintPicture Picture2, newX, newY
   SavePicture Picture1, FilePath
End Sub
ma non funziona in quanto mi salva la picture originale.
C'e' nessuno in grado di aiutarmi???
potete rispondermi anche a cobr***
a...@libero.it
 (togliendo gli *)
Ciao by Cobra®
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:f3f76f5008ecbbd908d...@mygate.mailgate.org...

Usa la proprietà Image della picture da salvare, li c'e quello che vedi a
video... O almeno così dovrebbe essere
--
Ciao
   Sharkman
-----------------------------
Rimuovere NOSPAM per risposte

 C'e' nessuno in grado di aiutarmi???
Spero di aver assolto questo arduo ;-) compito e di esserti stato d'aiuto.
GoodBye By Ged
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Inserimento Excel

Ho un elenco di circa 2000 stringhe in una collection (RowList). Sono campi 
separati da tabulazione, ma posso scegliere io il separatore. Sto cercando 
di inserirli in Excel tramite VB, senza dover "importare" il file, in quanto 
voglio poter scegliere in fase di popolazione bordi e formattazione a mio 
piacimento.
Tralasciando apertura e chiusura di Excel e del foglio di lavoro il codice 
che uso per popolare il foglio e' il seguente:
Dim xlWS As Excel.Worksheet
Public Sub GenTable(ByRef RowList As Collection)
    Dim r As Long 'Riga
    Dim c As Long 'Colonna
    Dim vRow As Variant 'Riga della Collection
    Dim vItem As Variant 'Campi contenuti nella riga
    'Per ogni riga nella Collection
    For Each vRow In RowList
        r = r + 1
        'Splitto la riga nei singoli campi
        vItem = Split(vRow, vbTab)
        'Ogni campo
        For c = 0 To UBound(vItem)
            'lo inserisco nella cella corretta
            xlWS.Cells(r, c + 1).Value = vItem(c)
        Next c
    Next vRow
End Sub
Tale routine e' *estremamente* lenta (~30 sec su Athlon 2800, 1GB Ram a 
400Mhz), molto piu' di quanto mi sarei aspettato da "sole" 2000 righe.
Qualcuno sa suggerirmi un metodo piu' "rapido" di effettuare gli 
inserimenti?
Grazie per l'aiuto,
Lokar 

 inserimenti?
Ciao, Lokar.
    Consulta la Guida in linea di Microsoft Office Excel a proposito di:
        Property Formula As Variant
            Membro di Excel.Range
e sperimenta col codice seguente:
        Option Explicit
        Public Sub Test1()
            ReDim a(0 To 1, 0 To 2)
            a(0, 0) = 1
            a(0, 1) = 2
            a(0, 2) = 3
            a(1, 0) = 4
            a(1, 1) = 5
            a(1, 2) = 6
            Range("A1:C2").Formula = a
        End Sub
    (Facci sapere se ed eventualmente come hai risolto. Grazie.)
-- 
Ciao :o)
Maurizio Borrelli, Microsoft MVP - Office Systems - Access
--------
?SPQR(C)
 X
--------

 (Facci sapere se ed eventualmente come hai risolto. Grazie.)
Stupendo =)
Ho risolto con il metodo da te suggerito, al popolazione di un array "cella 
per cella" e' stata evidentemente piu' veloce di quella di un foglio excel e 
il metodo Formula copia il tutto sul foglio in maniera pressocche' 
immediata.
Grazie per il suggerimento, e...
Happy Coding =)
Lokar
-- 
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
Statuto: 
http://www.it-lang-vb.net/docs/Statuto.txt
UGIdotNET - 
http://www.ugidotnet.org