将VB.NET图像对象添加到HTML
我是VB.NET的新手,我创建了一个对象图像将VB.NET图像对象添加到HTML,html,vb.net,image,Html,Vb.net,Image,我是VB.NET的新手,我创建了一个对象图像Dim myimg As image,其中包含一个用VB.NET生成并显示在图片框中的图像。 我想像这样将此图像添加到HTML:Dim value$=” " 其中值用于替换html文件中的标记,以显示在VB.NET中生成的图片 有没有办法做到这一点借用和助手类,您可以这样做: Imports System.IO Imports System.Drawing.Imaging Public Class ImageHelper ' Convert
Dim myimg As image
,其中包含一个用VB.NET生成并显示在图片框中的图像。
我想像这样将此图像添加到HTML:Dim value$=”
"
其中值用于替换html文件中的标记,以显示在VB.NET中生成的图片
有没有办法做到这一点借用和助手类,您可以这样做:
Imports System.IO
Imports System.Drawing.Imaging
Public Class ImageHelper
' Convert an image to a Base64 string by using a MemoryStream. Save the
' image to the MemoryStream and use Convert.ToBase64String to convert
' the content of that MemoryStream to a Base64 string.
Public Shared Function ImageToBase64String(ByVal image As Image, _
ByVal imageFormat As ImageFormat)
Using memStream As New MemoryStream
image.Save(memStream, imageFormat)
Dim result As String = Convert.ToBase64String(memStream.ToArray())
memStream.Close()
Return result
: End Using
End Function
' Convert a Base64 string back to an image. Fill a MemorySTream based
' on the Base64 string and call the Image.FromStream() methode to
' convert the content of the MemoryStream to an image.
Public Shared Function ImageFromBase64String(ByVal base64 As String)
Using memStream As New MemoryStream(Convert.FromBase64String(base64))
Dim result As Image = Image.FromStream(memStream)
memStream.Close()
Return result
End Using
End Function
End Class
在按钮内:
Dim myImage As Image = Image.FromFile("C:\test.png")
Dim base64 As String = ImageHelper.ImageToBase64String(myImage, ImageFormat.Png)
WebBrowser1.DocumentText = "<img alt=""Embedded Image"" src=""data:image/png;base64," & base64 & """ />"
Dim myImage As Image=Image.FromFile(“C:\test.png”)
Dim base64 As String=ImageHelper.ImageToBase64String(myImage,ImageFormat.Png)
WebBrowser1.DocumentText=“”
源标记必须有一个无法接收对象的位置。您必须先保存图像,然后使用该位置创建值$variable