|
|
|
![]() |
|
Strumenti |
![]() |
#1 |
Member
Iscritto dal: Nov 2012
Messaggi: 61
|
[Visual Basic.NET] Console, accettare solo numeri
Salve, sto addentrando in questo nuovo mondo, la programmazione (VB.NET, C#, C++), problemi ne ho già riscontrati tanti, ma poco a poco li supero, questo però non ci riesco...
Premetto che sto usando ancora la console, devo ancora cominciare col Windows Form. Arrivo al dunque: Codice:
Module Rettangolo Sub main() Dim l1, l2, prm, area As Single 'Titolo Console.Title = "Calcolo del perimetro e dell'area di un rettangolo" Console.WriteLine("Calcolo del perimetro e dell'area di un rettangolo" + vbCrLf) 'Inserimento dato Do While (l1 <= 0) Console.Write(vbCrLf + "Inserire il 1° lato:" + vbTab) l1 = Console.ReadLine() 'Clausola numeri positivi If (l1 <= 0) Then Console.WriteLine(vbCrLf + "Un rettangolo possiede lati solo con valori positivi maggiori di 0") End If Loop 'Inserimento dato Do While (l2 <= 0) Console.Write(vbCrLf + "Inserire il 2° lato:" + vbTab) l2 = Console.ReadLine() 'Clausola numeri positivi If (l2 <= 0) Then Console.WriteLine(vbCrLf + "Un rettangolo possiede lati solo con valori positivi maggiori di 0") End If Loop 'Operazioni prm = (l1 + l2) * 2 area = l1 * l2 'Risposte Console.WriteLine(vbCrLf + "Il perimetro del rettangolo è:" + vbTab + Str(prm)) Console.WriteLine("L'area del rettangolo é:" + vbTab + Str(area)) 'Quadrato? If (l1 = l2) Then Console.ForegroundColor = ConsoleColor.Red Console.WriteLine(vbCrLf + "\☺/ ♥ \☻/ ♥ \☺/ È un quadrato! \☺/ ♥ \☻/ ♥ \☺/") Console.ResetColor() End If 'Chiusura Console.WriteLine(vbCrLf + vbCrLf + "Premi un tasto per chiudere la console.") Console.ReadKey() End Sub End Module Vorrei che accettasse solo le cifre più la virgola o il punto (inteso come virgola). Altra cosa, la virgola nell'input del numero è una virgola (non un punto), mentre nella risposta finale è un punto. C'è un modo per far combaciare le 2 cose? Grazie a chi mi risponde. |
![]() |
![]() |
![]() |
#2 |
Member
Iscritto dal: Oct 2010
Città: Savona
Messaggi: 194
|
Prova ad utilizzare le istruzioni Try Catch per intercettare l'errore del valore non numerico inserito:
Codice:
Try [ tryStatements ] [ Exit Try ] [ Catch [ exception [ As type ] ] [ When expression ] [ catchStatements ] [ Exit Try ] ] [ Catch ... ] [ Finally [ finallyStatements ] ] End Try MSDN
__________________
AMD Phenom II X6 3Ghz, MB Gigabyte 790xta-ud4 F4A, 4Gb Ram ddr3, HD Segate Barracuda 1T, SV ASUS GTX 560 Ti DirectCu II ,Monitor Philips 1920x1080 led 2 ms, Xbox360 Slim, Tablet Asus Transformer Pad TF300T, Gameboy Advance, Ipod Touch 16Gb Ultima modifica di AllerITA : 19-11-2012 alle 05:50. |
![]() |
![]() |
![]() |
#3 | |
Member
Iscritto dal: Nov 2012
Messaggi: 61
|
Quote:
Nemmeno dal sito. Dove vanno messi? E come? Intanto grazie. |
|
![]() |
![]() |
![]() |
#4 |
Member
Iscritto dal: Oct 2010
Città: Savona
Messaggi: 194
|
Allora, l'istruzione try catch è una istruzione del VB.NET per intercettare,
in un gruppo di codice, gli errori che il programma incontra quando un tipo di operazione non permessa è stato eseguito. Nel tuo caso particolare è la possibilità di convertire una stringa alfanumerica in un numero, ciò da origine a un errore nel programma che per la stessa funzionalità del VB.NET, genera un interruzione nell'esecuzione e la visualizzazione dell'errore corrispondente. Però per la stessa natura del linguaggio è possibile intercettare tale errore attraverso il Try catch. Vediamo come: inserisci il Try all'inizio del gruppo di istruzioni che credi possa generare l'errore. inserisci catch alla fine di questo gruppo di istruzioni. Quando il programma trova un errore tra il try e catch, mette le informazioni dell'errore all'interno di un oggetto che viene detto eccezione, Questo errore viene intercettato dal Try e l'esecuzione viene passata al blocco Catch che esamina l'eccezione e se tu gli hai indicato di intercettarla la assegna a una variabile, Questa cosa si fa indicando il tipo di eccezione che si vuole intercettare tale oggetto è fondato sulla classe base Exception. quindi puoi utilizzare un oggetto Exception per intercettare l'errore generico. Così se devi intercettare l'errore dato dalla conversione del valore alfanumerico devi fare così Codice:
....Tuo Codice.... Dim IsNumero As Boolean = False Do Try l1=Console.ReadLine IsNumero=True Catch ex as Exception MsgBox "Errore non hai inserito un numero" End Try Loop While IsNumero=False ....Tuo Codice.... non esce dal ciclo. ![]() Spero di essere stato chiaro, Se c'è qualcosa che non hai capito chiedi pure.
__________________
AMD Phenom II X6 3Ghz, MB Gigabyte 790xta-ud4 F4A, 4Gb Ram ddr3, HD Segate Barracuda 1T, SV ASUS GTX 560 Ti DirectCu II ,Monitor Philips 1920x1080 led 2 ms, Xbox360 Slim, Tablet Asus Transformer Pad TF300T, Gameboy Advance, Ipod Touch 16Gb Ultima modifica di AllerITA : 20-11-2012 alle 03:40. |
![]() |
![]() |
![]() |
#5 |
Member
Iscritto dal: Jun 2012
Città: Roma
Messaggi: 115
|
prova l'istruzione
Dim number As Integer Dim result As Boolean = Int32.TryParse(value, number) result è true se è un numero. Se true in number andrà un numero, altrimenti result sarà false e number non valorizzato |
![]() |
![]() |
![]() |
#6 |
Member
Iscritto dal: Nov 2012
Messaggi: 61
|
Siete stati gentilissimi, ora va benissimo, col metodo di AllerITA (grazie).
Gaiden80, se ho capito bene, così come ho fatto sopra, intercetto i "non numeri", invece come dici te accetta solo "numeri", giusto? Mi hai consigliato Integer, mi interessano pure le virgole, infatti il "." non viene rilevato come una virgola, ma devo digitare la "," che non è un problema, nell'input però il "." è come se non esistesse (5.2 = 52), quindi lo devo intercettare, però il risultato viene scritto col punto, a cos'è dovuta questa discrepanza? |
![]() |
![]() |
![]() |
#7 |
Senior Member
Iscritto dal: Jul 2005
Città: Vicenza
Messaggi: 1570
|
Dal mio personale punto di vista, se sei all'inizio come accennavi nel primo post, lascerei assolutamente da parte il Visual Basic e andrei direttamente di C# (se si parla di rimanere nella piattaforma .NET), linguaggio decisamente più moderno e meglio implementato nel mondo .NET. Possiamo dire che l'intera piattaforma .NET è nata sul C# e viceversa.
Poi vabbè, io trovo il C# un linguaggio davvero ben fatto, ma queste son un altro paio di maniche e un discorso diverso da quello iniziale. |
![]() |
![]() |
![]() |
#8 | |
Member
Iscritto dal: Nov 2012
Messaggi: 61
|
Quote:
Col C# ho fatto qualcosina, ma poco nulla e cmq roba banalissima. Tornando a me, sono proprio all'inizio, diciamo che ho capito come ragionano i computer (da tempo), ma non so i comandi, e cambiando sempre linguaggio a volte faccio pure confusione... Ora sono in Visual Basic.NET per scuola, lunedì VB (Visual Studio Express 2012), mercoledì C++ (Dev-C++), il C# raro. Ho provato pure Gambas e Nanodev che sono opensource (in privato). Per ora mi trovo bene in VB, anche se alcuni comandi del C++ li preferisco, tipo "\n" al posto di "vbCrLf", la punteggiatura "{;" a volte rompe, ma è solo abitudine, per ora stiamo usando solo la console, al max qualche finestra di risposta, anche se ho già capito varie cose del Windows Form. Quello che ho fatto fin'ora è molto avanti rispetto ai miei compagni, e ho il dubbio di aver pure già superato la prof (spero che non leggerà mai 'sto post e soprattutto che non mi riconosca :P ). Tornando al discorso sopra, impostando la tastiera 142, col "." del tastierino numerico mi esce la virgola, ma la risposta appare col punto, quindi vorrei risolvere quest'ultimo problema in modo definitivo per tutti i pc. |
|
![]() |
![]() |
![]() |
#9 |
Member
Iscritto dal: Jun 2012
Città: Roma
Messaggi: 115
|
in metodo tryparse è presente per ogni tipo primitivo, int, datetime, float etc.
restituisce sempre true se convertibile, false altrimenti ed in out la variabile valorizzata. Agganciandomi alla discussione penso che un linguaggio valga l'altro. Alla fine di .net la complessità sta nel framework. L'unico vero vantaggio in c# è la maggiore diffusione in ambiente lavorativo, VB.net è stato usato nel passaggio a .net dal VB6 ma a parte la sintassi simile sono 2 linguaggi completamente differenti |
![]() |
![]() |
![]() |
#10 | |
Member
Iscritto dal: Oct 2010
Città: Savona
Messaggi: 194
|
Quote:
intercettare la virgola (in realtà dovrebbe essere il punto come si utilizza nella formattazione inglese). quindi devi fare: Double.TryParse(value,number) come indicato qui MSDN
__________________
AMD Phenom II X6 3Ghz, MB Gigabyte 790xta-ud4 F4A, 4Gb Ram ddr3, HD Segate Barracuda 1T, SV ASUS GTX 560 Ti DirectCu II ,Monitor Philips 1920x1080 led 2 ms, Xbox360 Slim, Tablet Asus Transformer Pad TF300T, Gameboy Advance, Ipod Touch 16Gb Ultima modifica di AllerITA : 21-11-2012 alle 05:40. |
|
![]() |
![]() |
![]() |
#11 |
Member
Iscritto dal: Nov 2012
Messaggi: 61
|
Siete molto gentili, davvero, più o meno ho capito come funziona TryParse, ma non capisco come fargli capire che mi interessano solo i punti e le virgole...
|
![]() |
![]() |
![]() |
Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 17:19.