1 Ανοίξτε ένα από τα έργα σας VB.NET χρησιμοποιώντας το Microsoft Visual Studio . Εντοπίστε τη μέθοδο Page_Load σε φόρμα εκκίνησης του έργου 2
Επικολλήστε τον ακόλουθο κώδικα στο επάνω μέρος αυτής της μεθόδου : .
Δημ. stringValue1 As String = " 100 "
Dim stringValue2 As String = " 100.1 "
Dim stringValue3 As String = δημιουργεί τρεις μεταβλητές string, και αποδίδει τους αξίες . Η πρώτη μεταβλητή κρατά " 100 ". Αυτό είναι μια έγκυρη ακέραια τιμή . Η αξία της δεύτερη μεταβλητή είναι « 100,1 ». Αυτός είναι ένας έγκυρος αριθμός , αλλά δεν είναι ένα έγκυρο ακέραιο αριθμό . Η τελική μεταβλητή , " stringValue3 , " δεν έχει έγκυρη τιμή . Η αξία αυτή είναι « ABCD ». Οι τρεις τελευταίες δηλώσεις περάσει τις τρεις μεταβλητές σε μια λειτουργία που ονομάζεται " MakeInt . " Η λειτουργία αυτή επιχειρεί να μετατρέψει κάθε χορδή σε ακέραιο και επιστρέφει το αποτέλεσμα αυτής της προσπάθειας με τη μέθοδο Page_Load . Οι εντολές MessageBox.Show εμφανίζουν οι τιμές που επιστρέφονται από τις κλήσεις λειτουργίας
εικόνων 3
Επικολλήστε τον ακόλουθο λειτουργία κάτω από τη μέθοδο Page_Load : .
MakeInt Λειτουργία ( ByVal val Όπως String ) Όπως Integer
Dim intVal As Integer
If Not Integer.TryParse ( val , intVal ) Στη συνέχεια
intVal = -1
End If
Επιστροφή intVal
End Function
αυτή η λειτουργία χρησιμοποιεί τη μέθοδο " TryParse « να μετατρέψει την τιμή συμβολοσειράς που λαμβάνει σε έναν ακέραιο αριθμό . Αν πετύχει , θα αποθηκεύει το αποτέλεσμα στο « intVal " μεταβλητή . Εάν η προσπάθεια μετατροπής αποτύχει , η λειτουργία καθορίζει την αξία του " intVal " μεταβλητή " -1 ".
Η 4
Πατήστε κλειδί " F5 " . Visual Studio υλοποιεί το έργο . Τα πρώτα « MessageBox.Show " εντολή εμφανίζει " 100 " , επειδή η λειτουργία ήταν σε θέση να μετατρέψει το string που περιέχει το "100 " σε ένα έγκυρο ακέραιο αριθμό . Τα επόμενα δύο " MessageBox.Show " εντολές οθόνη " -1 ". Αυτές οι αξίες , « 100,1 » και « ABCD », δεν είναι ακέραιοι αριθμοί . Η συνάρτηση επιστρέφει " -1 ", διότι δεν θα μπορούσε να μετατρέψει τις αξίες αυτές σε ακέραιους αριθμούς .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα