Πώς να μετατρέψετε έναν αριθμό σε μια ημερομηνία σε VB

Visual Basic ( VB ) γλώσσα προγραμματισμού είναι ισχυρή και ευέλικτη, ώστε να μετατρέψετε τα καθήκοντα που είναι δύσκολο να γίνουν πιο αποτελεσματικές . VB 2008 είναι μια εξέλιξη της γλώσσας Visual Basic που έχει σχεδιαστεί για τη δημιουργία παραγωγικά αντικειμενοστραφή προγράμματα . VB επιτρέπει στους προγραμματιστές να σχεδιάσουν για το Web , τα Windows και συσκευές χειρός . VB ενσωματώνεται στο Visual Studio , το ολοκληρωμένο περιβάλλον ανάπτυξης ( IDE ), στην οποία οι προγραμματιστές χρησιμοποιούν κατά τη δημιουργία εφαρμογών σε οποιαδήποτε γλώσσα για το " dot net" ( . Net ) πλαίσιο . Τα πράγματα που θα χρειαστείτε
Visual Studio εκφράζουν ή υψηλότερη
Η Εμφάνιση Περισσότερες οδηγίες
Η 1

Διάσταση ( DIM ), οι μεταβλητές που απαιτούνται σε όλο το πρόγραμμα . "Dim S Όπως String = Αριθμός" θέτει S ως μεταβλητή και θα κρατήσει τους αριθμούς και τα γράμματα . Αφού δημιουργηθεί S , θα είναι ίσο με "αριθμός ", η οποία είναι το σύνολο των αριθμών που θα πρέπει να μετατραπούν σε μια μορφή ημερομηνίας . Ένας αριθμός παράδειγμα για την εφαρμογή αυτή θα είναι 02.122.020 . 2

ΔΗΜ. D , M , Y As Integer . Οι μεταβλητές αυτές θα πραγματοποιήσει μια σειρά από -2.147.483.648 μέσω 2,147,483,647 . Αυτά πρόκειται να χρησιμοποιηθεί για να αναλύσει , ή να διαιρέσετε , τον αριθμό σε διψήφιο μήνα και την ημέρα και το έτος με τέσσερα ψηφία . Η S.Substring ( x , y ) λέει VB για να ξεκινήσει στη θέση x ( δείκτης έναρξης ) και καταλήγουν στο y (αριθμός των χαρακτήρων στο υποαλφαριθμητικού ) , αλλά να μη συμπεριληφθούν y στο αποτέλεσμα .
Εικόνων 3

Ορίστε τη μεταβλητή M = S.Substring ( 0 , 2 ) . Η μεταβλητή Μ θα ισούται από το απώτατο αριστερή θέση ( 0 ) και περιλαμβάνουν τους δύο πρώτοι αριθμοί . Στο παράδειγμά μας , Μ = 02 . ( Δείτε την ενότητα Συμβουλές για περαιτέρω επεξήγηση της θέσης . )
Η 4

Εκχώρηση της μεταβλητής D = S.Substring ( 2 , 2 ) . Η μεταβλητή Α θα ισούται με τον αριθμό από τρεις παρα δύο θέσεων . Για παράδειγμα , ο αριθμός μας είναι 02122020 , οπότε D = 12 .
5

Εκχώρηση τη μεταβλητή Y = S.Substring ( 4 , 4 ) . Η μεταβλητή Υ θα ισούται από τον αριθμό τέσσερα θέση στο τέλος των αριθμών ή τέσσερις θέσεις από την αρχή. Στο παράδειγμά μας , Y = 2020 .
Η 6

Εκτυπώστε το αποτέλεσμα στην οθόνη document.write ( CDate ( Μ , Δ , Υ ) ) .

Η