Tặng công cụ chơi nhạc MP3 với Excel VBA (phần 2 - Final Version) (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

Hoàng Trọng Nghĩa

Chuyên gia GPE
Thành viên BQT
Moderator
Tham gia
17/8/08
Bài viết
8,662
Được thích
16,720
Giới tính
Nam
Từ topic này:

http://www.giaiphapexcel.com/forum/showthread.php?107903-Tặng-công-cụ-nghe-nhạc-MP3-với-VBA

đến nay đã hơn 56 bài rồi, tôi thấy cần phải chuyển qua topic mới để các bạn không nhầm lần với các phiên bản cũ hơn.

attachment.php


Với cải tiến lần này:

1) Giao diện được thay đổi đẹp mắt.

2) Có chức năng lựa chọn bản nhạc mình muốn nghe.

3) Các thanh thời lượng bài hát, thanh volume được thay thế từ các scrollbar bằng những Label được thiết kế tinh vi và đẹp mắt.

4) Và nhiều tiện ích khác.

attachment.php


Bạn rê chuột trên thanh thời lượng, "hạt đậu" sẽ mập ú lên để bạn dễ dàng kéo qua kéo lại thời điểm mà bạn muốn nghe. Bạn cũng không nhất thiết nắm vào "hạt đậu" đó, trên thành đó bạn click vào điểm nào thì "hạt đậu" sẽ chạy đến điểm đó và nhạc sẽ chơi vào thời điểm đó (tương tự với thanh Volume).

Chúc các bạn thưởng thức công cụ chơi nhạc MP3 này. Excel không quá khô khan phải không các bạn!

==========================================

Đã thay file cũ bị lỗi, các bạn tải file lại nhé.
 

File đính kèm

  • Mp3PlayerV5.jpg
    Mp3PlayerV5.jpg
    131 KB · Đọc: 72
  • PlayerV5.jpg
    PlayerV5.jpg
    116 KB · Đọc: 73
  • VBA_Player_V.5.xla
    VBA_Player_V.5.xla
    187 KB · Đọc: 62
Lần chỉnh sửa cuối:
OK, định nghĩa cho mình từ Bit Rate bằng tiếng Việt đi (tiêu chí là ngắn, gọn, dễ hiểu), mình thêm 1 checkbox để biến chúng thành English hay Tiếng Việt ngay và luôn!
riêng chỗ đó thì không cần phải có Caption
chỉ cần 320Kbps là đủ
hoặc nếu cần thì là Chất lượng : 320Kbps . tuy chưa sát nghĩa nhưng em nghĩ cũng có thể chấp nhận
 
Upvote 0
Anh Nghĩa còn bận rộn lắm, chắc chưa "dứt điểm" được đâu, hehe ...
Em đang định đề xuất tách List bài hát ra làm 3~5 cột: Bài hát, Album, Sáng tác, Trình bày, ...
---
Đang chơi bài: SANG THU DAM VINH HUNG ... ẹc ẹc ...
 
Upvote 0
phải nói nghĩa viết hay thiệt.... nâng cấp thêm một khúc nữa là:

Có cách nào khi mình chọn các file mp3 trong folder xong Enter một cái là mặc định nó chơi nhạc luôn thay cho Windows media được không...

Ý mình là nó chạy mặc định luôn trên Window mà không cầm gọi thông qua Form Excel...
Ý trời, không thần thánh hóa như thế được đâu nha, Excel chứ có phải phần mềm nghe nhạc đâu trời!
 
Upvote 0
riêng chỗ đó thì không cần phải có Caption
chỉ cần 320Kbps là đủ
hoặc nếu cần thì là Chất lượng : 320Kbps . tuy chưa sát nghĩa nhưng em nghĩ cũng có thể chấp nhận
Tôi nghĩ từ này nó ngang ngửa với từ Speed (tốc độ) bởi nó là số bit trên mỗi giây (the number of bits per second). Ta có thể tạm dịch là TỐC ĐỘ.
 
Upvote 0
Upvote 0
Cái gì so sánh với thời gian thì người ta dùng tốc độ chứ? Chất lượng thì so với Cục tiêu chuẩn đo lường --=0
Các từ "năng suất", "định mức", ... cũng thường so sánh với thời gian đó anh.
Một bài hát có "tốc độ" 128Kbps và một bài hát có "tốc độ" 320Kbps thì bài hát nào nghe nó "đẽ" (chất lượng) hơn?
 
Upvote 0
Các từ "năng suất", "định mức", ... cũng thường so sánh với thời gian đó anh.
Một bài hát có "tốc độ" 128Kbps và một bài hát có "tốc độ" 320Kbps thì bài hát nào nghe nó "đẽ" (chất lượng) hơn?
Chả biết, nhưng bác Google dịch như thế này:
 

File đính kèm

  • Bitrate.jpg
    Bitrate.jpg
    20.8 KB · Đọc: 19
Upvote 0
Anh Nghĩa còn bận rộn lắm, chắc chưa "dứt điểm" được đâu, hehe ...
Em đang định đề xuất tách List bài hát ra làm 3~5 cột: Bài hát, Album, Sáng tác, Trình bày, ...
---
Đang chơi bài: SANG THU DAM VINH HUNG ... ẹc ẹc ...
Cái này làm được à nha, nhưng mở file lên sẽ hơi lâu à! Bởi nó check từng mục trong properties của mỗi file, chỉ sợ là người tạo file họ không điền đầy đủ thông tin mà thôi.

Trong file anh có câu lệnh:

shellfolder.GetDetailsOf(shellfile, 27) đây chính là thời lượng của nó, chẳng hạn 5:30

Nó có Index từ 0 đến 29, hãy xem thử xem thông một file bài hát sẽ như thế nào nhé.

0 ) Yeu Tieng Hat Ngay Xua
1 ) 4.40 MB
2 ) MP3 Format Sound
3 ) 25/11/2006 01:40
4 ) 25/05/2013 12:32
5 ) 25/05/2013 12:32
6 ) A
7 )
8 )
9 ) Audio
10 ) S-1-5-21-1437153745-842104694-240351290-1001
11 ) Music
12 )
13 ) Nhu Quynh
14 ) TNCD383 Noi Buon Hoa Phuong
15 )
16 ) Other
17 )
18 )
19 ) Unrated
20 ) Nhu Quynh
21 ) Yeu Tieng Hat Ngay Xua
22 )
23 )
24 )
25 )
26 ) 6
27 ) 00:04:48
28 ) ?128kbps
29 ) No
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom