mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Cambiare colore di sfondo alla TREEVIEW

Ciao a tutto il NG
Come posso cambiare colore al controllo TREEVIEW di VB
Grazie
Ciao
Mario M.

 Come posso cambiare colore al controllo TREEVIEW di VB
Prima o poi la becco quell'API !!!
Saluti


C'č un esempio, completo di codice pronto per cut and paste, al
sito: 
http://www.mvps.org/vbnet
L'argomento č 'Applying Special Effects to a TreeView', e trovi il
relativo link nella home-page, sezione 'Top 10'.
HTH
Adriano

Newsgroup: it.comp.lang.visual-basic
Titolo: File da mettere sul CD per far andare un EXE scritto in VB5

Ciao a tutti, avrei bisogno di un'informazione : che dll devo mettere in un
cd nel quale inserisco un EXE compilato con VB5 ? Devo per caso immettere
quelle DLL che l'installazione di VB crea come file compressi ? (per
intenderci mi riferisco a quei file che Vb comprime e la cui lettere finale
dell'estensione è normalmente "_")
Grazie anticipato e ciao 

Prova



Crei una installazione in una sola directory con il setup wizard e
copi tutto quanto sul CD.
Purtroppo devi prima installare il programma, poi eseguirlo
(perlomeno, se utilizzi qualche OCX).
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: Creare report in Excel esportando dati da un data base (access per esempio)

Salve,
a questo indirizzo,
http://database.html.it/articoli/leggi/722/creare-report-in-excel-esportando-dati-da-sql-serv/
ho trovato un articolo con codice da poter scaricare e provare, che in prima
analisi sembrava proprio quello che stavo cercondo.
Ma la fine della lettura mi è rimasto un dubbio che non riesco a spiegarmi :
prima dice che mi devo Scrivere un template in Excel vuoto con le
formattazioni opportune che dovrà accettare i dati di riepilogo del report,
poi leggendo un attimino il codice vedo che lo crea lui in fase di
esecuzione. Mi sapreste chiarire questa cosa? E poi come faccio a provare
questo script? Dove lo faccio girare? Conoscete in rete articoli del genere
che fanno la stessa cosa? Devo creare un report formato excel secondo un
template prescritto fornendo a questo tem,plate il risultato di una
interrogazione ad un database!!! Io dovrei farlo in VB6.
Grazie
Fabio.....Bis
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio 
news:87Z12Z136Z14Y1...@usenet.libero.it...


Ti ringrazio, mi tornerà davvero molto utile. Ne approfitto per farti una
domanda. In realtà ho la necessità di modificare o meglio completare un
foglio di excel già esistente con dei dati provenienti da un database.
Alcuni dati così come sono ed altri invece calcolati al volo. Pensi sia
possibile fare una cosa delgenere? (sempre senza aver installato MS excel)
ciao
Grazie
Fabio


 ha scritto nel messaggio 
news:81Z73Z134Z37Y1...@usenet.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Cercasi file!

Come in oggetto, sono alla ricerca disperata del file "CRPaige(32).DLL".
Vi sarei grato se me lo inviaste per email. Grazie!

 ha scritto nel messaggio
news:94984856...@fw.teseo.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: ? command

Scusate l'ignoranza.
Ma come faccio a fare in modo che nel mio form il pulsante cmdOK sia
selezionabile anche premendo il tasto invio.

selezionabile anche premendo il tasto invio.
Impostane la proprieta' Default = TRUE
-- 
hth, hal

 ha scritto nel messaggio
news:Dwxs8.4662$SR5.1...@twister1.libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo griglia

Ciao Ragazzi ,
ho un recordset di dati e vorrei
visualizzare questi dati in  un controllo griglia senza passare per altri
componenti  (esempio Ado ecc. ecc.)
Se questo è possibile mi dite qualè questo controllo griglia e come faccio
per aggiornarlo e fare il refresh
Grazie

 ha scritto nel messaggio
news:MgKka.77035$Jg1.1...@news1.tin.it...

Mshflexgrid o Flexgrid
set griglia.datasource= recordset
dpodichè il recordset lo puoi anche chiudere e buttare nel cesso.
Oppure a manina
scorri i field e le row del recordset, spostandoti tra le celle della
griglia con col e row scrivi i valori nella proprietà text, oppure nella
textwidth, passando come parametro colonna e riga.
Ciao

 ha scritto nel messaggio
news:MgKka.77035$Jg1.1...@news1.tin.it...


 coleghi il data alla grliglia ed è fatta
Io te lo sconsiglio, poi fai te

 > coleghi il data alla grliglia ed č fatta


 ;O)
Ha dei problemi di refresh, tu aggiorni il recordset, poi lo riapri e ancora
non ci trovi i dati nuovi dentro.
Non è bello.
:-(

 ha scritto nel messaggio
news:b70ikn$9kave$1...@ID-110499.news.dfncis.de...


 :-(
.refresh (o .requery)??

 tutto torna sincronizzato ;O)
non sempre è possibile, ad esempio per dati che vengono scritti sul database
da un altro form.

 .refresh (o .requery)??
refresh inteso come aggiornamento dati, a me è capitato, tanto tempo fa,
perchè poi ho smesso subito di usarlo, che aggiornando i dati da un'altro
form e facendo requery sul form col controllo non venissero fuori i dati.

 da un altro form.
Io ne faccio un uso immane ( oggetto data + msflexgrid ) nelle form che
aggiornano il db forzo il refresh a manina su tutti gli eventuali oggetti
data collegati , e a volte hai ragione , non e' bello , me ne scordo 1 e i
dati non cambiano :-/

e come faccio per aggiornarlo e fare il refresh
Lo usi così:
g.rows = 3
g.Col = 0
g.Row = j
g.text = rs("Campo1")
g.col=1
g.text = rs("Campo2")
...
Per il refresh la svuoti e richiami la procedura che ti fa quanto sopra.
Alex


Io mi associo poi fate voi...
Newsgroup: it.comp.lang.visual-basic
Titolo: Convertire funzione in oggetto

Ciao ragazzi,
siccome vorrei imparare a programmare ad oggetti, vorrei convertire le mie
funzioni, tutte parametrizzate in classi ed oggetti.
Ma come posso fare?
Per esempio:
una funzione del genere.......
public function CleanTextArea (vForm as Form) as boolean
dim pippo as control
for each pippo in vForm
    vForm.pippo.text = " "
next
end function
come posso convertirla in un oggetto con tanto di property get e property
let?
Grazie

 end function
Se crei un nuovo controllo ActiveX devi fare una cosa del genere:
Dim FormDest As Form
Public Property Set FormDestinazione(ByVal Frm As Form)
     Set FormDest = Frm
End Property
Public Property Get FormDestinazione() As Form
     Set FormDestinazione = FormDest
End Property
Public Function CleanTextArea() As Long
Dim Ctrl As Control
     If FormDest Is Nothing Then
         CleanTextArea = 0
     Else
         If TypeOf FormDest Is Form Then
             For Each Ctrl In FormDest
                 If TypeOf Ctrl Is TextBox Then Ctrl.Text = ""
             Next Ctrl
             CleanTextArea = 1
         Else
             CleanTextArea = 0
         End If
     End If
End Function
-- 
Rivolterò il mondo per trovarlo, e anche se andasse in Indocina uno dei 
nostri starà nascosto in una ciotola di riso pronto a sparargli nel culo.
(Pulp Fiction)

Ho dimenticato un esempio di codice per far funzionare il tuo controllo 
activex:
aggiungi il controllo ad un form e chiamalo Prova.
Aggiungi delle textbox e al form_click scrivi:
Private Sub Form_Click()
  	Set Prova.FormDestinazione = Me
	Prova.CleanTextBox
	Set Prova.FormDestinazione = Nothing
End Sub
...o magari potresti settare il formdestinazione nel form_load, e 
de-settarlo (anche se non credo sia indispensabile farlo) nel 
form_queryunload o nell'unload... insomma è solo un esempio ma le prove 
son tante :)


 public function CleanTextArea (vForm as Form) as boolean
In teoria funziona cosģ:
Definisci un tuo form di tipo CleanableForm e poi ci aggiungi il metodo 
Clean
Public sub Clean
	dim pippo as control
	for each pippo in Me.Controls
		pippo.text = ""
	next
End sub
E poi da fuori
Dim f as CleanableForm
Set f = New CleanableForm
f.Clean
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: MSDN non funziona su W2K

Salve
come dicevo l'MSDN ha smesso all'improvviso di funzionare.
Ho W2K con il SP2.
Boh, ma possibile che la MICROSOFT non riesce a fare un programma senza BUG
cosě grossolani?........
Ma che si fumano?

 ha scritto

hai installato qualcos'altro ?
da me va, a parte chiedere spesso il cd quando clicco su qc relativo a vc,
vj ecc.

 Ma che si fumano?
Mah... non sarà che hai installato tu qualcosa di "strano"???
ciao
ugo

 Ho W2K con il SP2.
Stessa configurazione MSDN funziona da mesi, mai un problema...

Newsgroup: it.comp.lang.visual-basic
Titolo: Subclassing ME

E' possibile subclassare una form modale in una form
MDI child? E sarebbe possibile fare il subclas senza
utilizzare un controllo OCX?
Grazie
Davide
______________________________________________________________________
Do You Yahoo!?
Il tuo indirizzo gratis e per sempre @
yahoo.it
 su 
http://mail.yahoo.it
--
Posted from 
web1406.mail.yahoo.com
 [128.11.23.170] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:2000060112151...@web1406.mail.yahoo.com...


Newsgroup: it.comp.lang.visual-basic
Titolo: Matrice di Bit Booooo...

Vorrei visualizzare in una PictureBox un'immagine bitmap, detto così sembra
molto semplice, in realtà l'immagine è contenuta in una matrice di bit. Come
posso associare la proprietà PICTURE a una matrice di bit????
Per essere più chiare di seguito aggiungo un esempio.
Dim sBuffer as String
Dim myMatrix() As Byte
nfile = FreeFile
Open "C:\Rossi&Capy.bmp" For Binary As #nfile
sBuffer = Input(LOF(nfile), nfile)
Close #nfile
myMatrix = sBuffer
'Il mio problema stà nella riga seguente, associare la matrice contenente il
file BMP alla proprietà PICTURE.
Picture1.picture=myMatrix
Grazie per l'aiuto
Vitto...@inwind.it

 wrote in message
8fs5i4$bjs$1...@sirmdpsin16.inwind.it...

Salva il tutto in un file con estensione .bmp e associa quel file al
controllo PictureBox.

 posso associare la proprietà PICTURE a una matrice di bit????
mi pare di aver visto un esempio di ciò di cui hai bisogno su
http://www.scottandmichelle.net/scott/code
Ciao
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: Leggere files binari

Ciao,
ho sviluppato una piccola utility che fa dei controlli su files .wav
notoriamente di grosse dimensioni. Leggendo il file per intero usando
la funzione Input il programma è veramente lento anche solo per
eseguire la lettura. Ho notato che leggere da 2000 bytes in su per
volta (Stringa = input(2000,#wnFile)) si ottiene la massima velocità
ma la durata della lettura intera è comunque 4 volte superiore alla
durata del brano (44,1 Khz, stereo, 16 bit). Ad esempio un brano di 1
minuto (10M circa) lo legge in 4 minuti. E' possibile che non ci sia
un modo per velocizzare la lettura? Una routine di lettura in C
sarebbe più veloce? Qualcuno mi sa dare qualche dritta?
Ciao ciao.
Daniele

Come non detto. Risolto con Get. Scusate.
Ciao.
Daniele
Newsgroup: it.comp.lang.visual-basic
Titolo: Neofita

Provengo da altro linguaggio a oggetti e non ho capito una cosa:
Ho un'applicazione con due form frm1 e frm2, parte e visualizza frm1, con un
bottone creo e visualizzo frm2, ma se fa frm2 voglio accedere al frm1
visualizzato, come devo fare? La creazione di una nuova istanza non modifica
certamente quello già creato e visualizzato. Può aiutarmi qualcuno? Grazie
Daniele

 ha scritto nel messaggio
news:bnSka.21002$DT4.6...@twister1.libero.it...


 Provengo da altro linguaggio a oggetti
---cut---
quale?

Newsgroup: it.comp.lang.visual-basic
Titolo: Pentium II

L'opzione di compilazione 'Favor Pentium Pro' ha senso sui Pentium II ?.
Qualcuno conosce i reali vantaggi della compilazione con questo parametro ?
Grazie
Carlo

>L'opzione di compilazione 'Favor Pentium Pro' ha senso sui Pentium II ?.
Il Pentium II dovrebbe essere un Pentium Pro ottimizzato anche per codice a
16 bit e con qualche altra cosa del genere. Entrambi fanno parte della
famiglia P6. Sono convinto che l'ottimizzazione della compilazione sia
efficace anche su PII e Celeron, ma i dettagli tecnici ora su due piedi non
li ricordo.

Newsgroup: it.comp.lang.visual-basic
Titolo: How to retrieve Time Zone information from Windows 9x, 2k, or NT

How do I retrieve the time zone of the user's computer from Windows 9x, 2k
or NT? Is there an API for it?
Also, is there any way to programmically copy the list of time zones along
with their descriptions (city, country, or time zone name) out of the
Date/Time Properties dialog in Windows? I would like to do this "on the fly"
as my program runs. I searched the Registry for these entries but they are
not in the registry.
Thanks,

 or NT? Is there an API for it?
GetTimeZoneInformation
Unfortunately, there doesn't seem to be an enumerator for the time-zone
info. (Probably just stored as a string-table in a resource file
somewhere anyways. Where's RESEDIT when you need it? :) )
Sent via Deja.com 
http://www.deja.com/
Before you buy.

Newsgroup: it.comp.lang.visual-basic
Titolo: Open file for binary access write, put???

Devo creare un file di testo secondo un tracciato preciso, ogni record
deve essere terminato con chr(10), quindi non posso utilizzare il
metodo output perchè le funzioni di scrittura (write e print) mettono
i caratteri di fine riga automaticamente.
Con il metodo binary posso fare quest'operazione? E se si come
utilizzare il metodo put con una stringa di caratteri fissi?
Grazie a tutti

 i caratteri di fine riga automaticamente.
Usa print #numerofile variabile Punto&Virgola
il punto e virgola finale previene l'inserimento del vbcrlf:
es:
x= freefile
open "c:\prova.txt" for output as #x
print #x, "123" ;
print #x, "456"
close
se apri il file, troverai: 123456 

On 22 Apr, 11:18, "Franz_aRTiglio" <franz...@N0SPAMtin.it> wrote:

Very well!
Sembra funzionare!
Ti ringrazio infinitamente ;-)
Shadow
Newsgroup: it.comp.lang.visual-basic
Titolo: Azzeramento contatore

Sono un pseudo programmatore per diletto.
Il mio problema (non gravissimo) è quello di azzerare un contatore in una
tabella su Access 2000.
Basta andare in Access cancellare la colonna e poi immetterla di nuovo e si
risolve.
Penso che si possafare da codice.
E' una questione quasi di principio.
Sluti e ringrazio anticipatamente.
Andrea Becciu

 ha scritto

normalmente si azzera la tabella, dopodiche' basta compattare il db e il
contatore riparte.
se invece intendi a tabella piena, a parte che non ne capisco il senso
specie se il contatore fa da chiave, mi sa comunque tu possa usare comandi
sql per compiere esattamente le istruzioni che dici.
j.

 E' una questione quasi di principio.
Se si può fare da access credo sia possibile anche con l'SQL "ALTER TABLE".
Però se il contatore fosse relazionato in una seconda tabella tramite il
contatore non sarebbe molto carino sballargli tutte le relazioni :)
Ciao

 ha scritto nel messaggio
news:a4fq8s$1e3gsp$5...@ID-51318.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: MSHFlexGrid problema stupido?...

Salve a tutti!
ho una MSHFlexGrid popolata da un controllo ADO composta da 5
righe e 8 colonne. Quando viene attivata, la griglia visualizza solo 2
colonne e cioè i campi DESCRIZIONE e COSTO.
Es.:
          DESCRIZ  |  COSTO  |  DESCRIZ  |  COSTO  |  DESCRIZ  |  COSTO
Quando clicko sulla barra di trascinamento orizzontale (quella
verticale non esiste) mi si sposta una colonna alla volta creando una
situazione scomoda ( da: DESCRIZIONE + COSTO a: COSTO | DESCRIZIONE che
non sono relativi) .
La domanda è questa:
Esiste un controllo od un qualche cosa che faccia spostare 2 colonne
alla volta ogni volta che si clicka sulla barra di scorrimento
orizzontale?

 ha scritto nel messaggio 
news:1153378944....@i42g2000cwa.googlegroups.com...
Salve a tutti!

Ti ho già scritto qualcosa dall'altra parte, ma rileggendo meglio posso 
aggiungere questo:
1) perchè ci devono essere tre coppie di colonne uguali? ..mi sembra una 
cosa strana e scomoda. Mi sembrerebbe più logico avere una lista verticale 
più lunga.. ..ma questo sipenderà da cosa tratta il programma immagino..
2) se gestisci l'evento scroll basta che lì controlli che la prima colonna 
visibile sia dispari, no? Chiaramente dovrai stare attento a capire le 
intenzioni del tuo utente per non relegarlo sempre alle stesse due colonne, 
in pratica devi capire se vuole andare a destra o a sinistra. ..come dicevo, 
sto facendo riferimento alla MSFlexGrid (senza H) perchè purtroppo in questo 
momento non ho la MSHFlexGrid (con l'H) installata. Ma credo che l'evento ci 
sia..
Ciao,
    Diego 

 in pratica devi capire se vuole andare a destra o a sinistra. ..
Grazie, come al solito...
Ci provo nella 'forma' che mi hai consigliato.
Newsgroup: it.comp.lang.visual-basic
Titolo: Dove sbaglio??

Voglio fare un loop con il Do io l'ho strutturato cosě:
Do While RetryCount <= 10 or Found = true
    	if pippo = pluto then
    	    	Found = true
    	end if
    	Sleep(200)
    	RetryCount = RetryCount + 1
loop
Ora sto ciclo esce solo quando RetryCount > 10 e se ne frega del Found. 
Che gli devo fare per farlo uscire se RetryCount > 10 o se Found = true?
-- 
"Io so io e voi nun sete un cazzo!"
Albertone (R.I.P.)
ICQ:61810110 
YAHOO!:Kiavick

 Che gli devo fare per farlo uscire se RetryCount > 10 o se Found = true?
Devi fare qualcosa per cui pippo sia davvero uguale a pluto...


 Do While RetryCount <= 10 and Found = false
     	if pippo = pluto then
     	    	Found = true '* Qui metterei direttamente un "exit do"
     	end if
     	Sleep(200)
     	RetryCount = RetryCount + 1
 loop
--------------------------------
Inviato via 
http://usenet.libero.it

 Found = true?
Dovresti intanto capire cosa significa While: Fintanto che...
Quindi:
Do While RetryCount <= 10 AND Found = False
Ciao
Alberto

Che gli devo fare per farlo uscire se RetryCount > 10 o se Found = true?
Found=false
Do While RetryCount <= 10 or not Found 
    	if pippo = pluto then
    	    	Found = true
    	end if
    	Sleep(200)
    	RetryCount = RetryCount + 1
loop
o meglio ancora..
Do While RetryCount <= 10 
    	if pippo = pluto then exit do
    	Sleep(200)
    	RetryCount = RetryCount + 1
loop
--
Regards LaZ
.·´¯`·.¸.·´¯`·.¸ ><((((º> ....... <º))))>< .·´¯`·.¸.·´¯`·.¸
Mi riservo, con fermezza, il diritto di contraddirmi. (Paul Claudel) 
.·´¯`·.¸.·´¯`·.¸ ><((((º> ....... <º))))>< .·´¯`·.¸.·´¯`·.¸

Lupo ha scritto:

Ho sbagliato (comodi questi While, Ultil e compagnai bella, eh???)
Leggila cosě:
Esegui il ciclo finchč RetryCount <= OPPURE Found=True
Come vedi la prima condizione č sempre vera, finchč non arrivi a 11...

Do While RetryCount <= 10 or not Found 
Do While RetryCount <= 10 AND not Found 


>> loop
Cazzo, come si legge mille volte meglio!!!