山野井研究室

• ホーム
• VB
  • CAIを作ろう
  • TEST
  • base64
  • 白黒画像に変更
  • ネガポジ変換
  • 課題
• ASP.NET(VB)
• concrete5
• CodeIgniter
• 便利なツール
• 検索
• sandbox

ファイルをbase64に変換し、クリップボードに入れる

        Dim infile As IO.FileStream
        Dim data() As Byte
        If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
            infile = New IO.FileStream(OpenFileDialog1.FileName, IO.FileMode.Open)
            ReDim data(infile.Length)
            infile.Read(data, 0, infile.Length)
            infile.Close()
            Dim base64string As String
            base64string = Convert.ToBase64String(data)
            Clipboard.SetText(base64string)
        End If

base64からMemoryStream経由で画像を表示

Dim bs() As Byte = System.Convert.FromBase64String(base64string)
Dim memStream As New IO.MemoryStream(bs.Length)
memStream.Write(bs, 0, bs.Length)
PictureBox1.Image = Drawing.Image.FromStream(memStream)

htmlにbase64でインナー画像

<img src="data:image/gif;base64,xxxxxxxxxxxx" />
xxxxxxxxxxxxに画像をbase64に変換して入れる。