Đoạn âm thanh tự động (Microsoft Word)
Tài liệu Word có thể chứa nhiều hơn một chút so với văn bản. Bạn cũng có thể bao gồm các đối tượng đồ họa và đa phương tiện, chẳng hạn như clip âm thanh. Cách thông thường mà bạn phát một clip âm thanh là nhấp đúp vào biểu tượng của nó trong tài liệu. Điều gì sẽ xảy ra nếu bạn muốn đoạn âm thanh bắt đầu phát khi bạn mở tài liệu lần đầu tiên mà không cần nhấp đúp?
Cách tốt nhất để tiếp cận vấn đề này là sử dụng macro. Bạn có thể dễ dàng tạo một macro tự động chạy khi bạn mở tài liệu và macro có thể phát tệp âm thanh. Sau đây là một macro rất đơn giản thực hiện điều đó:
Private Sub Document_Open() ThisDocument.InlineShapes(1).Select Selection.InlineShapes(1).OLEFormat.DoVerb VerbIndex:=wdOLEVerbPrimary End Sub
Macro giả định rằng đoạn âm thanh là đối tượng đầu tiên được chèn vào nội dòng trong tài liệu của bạn. Nếu không, bạn sẽ cần tìm ra số chỉ mục cho clip, trong bộ sưu tập InlineShapes và sử dụng giá trị chỉ mục đó trong macro.
Trung tâm của macro sử dụng phương thức DoVerb, là một cách chung để thực hiện các hành động khác nhau trên một đối tượng OLE (trong trường hợp này là tệp âm thanh). Tham số VerbIndex xác định hành động được thực thi.
Trong cách sử dụng này, VerbIndex được đặt bằng wdOLEVerbPrimary, có nghĩa là “hành động chính cho đối tượng OLE thuộc loại này.” Vì đây là tệp âm thanh nên thao tác chính là phát tệp đó.
Có lẽ một cách tiếp cận tốt hơn là sử dụng khả năng đánh dấu của Word để làm lợi thế cho bạn. Bạn có thể sử dụng dấu trang để xác định đoạn âm thanh bạn muốn phát, sau đó sử dụng thông tin đó trong macro để xác định nội dung được phát. Hãy xem xét macro sau:
Private Sub Document_Open() Selection.GoTo What:=wdGoToBookmark, Name:="WavSound" Selection.InlineShapes(1).OLEFormat.DoVerb VerbIndex:=wdOLEVerbPrimary End Sub
Macro này cũng giả định rằng đoạn âm thanh được đặt nội tuyến trong tài liệu của bạn. Tuy nhiên, clip nên được đánh dấu bằng tên WavSound. Macro chọn dấu trang đó (đoạn âm thanh) và phát nó bằng phương thức DoVerb.
Các phương pháp này hoạt động tốt nếu bạn muốn phát đoạn âm thanh là một phần của tài liệu của bạn. Bạn có thể muốn phát một đoạn âm thanh không phải là một phần của tài liệu. Bằng cách đó, biểu tượng của clip âm thanh sẽ không xuất hiện trong tài liệu và làm rối tung giao diện của tài liệu.
Cách bạn thực hiện điều này là yêu cầu Windows API phát âm thanh cho bạn. Phương pháp này hoạt động khi bạn muốn truy cập tệp âm thanh mà bạn biết đã có trên máy tính, miễn là hệ thống cũng đã cài đặt Windows Media Player. Ví dụ sau sẽ hoạt động trên hệ thống Windows XP. (Macro có thể hoạt động hoặc không hoạt động trên hệ thống Vista, tùy thuộc vào cách hệ thống được cấu hình.)
Private Declare Function PlaySound Lib "winmm.dll" _ Alias "PlaySoundA" (ByVal IpszName As String, _ ByVal hModule As Long, ByVal dsFlags As Long) As Long Private Sub Document_Open() PlaySound "c:\windows\media\tada.wav", ByVal0&, &H1 End Sub
Macro Document_Open chạy khi tài liệu được mở, nhưng nó gọi hàm PlaySound. Hàm này được định nghĩa trong khai báo riêng tư như một bí danh cho phương thức PlaySoundA của winmm.dll. Phương pháp này không tự khởi chạy trình phát đa phương tiện và nó không chèn bất kỳ thứ gì vào nội dung của tài liệu.
_Lưu ý: _
Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên các trang WordTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.
WordTips là nguồn của bạn để đào tạo Microsoft Word hiệu quả về chi phí.
(Microsoft Word là phần mềm xử lý văn bản phổ biến nhất trên thế giới.) Mẹo này (3902) áp dụng cho Microsoft Word 97, 2000, 2002 và 2003.