Πώς να πει εάν μια τιμή κειμένου έχει αλλάξει σε Visual Basic

Visual Basic είναι μια γλώσσα προγραμματισμού που δημιουργήθηκε από τη Microsoft που μπορεί να υπερηφανεύεται για μια ισχυρή διασύνδεση ποντίκι με γνώμονα για το σχεδιασμό Graphical User Interface μορφές . Όπως πολλές σουίτες GUI προγραμματισμό , χρησιμοποιεί επίσης μια αλληγορία event-driven να αφορούν ενέργειες που ο χρήστης λαμβάνει , όπως η αλλαγή μιας τιμής κειμένου , με τον κωδικό . Σε αυτή τη μεταφορά , ο προγραμματιστής ορίζει τα γεγονότα , πράγματα που ο χρήστης ή άλλα μέρη του προγράμματος μπορεί να προσπαθήσει να κάνει , και καθορίζει το πώς θα ήθελε το πρόγραμμα να ανταποκριθεί σε αυτά τα γεγονότα . Κάθε στοιχείο έχει το δικό του προεπιλεγμένο συμβάν και το προεπιλεγμένο συμβάν για το στοιχείο ελέγχου πλαισίου κειμένου είναι η « TextChanged " εκδήλωση, η οποία ανάβει κάθε φορά που το κείμενο υπό τον έλεγχο μεταβάλλεται από το χρήστη . Οδηγίες
Η

1 Δημιουργήστε ένα νέο έργο κάνοντας κλικ στο " Αρχείο" και "New Project ". Αυτό θα σας παρουσιάσει μια κενή φόρμα GUI 2

Βρείτε το " Πλαίσιο κειμένου " ελέγχου στην εργαλειοθήκη και σύρετε δύο από αυτούς σε φόρμα σας : . Το πρώτο στην κορυφή και το δεύτερο στο κάτω μέρος .
εικόνων 3

κάντε διπλό κλικ στο πρώτο πλαίσιο κειμένου . Αυτό δημιουργεί ένα γεγονός που θα συμβεί κάθε φορά που η τιμή κειμένου για το πλαίσιο έχει αλλάξει. " . Textbox2_TextChanged " Βεβαιωθείτε ότι το όνομα της εκδήλωσης είναι " Textbox1_TextChanged » και όχι

Επικολλήστε τον παρακάτω κώδικα μέσα σε αυτήν :

Private Sub TextBox1_TextChanged ( ByVal αποστολέα Όπως System.Object , ByVal e Όπως System.EventArgs ) Λαβές TextBox1.TextChanged

TextBox2.Text = TextBox1.Text

End Sub
Όπως μπορείτε να δείτε , κάθε φορά που το κείμενο TextBox1 έχει αλλάξει, θα αντιγράψετε αυτές τις αλλαγές στο TextBox2
Η

4 κάντε διπλό κλικ στο άλλο κουτάκι και επικόλληση του κώδικα εντός του δημιούργησε εκδήλωση : .

Private Sub TextBox2_TextChanged ( ByVal αποστολέα Όπως System.Object , ByVal ε. Όπως System.EventArgs ) Λαβές TextBox2.TextChanged

TextBox1.Text = TextBox2.Text

End Sub

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