resources问题请教,已知这样是成功的,但如何用一句话代替之?

minicar1388 2014-03-09 07:33:38

resources问题请教,已知这样是成功的,但如何用一句话代替之?

Select Case text1.text
Case "img1"
PictureBox1.Image = My.Resources.img1
Case "img2"
PictureBox1.Image = My.Resources.img2
Case "img3"
PictureBox1.Image = My.Resources.img3
Case "img4"
PictureBox1.Image = My.Resources.img4
Case "img5"
PictureBox1.Image = My.Resources.img5
End Select
'像这样行吗?
Picturebox1.image=my.resources."text1.text"
肯定不行,但这样你会明白我的需求吧?
...全文
126 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
minicar1388 2014-03-09
  • 打赏
  • 举报
回复
PictureBox1.Image = My.Resources.ResourceManager.GetObject(TEXT1.TEXT) 用这个就行了。感谢。
superliu1122 2014-03-09
  • 打赏
  • 举报
回复
在My.Resources.img1上点右键->转到定义,看看自动这个属性是怎么实现的你就知道了
minicar1388 2014-03-09
  • 打赏
  • 举报
回复
顶起 顶起 顶起 顶起 顶起 顶起 顶起 顶起 顶起 顶起 顶起 顶起 顶起 顶起
minicar1388 2014-03-09
  • 打赏
  • 举报
回复
在线等, 如果此问题解决,会帮到一大片人,因为网上的贴是空白
minicar1388 2014-03-09
  • 打赏
  • 举报
回复
有人帮忙吗?

16,554

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧