Πώς να δημιουργήσετε ένα ημιτονοειδές κύμα Χρήση της Visual Basic 5 Κωδικός

Η Visual Basic 5 γλώσσα έχει γεωμετρικές λειτουργίες που σας επιτρέπουν να δημιουργήσετε εικόνες τριγωνομετρία όπως το ημιτονοειδές κύμα . Το ημιτονοειδές κύμα χρησιμοποιείται για την ηλεκτρονική , τη φυσική και τη μουσική . Μπορείτε να χρησιμοποιήσετε τη λειτουργία " π" με τη λειτουργία " αμαρτία " για να δημιουργήσετε ένα ημιτονοειδές κύμα . Μπορείτε να εμφανίσετε το κύμα σε μια προσαρμοσμένη μορφή Visual Basic των Windows , μια ιστοσελίδα ή σε ένα πρόγραμμα , όπως το Excel . Οδηγίες
Η

1 Ανοίξτε το πρόγραμμα επεξεργασίας της Visual Basic και να ανοίξει το πρόγραμμα στο οποίο θέλετε να εμφανίσετε ένα ημιτονοειδές κύμα εικόνα . Εάν θέλετε να εμφανίσετε την εικόνα στο Excel , κάντε κλικ στο κουμπί " VBA " στην καρτέλα "Προγραμματιστής " ή κορδέλα του Excel . 2

Δημιουργήστε το ορισμό της συνάρτησης . Ο κώδικας θα δημιουργήσει εκείνο το οποίο καθιστά το ημιτονοειδές κύμα τοποθετείται εντός ορισμό της συνάρτησης . Ο παρακάτω κώδικας δημιουργεί τον ορισμό :

createSingWave Λειτουργία ( t , Vp , ​​fo , Phase , Vdc ) End Function
εικόνων 3

Δημιουργήστε μια μεταβλητή pi και να ορίσετε τη μεταβλητή η τιμή του pi . Πρέπει να στρογγυλοποιεί την τιμή pi με τον αριθμό των δεκαδικών ψηφίων που θέλετε να χρησιμοποιήσετε . Ο κώδικας που ακολουθεί γύρους pi σε 3,14 :

Dim pi Όπως Doublepi = 3.14
Η 4

Προσθέστε τη λειτουργία VB " αμαρτία " για να δημιουργήσετε το ημιτονοειδές κύμα . Ο παρακάτω κώδικας δημιουργεί το κύμα :

sinewave = Vp * Sin ( 2 * pi * fo * t + Φάση * pi /180 ) + Vdc
Η
εικόνων