Πώς να μετατρέψει Standard Time Into Δεκαδικοί χρόνο με Visual Basic

Πρότυπο του χρόνου μπορεί να μετατραπεί σε δεκαδικό χρόνο χρησιμοποιώντας ενσωματωμένες συναρτήσεις της Visual Basic του . Visual Basic λειτουργεί τόσο με την ημερομηνία και την ώρα μαζί . Δεν είναι δυνατόν να διαχωριστούν την ημερομηνία και την ώρα σε δύο διαφορετικές ανεξάρτητες τιμές που μπορεί να χειριστεί ξεχωριστά. Αυτό σημαίνει ότι δεν υπάρχει ενιαία ενσωματωμένη λειτουργία που θα εκτελέσει το έργο της μετατροπής του χρόνου , αποκλειστικά . Ωστόσο , είναι ακόμα δυνατό να κάνετε τη μετατροπή χρησιμοποιώντας ενσωματωμένες συναρτήσεις της Visual Basic σε συνδυασμό με μια ενιαία γραμμή του υπολογισμού . Οδηγίες
Η 1

Αποθηκεύστε την ώρα που θέλετε σε μια μεταβλητή . Visual Basic έχει έναν τύπο Εστιακή δεδομένων η οποία χρησιμοποιείται για να αντιπροσωπεύσει Ημερομηνία και αξίες του χρόνου, όπως περιγράφεται στο " Murach της Visual Basic 2008 . " Χρησιμοποιήστε την εντολή Dim της Visual Basic για να κηρύξει την ώρα ως εξής : Dim DateOne Όπως Εστιακή = # 3:15:30 AM # Η ημερομηνία και ώρα που εκπροσωπούνται ως ένα ζευγάρι, το οποίο σημαίνει ότι αν δεν δώσετε μια ημερομηνία ή ώρα Visual Basic θα αντικαταστήσει τις τιμές αναφοράς που αντιπροσωπεύουν το μικρότερο ημερομηνία ή την ώρα . Ημερομηνία έναρξης της Visual Basic είναι 12:00 AM 1η Ιανουαρίου 0001 . Για παράδειγμα , αν τυπωμένο το παραπάνω προετοιμαστεί μεταβλητής στην οθόνη , θα πάρετε '1 /01 /0001 3:15:30 ' . 2

Μετατρέψτε τη μεταβλητή DateTime σε ένα δεκαδικό ημερομηνία και ώρα χρησιμοποιώντας το ενσωματωμένο ToOADate λειτουργία ( ) . Αυτή η ενσωματωμένη λειτουργία θα μετατρέψει το χρόνο σε ένα διπλό τύπο δεδομένων. Επισκεφθείτε http://msdn.microsoft.com για περισσότερες πληροφορίες. Για παράδειγμα , ο κώδικας για να μετατρέψει μια μεταβλητή DateTime σε ένα διπλό είναι : Dim adate Όπως Εστιακή = # 3:15:30 AM # Dim DbleTime As Double = ADate.ToOADate ( ) Console.WriteLine ( DbleTime ) Αυτό παράγει το επόμενο δεκαδικό ημερομηνία και ώρα: '0 0,1357638 ... » εικόνων
3

Απόσπασμα τη χειμερινή ώρα από αυτό το πλωτό αξία πολλαπλασιάζοντας την τιμή προς τα δεξιά της υποδιαστολής κατά 24 με τον ακόλουθο κώδικα : DbleTime * 24Οι αποτέλεσμα για αυτό το παράδειγμα πρέπει να είναι 3,25833 .
Η
εικόνων