300
301
302
303 '读取歌曲流派信息
304
305 _GenreID = BinReader.ReadByte
306
307
308
309 End If
310
311
312
313 BinReader.Close()
314
315 msfile.Close()
316
317
318
319 End Function
320
321
322
323 '用于转换编码, 防止出现中文乱码
324
325 Private Function CBytesToString(ByVal Bytes() As Byte) As String
326
327 '注意这里 需要对编码进行处理, 防止出现乱码
328
329 Dim GbCode As Encoding = Encoding.GetEncoding("gb2312")
330
331 If Bytes.Length > 0 Then
332
333 Return GbCode.GetString(Bytes)
334
335 Else
336
337 Return String.Empty
338
339 End If
340
341 End Function
我们可以用一个简单的Console程序来说明,如何使用Mp3Info类。使用Visual Studio 2005 Express,创建一个Console程序:
1 Module Module1
2
3
4
5 Sub
6
7
8
9 Dim Mp3 As New Mp3Info("D:\Music\Top 40 Singles\39 Embrace - Natures Law.mp3")
10
11
12
13 Console.WriteLine("Title : " Mp3.Title)
14
15 Console.WriteLine("Artist: " Mp3.Artist)
16
17 Console.WriteLine("Album : " Mp3.Album)
18
19 Console.Read()
20
21 End Sub
22
23
24 End Module
运行该程序后输出为:
Title : Nature's Law
Artist: Embrace
Album : DHZ.INC
Genre : Blues
本文只针对mp3的ID3v1进行了讨论,而实际上很多mp3不仅仅包含ID3v1的信息,还包含ID3v2的信息。
但ID3v2要比ID3v1复杂,对于ID3v2的处理,要等下次有空的时候再写了。
文章整理:西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!




