我有一个代码,但这不起作用..我尝试在谷歌搜索但没有任何帮助我..任何人都可以帮助我(对不起英语)我是一个新手。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim currentMin As String = "_" & TextBox1.Text
PictureBox1.Image = CType(My.Resources.ResourceManager.GetObject(currentMin), Image)
End Sub
答案 0 :(得分:0)
它为我工作
PictureBox1.Image = My.Resources.ResourceManager.GetObject(currentMin)
答案 1 :(得分:0)
PictureBox1.Image = My.Resources.<Name_of_res_file>.<Name_of_image_resource>