Πώς να Ελέγξτε για δίσκο Χρησιμοποιώντας VB

Έλεγχος αν υπάρχει μια μονάδα δίσκου, το φάκελο ή το αρχείο είναι μέρος του desktop εφαρμογές προγραμματισμού σε Visual Basic . Η γλώσσα Visual Basic έχει εσωτερικές λειτουργίες που σας επιτρέπουν να ελέγχετε την ύπαρξη ενός σκληρού δίσκου με μόνο λίγες γραμμές κώδικα . Αυτό είναι απαραίτητο αν θέλετε να καθορίσει εάν ο χρήστης έχει μια αντιστοιχισμένη μονάδα δίσκου ή το γράμμα τοπικής σκληρό δίσκο υπάρχει . Για παράδειγμα , ίσως να θέλετε να ελέγξετε ότι υπάρχει το "C" drive . Οδηγίες
Η

1 Κάντε διπλό κλικ φόρμα της Visual Basic σας . Αυτό φορτώνει αυτόματα Visual Basic κονσόλα σας και ανοίγει το αρχείο στον επεξεργαστή σας . 2

Μετακινηθείτε προς τα κάτω στην ενότητα του αρχείου σας , όπου θέλετε να ελέγξετε για τη μονάδα σας . Για την πρώτη γραμμή του κώδικα , θα πρέπει να δημιουργήσετε ένα " σύστημα αρχείων " μεταβλητή αντικειμένου . Η μεταβλητή περιέχει τις ιδιότητες και τις λειτουργίες που διαχειρίζονται τα αρχεία , φακέλους και δίσκους στον υπολογιστή. Πληκτρολογήστε τον ακόλουθο κώδικα στο αρχείο σας :

Set fs = CreateObject ( " Scripting.FileSystemObject " )
εικόνων 3

Ελέγξτε αν υπάρχει η μονάδα δίσκου και να εκχωρήσετε σε ένα Boolean μεταβλητή . Μια Boolean μεταβλητή περιέχει τις τιμές είτε αληθείς ή ψευδείς . Αυτό είναι το πώς μπορείτε να ελέγξετε για την ύπαρξη της μονάδας δίσκου . Αν η συνάρτηση επιστρέφει "true ", τότε υπάρχει η μονάδα . Πληκτρολογήστε τον ακόλουθο κώδικα :

drive_exists = fs.driveexists ( " C : \\ " )
Η 4

Δημιουργήστε ένα πλαίσιο μηνύματος που σας λέει αν υπάρχει η μονάδα . Αυτό είναι χρήσιμο όταν θέλετε να ελέγξετε την αξία της μεταβλητής . Χρησιμοποιώντας το " drive_exists " μεταβλητή στο βήμα τρία , ο κώδικας που ακολουθεί σας δείχνει εάν υπάρχει η μονάδα δίσκου :

MsgBox drive_exists
Η
εικόνων