vb.net图片图 vbs图片

vb.net的图片空间怎样获得相对路径下的图片

在VB 学习中，绝对路径就是指带有盘符的固定的路径，比如“c:\windows\systems\a.exe” 而相对路径则可用APP.PATH连接文件名来表示，比如：App.Path "\a.exe"

以vb学习中加载图片为例，这样就容易弄明白了。假设我们要在vb中加载一幅图片，假设我们把这个加载图片的程序保存在如下位置："E:\aa-vbnew\加载图片讲解"而我们的图片在"D:\My Files\图画\tong.jpg"

那么情况如下：1，在代码中直接以绝对路径表示加载到form1中，如图所示：

显示结果如下：

2,换一种方式，以相对路径直接加载也可以。程序如图：

结果如上图。

下面分析如下：

第一种方式，我们使用的是图片的完整路径，就称之为绝对路径，也就是说不管我们的这个VB程序放到硬盘的任何位置，都完全可以显示出来这幅图片，因为图片的路径是绝对的，只要不改变图片的路径，那么就是绝对不变的。

第二种方式，我们使用的是图片的相对路径，相对于谁呢？是相对于我们的VB这个应用程序和这幅图片自身位置的。一旦我们的程序位置发生变化或者图片的位置发生改变，那么这个程序都不可以执行，不会显示这幅图片。所以说这就是相对路径，是以一个参考对象而存在的。

VB.NET中如何使两个PictureBox显示指定相对应的图片？

用一个全局变量保存这个1.jpg，如变量a，你按按钮2时，可以简单的在a中插入一个"A"，如a.SubString(0, a.Length-4) "A" a.SubString(a.Length-4)，这样就能把例如"C:/Images/1.jpg"变成"C:/Images/1A.jpg"

VB.NET加载图片问题

'先建立一个bitmap对象，指向图像文件

Dim pic As Bitmap = New Bitmap("e:\1.jpg")

'定义一个图片框的graphics对象

Dim g As Graphics = PictureBox1.CreateGraphics()

'在图片框上绘图

g.DrawImage(pic, 0, 0, pic.Width, pic.Height)

'释放bitmap对象

pic.Dispose()

'现在即可对文件进行操作

VB.net该如何将图片圆形显示？

新建一个Winformvb.net图片图，拖两个图片框。图片框1在设计器中选择一个图片（尺寸在图片框容纳为佳）。如下代码测试通过vb.net图片图：

        private void button1_Click(object sender, EventArgs e)

        {

            Image img1 = this.pictureBox1.Image;

            Image img2 = CropToCircle(img1);

            this.pictureBox2.Image = img2;

        }

        public Image CropToCircle(Image img1)

        {

            Image img2 = new Bitmap(img1.Width, img1.Height, 

            img1.PixelFormat);

            Graphics g = Graphics.FromImage(img2);

            using (Brush br = 

            new SolidBrush(SystemColors.Control))//背景色

            {

                g.FillRectangle(br, 0, 0, 

                img2.Width, img2.Height);

            }

            GraphicsPath path = new GraphicsPath();

            path.AddEllipse(0, 0, img2.Width, img2.Height);

            g.SetClip(path);

            g.DrawImage(img1, 0, 0);

            return img2;

        }

vb.net 怎么来回切换图片?

vb.net 怎么来回切换图片?1、添加控件Picturebox1和控件Timer1，将Timer1的Interval属性改为1000（即1秒），Enabled属性改为True

2、假设你要循环切换4张图片，你可以添加如下代码即可实现：

Dim a As Integer = 0

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

If a = 4 Then

a = 0

Else

a = a + 1

End If

If a = 0 Then Me.PictureBox1.Image = Image.FromFile("1.jpg")

If a = 1 Then Me.PictureBox1.Image = Image.FromFile("2.jpg")

If a = 2 Then Me.PictureBox1.Image = Image.FromFile("3.jpg")

If a = 3 Then Me.PictureBox1.Image = Image.FromFile("4.jpg")

End Sub

vb.net图片图的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbs图片、vb.net图片图的信息别忘了在本站进行查找喔。