Πώς να ανοίξετε ένα αρχείο WMV σε VB

Ο καθένας μπορεί να παίξει έναν υπολογιστή με Windows Media Player αρχείο σε μια ιστοσελίδα με την προσθήκη ενός απλού "αντικείμενο " tag στον κώδικα HTML της σελίδας . Χρησιμοποιώντας στοιχεία COM , ωστόσο, μπορείτε να ενσωματώσετε ένα πραγματικό παίκτη WMV σε εφαρμογή VB σας . Προσθέτοντας ένα στοιχείο ελέγχου WMV σε μια φόρμα σας δίνει τη δυνατότητα να ελέγχουν την αναπαραγωγή αρχείων WMV . Microsoft Visual Studio κάνει το μεγαλύτερο μέρος του προγραμματισμού για εσάς . Το μόνο που έχετε να κάνετε είναι να σχεδιάσει διεπαφή χρήστη σας και το τσίμπημα μερικές γραμμές κώδικα . Οδηγίες
Δημιουργήστε το Interface

1

Κάντε κλικ στο "Start" κουμπί μενού των Windows και πληκτρολογήστε "Microsoft Visual Studio " στο πλαίσιο αναζήτησης . Το όνομα του προγράμματος θα εμφανιστεί στην κορυφή του μενού . Κάντε κλικ στο όνομα για να ξεκινήσει το πρόγραμμα . 2

Κάντε κλικ στο " Αρχείο" και επιλέξτε "New Project ".
Εικόνων 3

Κάντε κλικ στο " Visual Basic" και , στη συνέχεια, κάντε διπλό κλικ στο " Windows Forms . " Νέα αρχεία του έργου θα εμφανιστούν στο Navigator λύση για τη δεξιά πλευρά της οθόνης . Μια νέα μορφή των Windows θα εμφανιστεί στο κέντρο της οθόνης .
Η

4 Κάντε κλικ στο " Αρχείο" και επιλέξτε "Toolbox " για να ανοίξετε την εργαλειοθήκη που περιέχει στοιχεία ελέγχου .
5

κάντε δεξί κλικ οπουδήποτε στην εργαλειοθήκη . Θα εμφανιστεί ένα μενού . Κάντε κλικ στο " Choose Items " για να ανοίξετε το αναδυόμενο παράθυρο " Choose Toolbox Items " .
Η

6 Κάντε κλικ στην καρτέλα του παραθύρου " COM Components " και μετακινηθείτε στη λίστα των στοιχείων . Κάντε κλικ στο " Windows Media Player " να βάλει ένα σημάδι ελέγχου δίπλα στο στοιχείο και στη συνέχεια κάντε κλικ στο " OK " για να το προσθέσετε στην εργαλειοθήκη .
Η 7

Επιστροφή στην εργαλειοθήκη και κάντε διπλό κλικ στο " Windows Media Player . " Ο έλεγχος του Windows Media Player θα εμφανίζεται στη φόρμα . Visual Studio ονόματα ο έλεγχος " axWindowsMediaPlayer1 . " Μπορείτε να αναφερθείτε τον έλεγχο στον κώδικά σας χρησιμοποιώντας αυτό το όνομα .
8

Κάντε κλικ στο δεξιό κάτω άκρο της φόρμας , κρατήστε πατημένο το αριστερό πλήκτρο του ποντικιού σας και σύρετε το ποντίκι σας για να κάνετε τη φόρμα μεγαλύτερο .
Τετάρτη 9

Επιστροφή στην εργαλειοθήκη και κάντε διπλό κλικ στο " κουμπί ". Ένα κουμπί που ονομάζεται " Button1 " θα εμφανίζεται στη φόρμα . Κάντε δεξί κλικ στο " Button1 " και επιλέξτε " Ιδιότητες". Πληκτρολογήστε " Play" και πατήστε " Enter". Το κείμενο του κουμπιού θα αλλάξει σε " Play ".
Η 10

Επιστροφή στην εργαλειοθήκη και κάντε διπλό κλικ στο " κουμπί ". Ένα κουμπί που ονομάζεται " Button2 " θα εμφανίζεται στη φόρμα . Κάντε δεξί κλικ στο " Button2 " και επιλέξτε " Ιδιότητες". Πληκτρολογήστε "Stop " και πατήστε το πλήκτρο " Enter". Το κείμενο του κουμπιού θα αλλάξει σε "Stop ".
Εικόνων Tweak του κώδικα
Η 11

διπλό κλικ στη γραμμή τίτλου της φόρμας . Το παράθυρο κώδικα θα ανοίξει και θα εμφανίσει αυτόν τον κώδικα : Δημόσια Τάξη Φόρμα1
Η 12

Προσθέστε την ακόλουθη γραμμή κώδικα πάνω από τη γραμμή του κώδικα που φαίνεται στο προηγούμενο βήμα : Εισαγωγές WMPLib
Η 13

Κάντε δεξί κλικ σε μια κενή περιοχή στο παράθυρο κώδικα και κάντε κλικ στο " Προβολή Designer " για να δείτε ξανά τη φόρμα .
Η 14

κάντε διπλό κλικ στο κουμπί " Play" . Το παράθυρο κώδικα θα ανοίξει και θα εμφανίσει αυτόν τον κώδικα :

Private Sub Button1_Click ( ByVal αποστολέα Όπως System.Object , ByVal e Όπως System.EventArgs ) Λαβές Button1.Click End Sub
Η 15

Τοποθετήστε αυτόν τον κώδικα πριν από το " End Sub " δήλωση:

axWindowsMediaPlayer1.URL = "c : \\ mySong.wmv " ?

Αντικαταστήστε το " c : \\ mySong.wmv " με τη θέση ενός Windows Media Player αρχείο στο σκληρό σας δίσκο . Για παράδειγμα , εάν το αρχείο είναι σε " c : \\ μουσική \\ flowers.wmv , " η δήλωση θα φαίνεται σαν αυτό :

axWindowsMediaPlayer1.URL = "c : \\ μουσική \\ flowers.wmv "

16

δεξί κλικ οπουδήποτε στο παράθυρο κώδικα και κάντε κλικ στο " Προβολή Designer " για να επιστρέψετε στη φόρμα .
Η 17

κάντε διπλό κλικ στο "Stop ". κουμπί . Κωδικός του θα εμφανιστεί στο παράθυρο κώδικα , όπως φαίνεται εδώ :

Private Sub Button2_Click ( ByVal αποστολέα Όπως System.Object , ByVal e Όπως System.EventArgs ) Λαβές Button2.Click

End Sub
Τετάρτη 18

Προσθέστε αυτήν τη γραμμή κώδικα πριν από το "End Sub" δήλωση:

axWindowsMediaPlayer1.Ctlcontrols.stop ( )
Η 19

Πατήστε το πλήκτρο " F5 " για να εκτελέσετε το έργο . Η φόρμα θα ανοίξει και θα εμφανίσει το στοιχείο ελέγχου του Windows Media Player .
20

Κάντε κλικ στο " Play" για να παίξει το αρχείο που έχετε επιλέξει . Κάντε κλικ στο κουμπί " Stop" για να σταματήσει η αναπαραγωγή .
Η
εικόνων