真实的国产乱ⅩXXX66竹夫人,五月香六月婷婷激情综合,亚洲日本VA一区二区三区,亚洲精品一区二区三区麻豆

成都創(chuàng)新互聯(lián)網(wǎng)站制作重慶分公司

vb.net圖片轉(zhuǎn)DAT vb實(shí)現(xiàn)圖片旋轉(zhuǎn)

如何把圖片文件轉(zhuǎn)換成dat格式?

MP3是音頻文件,DAT是VCD視頻文件。

成都創(chuàng)新互聯(lián)專(zhuān)業(yè)為企業(yè)提供岳陽(yáng)網(wǎng)站建設(shè)、岳陽(yáng)做網(wǎng)站、岳陽(yáng)網(wǎng)站設(shè)計(jì)、岳陽(yáng)網(wǎng)站制作等企業(yè)網(wǎng)站建設(shè)、網(wǎng)頁(yè)設(shè)計(jì)與制作、岳陽(yáng)企業(yè)網(wǎng)站模板建站服務(wù),十年岳陽(yáng)做網(wǎng)站經(jīng)驗(yàn),不只是建網(wǎng)站,更提供有價(jià)值的思路和整體網(wǎng)絡(luò)服務(wù)。

說(shuō)實(shí)話轉(zhuǎn)起來(lái)很難。不過(guò)如果你一定要轉(zhuǎn)成DAT,可以導(dǎo)入MP3文件到視頻制作軟件中(比如會(huì)聲會(huì)影或Premiere),MP3文件放在音軌中,視頻軌中加入一些圖片,這樣能行。

如果你想制作的是可以在VCD機(jī)上播放的東西,把MP3文件刻錄成CD光盤(pán)就可以了。

你的問(wèn)題只有這兩個(gè)辦法。

怎么把圖片文件轉(zhuǎn)換成dat格式的

這個(gè)不能無(wú)發(fā)轉(zhuǎn),DAT這個(gè)格式是一些軟件存的數(shù)據(jù),不同的軟件的編碼不一樣,而且DAT格式還有VCD光盤(pán)中的視頻也是這個(gè)格式,部分軟件的數(shù)據(jù)也采用這種格式,所以轉(zhuǎn)不了。視頻到還可以,其它的就不行了。

vb.net(2008)把圖片(或其它類(lèi)型文件)轉(zhuǎn)換成字符串存入.txt文件中,并從.txt中讀出生成圖片

這個(gè)做法應(yīng)該是圖方便的加密解密做法。按你的C#代碼來(lái)改的話是這樣的。

'Imports System.IO

Public Function MapPath(ByVal virtualPath As String) As String

' Return System.Web.Hosting.MapPath(virtualPath)

' 猜想是這個(gè) MapPath 函數(shù)

' 如果不是那就自己還原原來(lái)C#代碼里的那個(gè)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) ' 把圖片讀到字節(jié)數(shù)組中

s.Close()

Dim str As String = Convert.ToBase64String(by) ' 把字節(jié)數(shù)組轉(zhuǎn)換成字符串

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) ' 把字符串讀到字節(jié)數(shù)組中

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


新聞標(biāo)題:vb.net圖片轉(zhuǎn)DAT vb實(shí)現(xiàn)圖片旋轉(zhuǎn)
網(wǎng)址分享:http://weahome.cn/article/ddcohsg.html

其他資訊

在線咨詢(xún)

微信咨詢(xún)

電話咨詢(xún)

028-86922220(工作日)

18980820575(7×24)

提交需求

返回頂部