vbnet图片框 vb程序设计图片框图片路径

VB点虐 2008图片框处理图片时，图片框无法显示图片，打红叉叉，如何解决？

贴代码啊,贴上加载两个图片框的代码,有代码才知道你加载图片时错在那里.下回提问要详细周全,碰到了就回一下,但问题资料提供不全面会浪费时间也会浪费一个别人回答的机会,因为等你再提供更多资料时能回答的人就不一定在线了.下回再看到你这问题不知道等到什么时候了...

创新互联是一家专注于成都网站制作、网站建设与策划设计,白河网站建设哪家好?创新互联做网站,专注于网站建设10余年,网设计领域的专业建站公司;建站业务涵盖:白河等地区。白河做网站价格咨询:028-86922220

'初始化的时候添加事件

Private Sub Main_Load(....) Handles MyBase.Load

AddHandler pic_10.Click, New EventHandler(AddressOf Pic_Click)'pic_10为你自创建图片的需放大的图片名称

End Sub

'自定义控件处理函数(注意TabIndex的编号)

Protected Sub Pic_10Click(ByVal sender As Object, ByVal e As EventArgs)

'在这放大图片

pic_10.Width+=20

pic_10.Height+=20

End Sub

假定春夏秋冬四个按钮分别是Command1、Command2、Command3、Command4，四个图片框分别是Picture1、Picture2、Picture3、Picture4

Private Sub Command1_Click()

Picture1.Picture = LoadPicture("春的图片路径放在这")

End Sub

Private Sub Command2_Click()

Picture2.Picture = LoadPicture("夏的图片路径放在这")

End Sub

Private Sub Command3_Click()

Picture3.Picture = LoadPicture("秋的图片路径放在这")

End Sub

Private Sub Command4_Click()

Picture4.Picture = LoadPicture("冬的图片路径放在这")

End Sub

如果按钮和图片框弄成控件数组则程序会更简单（四个图片的文件名要改为1.jpg、2.jpg、3.jpg、4.jpg）：

Private Sub Command1_Click(Index As Integer)

Picture1(Index).Picture = LoadPicture(App.Path "\" Index + 1 ".jpg")

End Sub

网站栏目：vbnet图片框 vb程序设计图片框图片路径
当前链接：http://6mz.cn/article/ddihooh.html