- Tham gia
- 17/8/08
- Bài viết
- 8,662
- Được thích
- 16,720
- Giới tính
- Nam
Qua nay rảnh rỗi sinh nông nổi, ngồi viết cả đêm không ngủ để có đồ chơi này. Xin đừng so sánh với các công cụ nghe nhạc có sẳn như Media Player hoặc nhúng nó vào Excel, mọi sự so sánh đều khập khiểng. Ở đây mô phỏng cái na ná như thế để tặng mọi người giải trí khi trà dư tửu hậu. Có thể viết code còn rườm rà, nhưng đã cố gắng hết sức rồi.
Với các dạng nhạc, để cho chúng chạy hết một cái list tôi nghĩ là cả một vấn đề, nhưng sau khi xem file này các bạn sẽ cảm thấy dễ dàng thực hiện điều đó.
Khi tải file về, mở file thì nó ló cái mặt nó ra như trong hình đấy (nhưng chưa có đường dẫn, chưa có list nhạc đâu nha).
Bấm vào nút Tìm Thư Mục và chọn một thư mục nào đó có chứa nhạc với đuôi *mp3.
Bấm nút Tải Tên Bài Hát, lúc này list nhạc nó mới hiện lên xanh lè như cái hình.
(Sau khi đã có list nhạc, đường dẫn, lần mở sau, đảm bảo nó hiện lên như vậy luôn, khỏi bấm biếc gì hết, trừ khi muốn tìm thư mục nhạc khác).
Nếu muốn chơi chỉ 1 bài, check vào nút Chơi một bài, sau đó bấm Chơi Nhạc, nó chạy hết bản nhạc là nó dừng, còn không thì đừng check, nó sẽ chơi hết list nhạc.
Khi nó chơi đến bản nhạc nào thì ListBox nó sẽ hiển thị select tại bài đó.
Nếu muốn Volume lớn nhỏ? Thanh scrollbar nằm ngang sẽ giải quyết được vấn đề.
Đang nghe nhạc có điện thoại? Mute đó mà check vô!
Dĩ nhiên cũng như các Player chuyên nghiệp, cái tên này nó cũng có nút Tạm Ngưng sau khi ta bấm Chơi Nhạc, muốn chạy tiếp chỉ việc bấm lại nút đó.
Và khi muốn nghe bản nhạc nào trong list, chỉ cần double click vào nó là xong!
Thôi, quảng cáo nhiều quá, xem file đi các bạn ơi.
P/s: Trong file có mượn một hàm tự tạo của Thầy ndu96081631: FilesFoldersList, xin cám ơn Thầy.
''===========================================================
VBA Password là HoangTrongNghia.
Update file mới nhất: VBA_Player_V.5.xla
Cập nhật các mục:
- Tạo file AddIn để chạy nhạc, không tự động show form, tạo ToolBar trên Menu hoặc Ribbon, muốn chơi thì click.
- ComboBox list các thư mục chứa nhạc, tự động xóa những thư mục không chứa nhạc *mp3
- Bài đang hát - Tên ca sĩ
- Thanh trạng thái vị trí bản nhạc, kéo phải kéo trái nhạc sẽ chạy ở vị trí đó.
- Bit rate.
Với các dạng nhạc, để cho chúng chạy hết một cái list tôi nghĩ là cả một vấn đề, nhưng sau khi xem file này các bạn sẽ cảm thấy dễ dàng thực hiện điều đó.
Khi tải file về, mở file thì nó ló cái mặt nó ra như trong hình đấy (nhưng chưa có đường dẫn, chưa có list nhạc đâu nha).
Bấm vào nút Tìm Thư Mục và chọn một thư mục nào đó có chứa nhạc với đuôi *mp3.
Bấm nút Tải Tên Bài Hát, lúc này list nhạc nó mới hiện lên xanh lè như cái hình.
(Sau khi đã có list nhạc, đường dẫn, lần mở sau, đảm bảo nó hiện lên như vậy luôn, khỏi bấm biếc gì hết, trừ khi muốn tìm thư mục nhạc khác).
Nếu muốn chơi chỉ 1 bài, check vào nút Chơi một bài, sau đó bấm Chơi Nhạc, nó chạy hết bản nhạc là nó dừng, còn không thì đừng check, nó sẽ chơi hết list nhạc.
Khi nó chơi đến bản nhạc nào thì ListBox nó sẽ hiển thị select tại bài đó.
Nếu muốn Volume lớn nhỏ? Thanh scrollbar nằm ngang sẽ giải quyết được vấn đề.
Đang nghe nhạc có điện thoại? Mute đó mà check vô!
Dĩ nhiên cũng như các Player chuyên nghiệp, cái tên này nó cũng có nút Tạm Ngưng sau khi ta bấm Chơi Nhạc, muốn chạy tiếp chỉ việc bấm lại nút đó.
Và khi muốn nghe bản nhạc nào trong list, chỉ cần double click vào nó là xong!
Thôi, quảng cáo nhiều quá, xem file đi các bạn ơi.
P/s: Trong file có mượn một hàm tự tạo của Thầy ndu96081631: FilesFoldersList, xin cám ơn Thầy.
''===========================================================
VBA Password là HoangTrongNghia.
Update file mới nhất: VBA_Player_V.5.xla
Cập nhật các mục:
- Tạo file AddIn để chạy nhạc, không tự động show form, tạo ToolBar trên Menu hoặc Ribbon, muốn chơi thì click.
- ComboBox list các thư mục chứa nhạc, tự động xóa những thư mục không chứa nhạc *mp3
- Bài đang hát - Tên ca sĩ
- Thanh trạng thái vị trí bản nhạc, kéo phải kéo trái nhạc sẽ chạy ở vị trí đó.
- Bit rate.
File đính kèm
Lần chỉnh sửa cuối:
