 |
|
THỦ THUẬT |
|
Tạo macro đóng/mở ổ
CD-ROM từ các phần mềm trong bộ Office |
|
Với thủ thuật nhỏ này, bạn có thể đóng mở ổ CD từ
các phần mềm trong bộ MS Office một cách dễ dàng mà
không cần thêm bất kỳ một tiện ích nào. Trong ví dụ
dưới đây, tôi sử dụng MS Word 2002. Đối với các phần
mềm khác trong bộ Office, cách thực hiện cũng tương
tự.
Vào menu Tools\ Macro\ Visual Basic Editor. Nhấp
chuột phải lên Normal, chọn Insert\ Module. Sau đó,
bạn nhập đoạn mã sau đây vào. |
Declare Sub mciSendStringA Lib "winmm.dll" (ByVal _
lpstrCommand As String, ByVal lpstrReturnString As
Any, _
ByVal uReturnLength As Long, ByVal hwndCallback As
Long)
Sub CloseCD()
mciSendStringA "Set CDAudio Door Closed", 0&, 0, 0
End Sub
Sub OpenCD()
mciSendStringA "Set CDAudio Door Open", 0&, 0, 0
End Sub |
|
Lưu và đóng cửa sổ Visual Basic Editor lại. Vào menu
Tools\ Macros\ Macros, bạn sẽ có 2 macro là CloseCD
và OpenCD. Nhấn nút Run để chạy các macro này. Bây
giờ, bạn có thể kéo các macro này lên Toolbar và cài
đặt phím tắt cho chúng bằng cách vào menu Tools\
Customize. |
|
QUANG HẢI (Quảng Ngãi) |
|
|
|
|
|
|
