正文
vb.net把图形保存 vb 保存数据
小程序:扫一扫查出行
【扫一扫了解最新限行尾号】
复制小程序
【扫一扫了解最新限行尾号】
复制小程序
VB.Net中如何将程序中生成的Bitmap对象在电脑中保存成一张图片?
多个路由器设置方法:
方法一、设置2级路由。
一、两台路由器连接方法
1、有电信猫:电信猫----路由器1wan口;路由器1lan口----路由器2wan口;路由器2lan口----电脑。
2、没有电信猫:网线----路由器1wan口;路由器1lan口----路由器2wan口;路由器2lan口----电脑。
二、设置方法
设置前,请断开这台路由器2wan口网线,等设置完成后在插上。
1、设置第2台路由器ip段。
①、lan口设置,如果你有多个路由器,而且是第二台路由器,为了避免冲突(路由器1lan口IP:192.168.1.1),可以将此IP改为其它。比如修改为:192.168.2.1
在重启路由器,进入路由器的地址是:192.168.2.1了。
2、设置第二台路由器上网方法。
①、查看第1台路由器下连接的电脑的ip详细信息。(win+r--输入,cmd--输入:ipconfig /all [记住:ip,掩码,网关,dns])
②、在第2台路由器上设置,在【设置向导】选择【静态ip】。输入第1台路由器不用的ip,其他的:掩码,网关,dns设置一样。
③、设置好后重启路由器。
方法二、路由器b做交换机使用。
1、路由器a正常设置。
2、路由器b设置方法:
①、首先要空出wan口,所有的接线都接在lan口上。
②、关闭路由b的dhcp服务。
③、修改路由b的lan口ip地址(不要与路由器a的网段相同即可),修改IP为192.168.2.1。
vb.net picture 保存图片
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click '好处:画的图刷新不会消失
PictureBox1.Image = Nothing
Dim wid As Integer = PictureBox1.ClientSize.Width
Dim hgt As Integer = PictureBox1.ClientSize.Height
Dim bm As New Bitmap(wid, hgt)
Dim g As Graphics = Graphics.FromImage(bm)
'画图代码,比如下面的直线
g.DrawLine(Pens.Red, 10, 10, 500, 10)
'画图代码
PictureBox1.Image = bm
PictureBox1.Refresh()
g.Dispose()
PictureBox1.Image.Save("C:\1.jpg")
End Sub
vb.net 画图 如何保持图形
不用PictureBoxTest.Image属性,直接把图形绘制到PictureBoxTest上面就可以了。
Dim button As Integer = 0
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) _
Handles Button1.Click
Using g As Graphics = Graphics.FromHwnd(PictureBoxTest.Handle)
Dim penRed As Pen = New Pen(Color.Red, 1) '定义红色画笔
Dim penblue As Pen = New Pen(Color.Blue, 1) '定义蓝色画笔
If button = 0 Then
g.DrawLine(penRed, 0, 0, 100, 100)
button = 1
ElseIf button = 1 Then
g.DrawLine(penblue, 100, 100, 200, 200)
button = 0
End If
End Using
End Sub
VB.net如何将多张图片保存为一个多页的tiff文件
自己上msdn找mode。
这里有个C的。
private ImageCodecInfo GetEncoder(ImageFormat format)
{
ImageCodecInfo[] codecs = ImageCodecInfo.GetImageDecoders();
foreach (ImageCodecInfo codec in codecs)
{
if (codec.FormatID == format.Guid)
{
return codec;
}
}
return null;
}
private void VaryQualityLevel()
{
// Get a bitmap.
Bitmap bmp1 = new Bitmap(@"c:\TestPhoto.jpg");
ImageCodecInfo jgpEncoder = GetEncoder(ImageFormat.Jpeg);
// Create an Encoder object based on the GUID
// for the Quality parameter category.
System.Drawing.Imaging.Encoder myEncoder =
System.Drawing.Imaging.Encoder.Quality;
EncoderParameters myEncoderParameters = new EncoderParameters(1);
EncoderParameter myEncoderParameter = new EncoderParameter(myEncoder, 0L);
myEncoderParameters.Param[0] = myEncoderParameter;
Bitmap b = new Bitmap(100, 200);
Graphics g = Graphics.FromImage(b);
g.InterpolationMode = InterpolationMode.HighQualityBicubic;
g.DrawImage(bmp1, new Rectangle(0, 0, 100, 100), new Rectangle(0, 0, bmp1.Width, bmp1.Height), GraphicsUnit.Pixel);
g.Dispose();
b.Save(@"c:\TestPhotoQualityZero.jpg", jgpEncoder, myEncoderParameters);
}
VB.net 怎样保存picturebox中的图像(vs2008)
'因为要保存picturebox中的图片必须要设置autoredraw属性为true,所以也写出来了.
Private Sub Form_Load()
Picture1.AutoRedraw = True
End Sub
Private Sub Command1_Click()
SavePicture Picture1.Image, App.Path "\1.bmp"
End Sub
关于vb.net把图形保存和vb 保存数据的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站。