Newsgroup: it.comp.lang.visual-basic
Titolo: chiedo listato!

Nella mia personalissima lotta con il vb6 mi trovo a soccombere in brutta 
maniera e pertanto chiedo cortesemente a qualcuno di voi se può postarmi un 
listato in vb6 che mi faccia apparire in un form subito 4 caselle di input 
(es. nome, indirizzo, telefono, città) e che mi permetta di immettere i dati 
in queste caselle?
Se uso la funzione input textbox non ho il colpo d'occhio dei dati che devo 
immettere nella form, in quanto mi appare una voce alla volta.
Come rimpiango il GWBasic! Con print, input e line input si faceva tutto in 
30 secondi!
Grazie.
(G)
P.S. ho appena finito di provare il distruggidocumenti sul libro di Balena e 
sul McGraw Hill del vb6: funziona bene.... :-))))))))

 che mi permetta di immettere i dati in queste caselle?
Pesno di aver capito il tuo problema. E' semplicissimo!
Vedi quel rettangolo sulla sinistra pieno di icone?
Ecco, fai clik sopra quella che assomiglia alla tua casella di imput.
Lo so, non succede nulla, ma tu non preoccuparti.
Adesso spostati con  il mouse sul tuo form, schiaccia il tasto sinistro e
tieni premuto, spostati in diagonale di 1 centimetro, rilascia il tasto del
topo ed ecco apparsa la tua prima casella di imput.
ripetendo la stessa procedura puoi metterne quante vuoi.
Poi prova a disegnare sul from acnhe le altre "icone" per vedere cosa
fanno... ti si aprirà un mondo...
--
Greg

Guido Ha scritto:
"Guido" <g,TOgu...@tisIMcIali.it> ha scritto nel messaggio 
news:43653fb3$0$29541$4faf...@reader1.news.tin.it...

Ciao Guido, vedi i metodi possibili stanno solo alla tua fantasia, ma devi 
purtoppo imparare a conoscere gli oggetti che VB6 ti offre metterli in una 
form vuota e acquisire l'input, allora ti dico una cosa, io provenivo come 
te da Basic testuali, cioè con interfaccia a caratteri in effetti questi 
tipi di liguaggi, viaggiano con 'input' o 'lineinput' e con 'locate x,y' per 
posizionare a video la maschera ad esempio.
Ti dico subito in cosa si differenzia VB6.
Per l'input purtoppo ad eccezione appunto di InputTextBox il dato non si 
acquisisce dando semplicemente l'invio a meno che tu non inserisca un 
pulsante di comando nella tua form che si occupi di salvare da qualche parte 
questi dati acquisiti poniamo in quattro textbox, come da te richiesto, tu 
poni queste domande perchè probabilmente utilizzi VB6 da pochi giorni o 
forse poche ore e non sai ancora nulla di come creare oggetti in un form ma 
sopratutto forse non hai ancora neppure sfiorato le Proprietà di un 
qualsiasi controllo ad esempio il form stesso oppure una textbox.
Ti potrei fornire anche il listato, ma preferisco farti toccare con mano 
come procedere passo passo per ottenere questo risultato e farti capire che 
intanto in VB6 non esiste un ciclo principale nel quale il programma si 
trova perennemente in attesa dei tuoi comandi, magari letti da tastiera, 
dove tu ad esempio per uscire dal programma e terminarlo continui ad 
interrogare la tastiera finche ad esempio non venga premuto ESC tanto per 
dirne una.
VB6 lavora con Windows e quindi ogni azione è un Evento che viene eseguito 
come un GOSUB ad esempio tanto per farti comprendere il paragone, ma al 
termine del quale il sistema non è più in un ciclo runtime gestito da te, ma 
da windows stesso quindi memorizzati tutti questi concetti.
1) Ogni pulsante che clicci, ogni textbox nel quale tu agisci scatena un 
evento preciso, ad esempio il 'click' o il 'doppioclick', oppure 'change' 
cioè mentre in una textbox digiti dei caratteri, per ogni carattere digitato 
si scatena un salto all evento Change, piu avanti ti spiego dove si trovano 
ste cose.
2) In ogni evento può essere inserito del codice visualbasic per reagire 
appunto tale evento nel modo desiderato.
3) Le variabili se le vuoi utilizzare con il vecchio concetto di un basic 
tipo GW le devi dichiarare in un modulo.bas di VB6, altrimenti saranno 
visibili sono nel blocco in cui le crei e non in tutto il programma.
Queste erano le prime tre cose che devi memorizzarti, se vuoi staccarti dal 
concetto RUNTIME di GW Basic o anche Qbasic che in realtà è un ciclo 
infinito fino a che non si esce da un programma.
Sviluppiamo insieme ciò che vuoi ottenere, ecco i primi passi che ti 
suggerisco seguimi attentamente ed avrai la tua soluzione, ma l'avrai creata 
tu stesso.
1) Apri un nuovo progetto in VB6 come ben saprai ti compare una form vuota 
cliccaci dentro ed attivala se no non puoi inserirci nulla.
2) Guarda nell'elenco degli oggetti inseribili in una form e vedrai tra 
questi le textbox doppiocliccaci sopra, tante volte per quante textbox vuoi 
inserire nel form.
3) Posiziona e dimensiona a tuo piacere dentro la form le textbox che hai 
inserito, nota inoltre che VB6 li ha numerati ovvero Text1, Text2, Text3 
ecc, questi sono i nomi di default che VB6 ha dato agli oggetti textbox che 
hai inserito, quando li hai posizionati seleziona un textbox poniamo il 
Text1 e con il tasto destro del mouse scegli Proprietà.
4) Finalmente vedrai un qualcosa che ovviamente ti potrebbe aiutare a capire 
come servirti di questi oggetti, che è meglio chiamare controlli, e cioè 
l'elenco di tutte le proprietà che puoi modificare in una textbox, vedrai ad 
esempio la proprietà Text che contiene la scritta Text1 ad esempio, ecco 
prova a variarne il contenuto e guarda cosa succede alla text1 che hai 
inserito nella form, noterai che si modifica la textbox in base a quello che 
scrivi tu, ecco adesso svuota cioe lascia la proprietà Text senza scritto 
nulla dentro così hai preparato la prima textbox che cioè apparirà vuota 
quando esegui il programma, naturalmente puoi fare lo stesso per le altre 
TextBox, per prova quando le hai tutte svuotate premi F5 avviando così il 
programma vedrai che sono vuote, ora ferma di nuovo tutto, continuiamo.
5) Adesso ti faccio inserire le etichette, che puoi posizionare sopra una 
textbox perchè vorrai dare dei nomi suppongo ad esempio: Nome, Indirizzo o 
quant'altro.
In GW Basic probabilmente si faceva così:  Input "Indirizzo : ";Addres$ 
cioè informavi l'utente in merito a cosa stava immettendo, in VB6 si ricorre 
alle etichette (Controllo Label), crea quelle che ti servono nel modo 
analogo a quello utilizzato per inserire le TextBox nel form, l'oggetto in 
questione porta l'icona (A) sempre nella lista degli oggetti inseribili in 
un form, quindi creati tante etichette, quanti sono i tuoi TextBox che hai 
già preparato e posizionato prima nel form, posiziona una label sopra ogni 
TextBox e sempre tasto DX del mouse fai Proprietà e modifica anche le 
scritte che VB6 inizialmente ti ha numerato come Label1, Label2, Label3 ecc. 
come avevi fatto per i textbox, la proprietà nelle Label non si chiama Text, 
ma Caption, prova a modificarne i contenuti e vedrai come è successo con le 
textbox anche le scritte delle etichette le modifichi come ti pare.
6) Inseriremo ora un Pulsante di comando, piu avanti capirai il perchè, 
posizionalo dove ti pare e modifica anche la scritta del pulsante sempre 
selezionandolo e facendo proprietà come per le Label cioè selezionalo e con 
tasto DX del mouse fai Proprietà, quindi cerca Caption, e modificherai così 
la scritta del tuo pulsante; chessò mettici scritto Enter oppure Salva, boh, 
vedi tu.
7) Allora se hai fatto correttamente tutto quanto, tu adesso hai questa 
situazione nel tuo form, ovvero hai tutte le textbox vuote, le label 
posizionate sulle textbox con la scritta di cosa ci va inserito, ovvero nome 
indirizzo ecc, ed un pulsante comando, quindi hai la tua prima maschera 
personalizzata come chiedevi, ecco intanto dai una salvata al progetto, non 
si sa mai, un black out o si pianta windows, sempre meglio salvare ogni 
tanto, lo facevi anche in gwbasic sicuramente.
8) Prima di ogni altra cosa devi sapere cosa sono gli eventi e come VB6 ti 
permette di gestirli, fai questa prova, nella form ad esempio anche se non 
hai ancora avviato il programma clicca 2 volte sul pulsante di comando della 
form che ti ho fatto inserire ad esempio e guarda cosa accade, fallo è molto 
importante. Ti è apparsa la finestra degli eventi e piu precisamente 
l'evento CLICK hai cliccato sul pulsante e dovresti vedere questo:
Private Sub Command1_Click()
' qui dentro ci va il codice visual basic che viene eseguito
' quando si preme il pulsante command1 questo infatti è l'evento click
' piu sotto caricheremo il vero codice invece di questa spiegazione
End Sub
Sub è una subrourine di Vb6 come se tu avessi detto: ''quando clicco il 
pulsante gosub Command1.Click'' tutto questo è predefinito in VB queste 
ruotine evento si chiamano Sub e terminano con un End Sub oppure con un Exit 
Sub (se si vuole uscire prima per non eseguire del codice di solito dopo di 
essa) allora tornando a noi, ti spiegavo che le textbox con il tasto di 
invio si fanno le pipe, ovvero non è come la inputbox, per rispondere alla 
pressione di Invio noi programmeremo il pulsante che ti ho fatto inserire 
per reagire ad esso, seleziona le proprietà del tuo pulsante e nella lista 
cerca la proprietà Default e vedrai che è impostata su False molto 
probabilmente, con un doppioclick impostala a True, grazie a questo 
stratagemma quando si preme Invio è come aver cliccato sul pulsante, quindi 
viene scatenato l'evento click, che come ti dicevo assolve un compito, 
dopodichè il programma torna allo stato di attesa altri eventi, poichè tu 
volevi acquisire i valori dei tuoi textbox come se fossero stati immessi in 
quattro inputtextbox simultanee.
Ma noi grazie alla maschera che ti ho fatto creare simuleremo proprio ciò 
che tu volevi e salveremo il risultato in un file di testo cosi:
fingiamo che:
nel Text1 c'era Nome
nel Text2 c'era Indirizzo
nel Text3 c'era Telefono
nel Text4 c'era Città
L'utente ha immesso nelle textbox questi dati e tu vorresti acquisire e 
salvare magari in un file questi quattro textbox quando l'utente preme invio 
attivando quindi il click simulato del pulsante di comando di cui sopra.
Ecco il vero codice Vb6 per fare questo:
Private Sub Command1_Click()
Open "Dati" For Append As #1 : rem apro il file di output in modalità Append 
dovrebbe esistere anche in GWBASIC
Write #1,Text1.Text, Text2.Text, Text3.Text, Text4.Text
Close
End Sub
Quando hai scritto tutto questo premi salva il progetto premi F5 ed esegui 
il programma, quindi immetti i dati dai l'invio e controlla il file creato 
per vedere che contenga quanto tu hai inserito nelle textbox poi mi fai 
sapere.
Ti ho dato la minima infarinatura possibile, ora studiati tutte le proprietà 
modificabili e non di ogni controllo: Form, TextBox, Label,  Pulsanti e 
sopratutto gli eventi che ognuno di questo oggetti scatena, tempo un mese ti 
muoverai già bene se sei dotato di buon intuito, sappi solo che Vb6 ha una 
caterva di comandi che neppure io ancora so usare perchè provengo anche io 
non da GWBASIC ma QBASIc, credo che siamo lì comunque.
Buona fortuna, magari diventerai un bravo programmatore VB6, non demordere.
Auguroni Ivan

 30 secondi!
http://www.gbcdepot.com/free/vb_esempi/samples_files_ReadWriteFILE.zip
enjoy :P
-> GbC|
www.gbcweb.com

 sul McGraw Hill del vb6: funziona bene.... :-))))))))
Beh, č un buon sistema per imparare VB6 ;)
Piuttosto butta via tutto quello che hai imparato di GWBasic, in VB non ti
serve a niente se non a deviarti mentalmente.
Ciao
--
Reporting tool: 
http://www.neodatatype.net

 fanno... ti si aprirą un mondo...
Si, ho provato ed in effetti č un mondo piendo di potenzialitą per me 
sconosciute!
Perņ non mi sembra poi tanto "intuitivo": diciamo che forse "potrebbe" 
essere intuitivo per chi lo ha fatto...per molti ma non per tutti! :-(((
Comunque grazie!
(G)

 demordere.
Grazie per la fiducia!
Sei stato gentilissimo, grazie ancora.
(G)

 
http://www.gbcdepot.com/free/vb_esempi/samples_files_ReadWriteFILE.zip
Bello! Per iniziare va bene!
Adesso provo a studiare il listato "General" al fine di capire emglio come 
adattarlo alle mie esigenze.
Grazie!
(G) 

 serve a niente se non a deviarti mentalmente.
Si, me ne sono accorto e - nota bene - su un libro per principianti sul VB6 
reperito in rete c'č scritto che provenire dal "vecchio" Basic aiuta....
(G)

message lost ?
io non lo vedo il mio post col link...
bah
misteri della rete
-- 
-> GbC|
www.gbcweb.com

 Comunque grazie!
Nessuno ha detto che è intuitivo.
E' un linguaggio di programmazione con i suoi pregi ed i suoi difetti.
Un buon manuale di Visual Basic (= Francesco Balena) li mostrerà tutti 
egregiamente.
-- 
Ciao,
	Fabrizio
=== 
http://www.negusweb.it
 ===

 reperito in rete c'è scritto che provenire dal "vecchio" Basic aiuta....
butta via anche quel libro, forse tornera` al suo canile
-- 
ciao, hal

 misteri della rete
ore 9.14 del 31/10/05
http://www.gbcdepot.com/free/vb_esempi/samples_files_ReadWriteFILE.zip
enjoy :P
-> GbC|
www.gbcweb.com
Libero che da un paio di giorni da di matto ... un NG server free
e' l'alternativa finche non si mettono a posto
http://news.cu.mi.it/
http://news.servidellagleba.it/
 ...... i sopra sono free ed il primo dovrebbe attivarti
in giornata se lo chiedi
http://wiki.news.nic.it/NewsServerPubblici
PS:
copio incollo da un post che sto' leggendo proprio ora :
Se cerchi su it-alt.media.internet.news-server , si è parlato dei server
che portano o non portano la free.it.*
Alcuni non la portano per scelta. Non so se sia il caso di Diesel.
Alcuni cmq la portano. Per fare una prova veloce senza doverti registrare
con un altro server, prova per esempio 
news.aioe.org
, per l'accesso non
richiede userid e password. Però non è veloccissimo :)
--
Fosco

 
http://wiki.news.nic.it/NewsServerPubblici
per chi avesse ancora problemi e fosse interessato ad uno free
su news:it-alt.media.internet.news-server
Dmitry ha appena postato gli inviti per x-privat
--
Fosco