MP3是音頻文件,DAT是VCD視頻文件。
成都創新互聯專業為企業提供岳陽網站建設、岳陽做網站、岳陽網站設計、岳陽網站制作等企業網站建設、網頁設計與制作、岳陽企業網站模板建站服務,十年岳陽做網站經驗,不只是建網站,更提供有價值的思路和整體網絡服務。
說實話轉起來很難。不過如果你一定要轉成DAT,可以導入MP3文件到視頻制作軟件中(比如會聲會影或Premiere),MP3文件放在音軌中,視頻軌中加入一些圖片,這樣能行。
如果你想制作的是可以在VCD機上播放的東西,把MP3文件刻錄成CD光盤就可以了。
你的問題只有這兩個辦法。
這個不能無發轉,DAT這個格式是一些軟件存的數據,不同的軟件的編碼不一樣,而且DAT格式還有VCD光盤中的視頻也是這個格式,部分軟件的數據也采用這種格式,所以轉不了。視頻到還可以,其它的就不行了。
這個做法應該是圖方便的加密解密做法。按你的C#代碼來改的話是這樣的。
'Imports System.IO
Public Function MapPath(ByVal virtualPath As String) As String
' Return System.Web.Hosting.MapPath(virtualPath)
' 猜想是這個 MapPath 函數
' 如果不是那就自己還原原來C#代碼里的那個MapPath
End Function
Public Sub GetImage()
Dim s As System.IO.Stream = System.IO.File.Open(MapPath("33.jpg"), System.IO.FileMode.Open)
Dim leng As Integer = 0
If s.Length Int32.MaxValue Then
leng = s.Length
End If
Dim by(leng) As Byte
s.Read(by, 0, leng) ' 把圖片讀到字節數組中
s.Close()
Dim str As String = Convert.ToBase64String(by) ' 把字節數組轉換成字符串
Dim sw As System.IO.StreamWriter = System.IO.File.CreateText(MapPath("11.txt")) ' 存入11.txt文件
sw.Write(str)
sw.Close()
sw.Dispose()
End Sub
' 把字符串還原成圖片
Public Sub CreateImg()
Dim sr As New System.IO.StreamReader(MapPath("11.txt"))
Dim s As String = sr.ReadToEnd()
sr.Close()
Dim buf As Byte() = Convert.FromBase64String(s) ' 把字符串讀到字節數組中
Dim ms As New System.IO.MemoryStream(buf)
Dim img As System.Drawing.Image = System.Drawing.Image.FromStream(ms)
img.Save(MapPath("12.jpg"), System.Drawing.Imaging.ImageFormat.Jpeg)
ms.Close()
ms.Dispose()
End Sub
網站名稱:vb.net圖片轉DAT vb實現圖片旋轉
標題鏈接:http://vcdvsql.cn/article36/ddcohsg.html
成都網站建設公司_創新互聯,為您提供網站策劃、手機網站建設、搜索引擎優化、自適應網站、外貿建站、域名注冊
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯