1 Κάντε κλικ στην καρτέλα "Προγραμματιστής " και κάντε κλικ στο " Visual Basic" για να ανοίξετε το Microsoft Visual Basic. . Κάντε κλικ στο "Εισαγωγή" μενού και κάντε κλικ στο " Ενότητα " για να προσθέσετε μια νέα ενότητα 2
Δημιουργήστε μια νέα διαδικασία υπο πληκτρολογώντας τον ακόλουθο κώδικα VBA :
Private Sub changeWord ( )
εικόνων 3
Δημιουργήστε μεταβλητή συμβολοσειράς σας, πληκτρολογώντας τα εξής :
Dim stringVar Όπως String
stringVar = " . Σήμερα είναι Sunday"
4
Χρησιμοποιήστε τη λειτουργία "Αντικατάσταση" για να αλλάξετε το " Sunday" σε "Δευτέρα" , χρησιμοποιώντας την ακόλουθη γραμμή κώδικα :
stringVar = Αντικατάσταση ( stringVar , "Sunday " , "Δευτέρα" )
5
Πληκτρολογήστε το ακόλουθα για να τερματίσετε τη διαδικασία υπο σας :
MsgBox ( stringVar )
End Sub
Η
6 Πατήστε το πλήκτρο " F5 " να εκτελέσετε τη διαδικασία .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα