Πώς να ρίχνει σε ακέραιους σε VB6

Το Basic 6 λειτουργία Visual " CInt " σας επιτρέπει να ρίχνει μια τιμή από έναν τύπο δεδομένων για τον τύπο δεδομένων ακέραιο . Casting μεταβλητές είναι ένα μέρος του desktop εφαρμογές που λαμβάνουν είσοδο από το χρήστη . Όταν οι χρήστες πληκτρολογούν σε ένα πλαίσιο κειμένου , πρέπει να μετατρέψετε τους αριθμούς σε ένα ακέραιο , έτσι ώστε να μπορεί να εκτελεί λειτουργίες μαθηματικά στην είσοδο . Οδηγίες
Η

1 Κάντε κλικ στο κουμπί των Windows " Start" και πληκτρολογήστε " visual basic " στο πλαίσιο κειμένου αναζήτησης . Πατήστε το πλήκτρο " Enter" για να ανοίξετε το πρόγραμμα μεταγλώττισης Visual Basic . 2

Κάντε κλικ στο " Άνοιγμα" στη γραμμή εργαλείων στο πάνω μέρος του λογισμικού και κάντε κλικ στο έργο VB6 που θέλετε να επεξεργαστείτε . Κάντε κλικ στο κουμπί " Άνοιγμα" για να φορτώσει όλα τα αρχεία κώδικα στο χώρο εργασίας .
Εικόνων 3

Κάντε διπλό κλικ στο αρχείο κώδικα στην λίστα των αρχείων VB6 . Τα φορτία κώδικα στο πρόγραμμα επεξεργασίας . Μετακινηθείτε προς τα κάτω το αρχείο στη θέση όπου θέλετε να μετατρέψετε μια μεταβλητή σε ακέραιο
Η

4 Πληκτρολογήστε τον ακόλουθο κώδικα για να ρίχνει σε ένα ακέραιο : .

Dim αριθμό As Integer
Αριθμός

= CInt ( " 0 " )

Ο παραπάνω κώδικας ρίχνει την τιμή string " 0 " σε ένα ακέραιο αριθμό . Ο αριθμός για τον "αριθμό " μεταβλητή .
Η
εικόνων