vb.net图片还原 vb窗体还原代码

[VB.NET] 怎样将.png用16进制显示後 再将其还原输出成.png？

vb.net图片还原你台湾人vb.net图片还原？

直接保存成任意文件就是图片vb.net图片还原了

相关问答

Q1: 求大神指点 vb.net 用代码添加的数组图片框控件.怎么添加单击控件事件呢? 单击放大在单击就还原

.....

            Px += 0

            Py += 20

            AddHandler pic(i).Click, AddressOf Pic_Click '添加这一句，绑定单击图片框事件

        Next

        FlowLayoutPanel1.Controls.AddRange(pic)

    End Sub

    

    Dim l As Point, s As Size, f As Boolean

    Private Sub Pic_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

        Dim pic As PictureBox = CType(sender, PictureBox)

        If f Then

            pic.Location = l

            pic.Size = s

            f = False

        Else

            l = pic.Location

            s = pic.Size

            pic.BringToFront()

            pic.Location = FlowLayoutPanel1.Location

            pic.Size = FlowLayoutPanel1.Size

            f = True

        End If

    End Sub

Q2: vb。net的,如何点击button1就可以让图片缩小一半,点击 button2就还原大小?求代

new bitmap（.image，new size（.image.size.width\2,.image.size.height\2））

以上。

Q3: 用VB.net怎么做这个？点击图片换成另一张图片，再点击就变回来。

问题问的太大，涉及按钮集合控制的事件和圆形按钮的制作，每个问题都是100分以上的问题，关键是加了分也未必有人乐于解答

点击图片换成另一张图片？实际是更换按钮背景颜色。

圆形按钮实际是在普通按钮上画了一个圆的范围，实际上点圆外的四角，按钮照样变颜色

Q4: Vb.net怎么实现图像的处理

这问题有点笼统，软糖来说说把：

图像处理由System.Drawing命名空间负责。

主要是Bitmap类和Graphics类。

Bitmap表示一个位图，可以是BMP,JPG,PNG等文件。

装载位图

Dim 位图 As Bitmap = Bitmap.FromFile("C:\Image1.PNG")

Graphics表示一张画纸，能够进行绘制操作。

它可以被窗体、控件、位图调用CreateGraphics()方法来创建。

然后调用Graphics.Draw开头的一系列函数来绘制图像和图形，Fill开头的填充图形。

创建画纸并绘制位图

Dim 画纸 As Graphics = Me.CreateGraphics()

画纸.DrawImage(位图, 100, 100, 256, 256)

可以将上面三行放到Form1_Load中测试，把路径改一下，

还可以把Me改为能在上面绘图的控件的名称。

更多内容请看MSDN的System.Drawing命名空间。

如满意，请采纳，谢谢。

Q5: vb.net(2008)把图片(或其它类型文件)转换成字符串存入.txt文件中，并从.txt中读出生成图片

这个做法应该是图方便的加密解密做法。按你的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图片还原和vb窗体还原代码的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。