189 8069 5689

vb.net打开多个图的简单介绍

vb.net 怎么同时打开多个窗口?

在项目中右键点击添加窗体。在代码中需要显示该窗体的地方写入如下代码:“form2.show()”form2是你窗体的name属性……

创新互联公司专注于雁江企业网站建设,成都响应式网站建设公司,商城网站开发。雁江网站建设公司,为雁江等地区提供建站服务。全流程按需网站设计,专业设计,全程项目跟踪,创新互联公司专业和态度为您提供的服务

vb.net编写一个照片浏览器程序,程序执行时单击下一张,将会显示下一张照片

我说选把打开多个图片路径加载到一个listbox里,利用listbox写代码

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

If ListBox1.SelectedIndex = count Then

Try

ListBox1.SelectedIndex = ListBox1.SelectedIndex + 1

Catch

ListBox1.SelectedIndex = 0

End Try

End If

picbox.Image = ListBox1.SelectedItem.ToString

End Sub

VB.net按顺序加载多张图片的问题

Dim i As Integer

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

i = i + 1

If i 3 Then Timer1.Enabled = False : Exit Sub

PictureBox1.ImageLocation = "z:\" i ".png"

End Sub

在vb.net 中,picturebox轮流显示几个图片的问题

你的图片名称可以用 1.jpg,2.jpg ...... n.jpg来命名,存放在一个文件夹下,文件夹放在应用程序安装包,或者运行的相对位置。代码就好写了

在事件外public int i;

在事件里面

if(ii)

{

i++; //累加顺序读取

pictureBox1.Image=Image.LoadFile(Application.StartUpPath + "/文件夹名/" + i.ToString() + ".jpg")

}

else

{

i=1; //初始化

}

这样就是按顺序读取图片。

当然折中办法很笨拙,因为图片名称写成数字很别扭,而且后缀也不完全一样,所以我们尽量用查询DB办法或者查找文件办法。数组是很慢的也很老土。把图片名称存在表里面,表里面查到哪个名称就加载那张图片就行了,简单了事,或者给图片在表里安排一列索引,用索引去查名称,加载出来就可以了。

求大神指点vb.net 怎么以指定方式打开图片呢?

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

'建立新的系统进程    

Dim process As New System.Diagnostics.Process()

If RadioButton1.Checked Then

'设置文件名,此处为图片的真实路径+文件名    

process.StartInfo.FileName = "c:\a.bmp"

'设置进程运行参数    

process.StartInfo.Arguments = "rundll32.exe shimgvw.dll"

Else

process.StartInfo.FileName = "mspaint.exe"

process.StartInfo.Arguments = "c:\a.bmp"

End If

'此项为是否使用Shell执行程序,因系统默认为true,此项也可不设,但若设置必须为true    

'process.StartInfo.UseShellExecute = True

'此处可以更改进程所打开窗体的显示样式,可以不设    

'process.StartInfo.WindowStyle = System.Diagnostics.ProcessWindowStyle.Hidden

process.Start()

process.Close()

End Sub


文章名称:vb.net打开多个图的简单介绍
URL网址:http://cdxtjz.cn/article/hdsssi.html

其他资讯