Προγραμματισμός

* Γνώση Υπολογιστών >> Προγραμματισμός >> Visual Βασικά Προγραμματισμός

Πώς να δημιουργήσετε έναν κωδικό πρόσβασης χρησιμοποιώντας VB6

VB6 είναι μια γλώσσα προγραμματισμού που δημιουργήθηκε από τη Microsoft που χρησιμοποιείται για την ανάπτυξη ισχυρών προγραμμάτων . VB6 προέρχεται από το αρχικό γλώσσας προγραμματισμού BASIC . Σύνταξη VB6 είναι απλή και γρήγορη για να μάθουν . Ακόμα κι αν η γλώσσα είναι απλούστερη από ό, τι άλλες γλώσσες , VB6 περιέχει μερικές από τις ίδιες δομές , όπως μαθήματα , διαδικασίες , βρόχους και υπό όρους δηλώσεις . Οι δηλώσεις υπό όρους που χρησιμοποιούνται για τη λήψη αποφάσεων που βασίζονται σε διαφορετικές εκβάσεις στα προγράμματά σας . Για παράδειγμα , μπορείτε να δημιουργήσετε ένα πρόγραμμα που χρησιμοποιεί όρους δηλώσεις , όπως το " if then else " δήλωση για να εισάγετε έναν κωδικό πρόσβασης και στη συνέχεια ελέγξτε για την ορθή και εσφαλμένες καταχωρήσεις . Οδηγίες
Η 1

Ανοίξτε Visual Basic 6 . 2

Επιλέξτε "Standard EXE " από τη νέα λίστα των έργων .
Εικόνων 3

Πηγαίνετε στην επάνω γραμμή μενού , κάντε κλικ στο " Project" και στη συνέχεια κάντε κλικ στο κουμπί " Προσθήκη Module . " Αυτό θα προσθέσει μια τυπική λειτουργική μονάδα κώδικα στο έργο VB6 σας
Η 4

Πληκτρολογήστε ή αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στο Module : .

Sub VBPassword ( )

Dim realpassword Όπως String Dim

getpassword Όπως String

realpassword = " password1 "

getpassword = InputBox ( " ό, τι είναι ο κωδικός ; " )

Αν getpassword = realpassword τότε

MsgBox ( "Right κωδικό . » )

υπόλοιπα

MsgBox ( " Λάθος κωδικός πρόσβασης , προσπαθήστε ξανά." )

End If

End Sub
5

Πατήστε το " F5 " για να εκτελέσετε το πρόγραμμα . Θα πάρετε ένα πλαίσιο εισόδου ζητά έναν κωδικό πρόσβασης . Εάν πληκτρολογήσετε τον σωστό κωδικό πρόσβασης , το οποίο είναι " password1 , " ένα πλαίσιο μηνύματος θα πει "Right κωδικό πρόσβασης. " Αν εισάγετε κάτι άλλο εκτός από password1 , θα πάρετε ένα κουτί μήνυμα που λέει " Λάθος κωδικός πρόσβασης , δοκιμάστε ξανά . "
Η
εικόνων

Συναφής σύστασή

Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα