1 Ανοίξτε το Notepad και να δημιουργήσετε ένα νέο έγγραφο 2
Επικολλήστε τον παρακάτω κώδικα ΗΤΑ στο έγγραφο : .
Sub ReverseText
Δημ. currentText
Δημ. reversedText
currentText = TextArea1.Value
reversedText = StrReverse ( currentText )
TextArea2.Value = reversedText
End Sub
?
Αυτή είναι μια βασική εφαρμογή HTA . Η
τμήμα ορίζει δύο μάρτυρες textarea . Αυτά δημιουργούν πλαίσια εισόδου . Η « TextArea1 " κουτί χρησιμεύει ως ένα πλαίσιο εισαγωγής. Αυτό είναι όπου μπορείτε να εισάγετε κείμενο . Οι " TextArea2 " λειτουργεί σαν ένα κουτί κουτί εξόδου . Εμφανίζει πίσω το κείμενό σας μετά το πρόγραμμα που αντιστρέφει . Το κουμπί καλεί την υπο VBScript που αντιστρέφει το κείμενο . Πατήστε το " Ctrl " και " Αποθήκευση" για να ανοίξει το "Αποθήκευση ως " παράθυρο Πληκτρολογήστε τα ακόλουθα στο "Όνομα αρχείου " κουτί κειμένου : .
ReverseText . hta
Κάντε κλικ στο " Αποθήκευση" για να αποθηκεύσετε αυτό το αρχείο ως εφαρμογή HTA .
Η
4 Πατήστε το κλειδί σας "Windows" και "E " για να ξεκινήσει τα Windows Explorer. Μετά ανοίγει , εντοπίστε το αρχείο ΗΤΑ αποθηκεύσατε και κάντε διπλό κλικ σε αυτό . ανοίγει ένα παράθυρο που ονομάζεται " Αντίστροφη κειμένου" . ένα κουτί εμφανίζεται στο πάνω μέρος της φόρμας ένα πλαίσιο κειμένου εξόδου εμφανίζεται κάτω από αυτό .
5
Τύπος οποιοδήποτε κείμενο μέσα στο πλαίσιο εισαγωγής και κάντε κλικ στο κουμπί " Αντίστροφη κειμένου" . Ο κωδικός αντιστρέφει το κείμενο και το τοποθετεί στο κουτί εξόδου σας .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα