Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto principiante

Innanzi a tutto un grande saluto a voi tutti.
E' da due giorni che mi dedico allo studio del vb6 e con quello che ho
trovato in rete sto facendo degli esperimenti.
Ora ho messo in piedi un programmino per la gestione dei giocatori in un
ipotetico gioco e le cose non sarebbero proprio male se non ci fosse un
errorino che mi sta facendo tribulare.
Vorrei sapere se possibile, come fare per gestire una casella di testo in
modo tale che accetti solo numeri e non caratteri alfanumerici.
Ovvero se provo il prg e premo un numero, va tutto bene , ma se premo una
lettera ho un errore di dati non conformi.
Ora vorrei che se premo la lettera mi venisse fuori un messaggio scritto da
me e il reset della casella.
inoltre vorrei sapere se quello che ho fatto può essere gestito meglio in
fase di codice.
Qui ho messo in linea il sorgente per capire meglio il mio problema è un
file zippato piccolissimo
 
http://rapidshare.de/files/8141196/Progetto.zip.html
Grazie a tutti

 me e il reset della casella.
Per fare questo devi utilizzare la funzione IsNumeric, questa funzione ti 
permette di sapere se in una variabile č contenuto un valore numerico oppure 
un carattere stringa. Ogni volta che l'utente digita qualcosa nella casella 
fai un controllo del text della casella e se IsNumeric(text1.text) vai 
avanti altrimenti avvii un msgbox con il messaggio che intendi comunicare e 
resetti la casella di testo.
Se hai altre domande fammi sapere,
Emiliano. 

Premettendo che il file che hai uppato non è funzionante poiché mancano i riferimenti al form, posso dirti che quello che cerchi non è molto difficile.
Allora: puoi affrontarla in 2 modi:
1) Avari sicuramente un pulsante di accettazione dell'input, credo. Bè, lì non devi fare altro che inserire una piccola if
if not (IsNumeric(Text1.Text)) then msgbox " Si possono inserire solo numeri"
Altrimenti...
Nelle'evento TextChange, inserisci un codice simile:
if(Text1.Text <> "")And  (Text1.Text <> " ") then
      if not (IsNumeric(Text1.Text)) then msgbox " Si possono inserire solo numeri"
end if
Qualcosa del genere dovrebbe bastare per risolvere i tuoi problemi!
-- 
Hyde 
------------------------------------------------------------------------
View this thread: 
http://www.itsistemi.net/viewtopic-723723.html
Inviato via 
http://www.itsistemi.net

Grazie a Voi che mi avete risposto.
Ho colto l'occasione per sistemare ed aggiungere i form mancanti al file 
precedente cosě potete dirmi se lo stesso prg si poteva fare con meno linee 
di codice.
Ora sta qui
 
http://rapidshare.de/files/8169121/progetto.zip.html
Grazie ancora

Ho provato a fare quanto suggeritomi da Voi inserendo nel pulsante di 
comando la linea If not ..... , ma adesso l'errore esce dopo aver 
visualizzato il mio messaggio .
Ovvero "tipo non corrispondente" 

 
si puo riassumere con un
if(trim(text1.text) <> "") then ...

  
http://rapidshare.de/files/8169121/progetto.zip.html
qui dove?
Io vodo solo una pagina piena di pubblicità.
Ciao

 ha scritto nel messaggio 
news:4387eba0$0$7317$4faf...@reader4.news.tin.it...


 ha scritto nel messaggio 
news:4388498f$0$7316$4faf...@reader4.news.tin.it...


 ha scritto nel messaggio 
news:43886918$0$13262$4faf...@reader2.news.tin.it...


 scaricare
Ma non puoi attivarti uno spazio free qualunque?
Questa pagina è davvero incomprensibile!
Ciao
--
Reporting tool: 
http://www.neodatatype.net

 ha scritto nel messaggio 
news:4388abd5$0$7322$4faf...@reader4.news.tin.it...


 sopra.
Per Sail
Non c'č bisogno che specifichi a chi stai rispondendo: mi pare ovvio che se
rispondi a me rispondi a Zanna.
Poi ti ripeto: attivati uno spazio free qualunque e piantaci lě i tuoi file.
Quella pagina č incomprensibile e spero che tu non voglia ogni volta
sprecare 2 post per spiegare come si fa.
P.s.: ho capito che bisogna schiacciare "Free", non dirmelo piů.
Il fatto č che "Free" sembra un tasto che invita a attivare il contratto
"Free" e non per scaricare un file, cosa che sai solo tu, dato che non c'č
scritto da nessuna parte.
Ciao