Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net 设置vb表单';动态生成背景图像_Vb.net - Fatal编程技术网

Vb.net 设置vb表单';动态生成背景图像

Vb.net 设置vb表单';动态生成背景图像,vb.net,Vb.net,我正在尝试动态设置窗体的背景图像(在按钮的单击事件上)。 当我停止应用程序的部署并重新启动以进行部署时,表单的背景图像将被删除。 我知道在应用程序未停止之前,背景图像将保持不变。 但是,我想永久地设置它,就像我们使用资源设置,或者使用表单或任何其他控件的背景图像属性设置一样 代码: Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click If vbOK = FolderBrowse

我正在尝试动态设置窗体的背景图像(在按钮的单击事件上)。
当我停止应用程序的部署并重新启动以进行部署时,表单的背景图像将被删除。
我知道在应用程序未停止之前,背景图像将保持不变。
但是,我想永久地设置它,就像我们使用资源设置,或者使用表单或任何其他控件的背景图像属性设置一样

代码:

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    If vbOK = FolderBrowserDialog2.ShowDialog() Then
        TextBox1.Text = FolderBrowserDialog2.SelectedPath
    End If
End Sub


Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    Dim id As String = "bg"
    Dim folder As String = TextBox1.Text
    If TextBox1.Text = "" Then
        MsgBox("Please Select Image Path.", MsgBoxStyle.Information, "Message")
    Else
        Dim filename As String = System.IO.Path.Combine(folder, id & ".jpg")
        Form1.BackgroundImage = Image.FromFile(filename)
    End If
End Sub
请注意,“bg”是图像的名称。
我知道这段代码不好,我正在努力改进。
但是,我的目标是动态设置背景图像。

如何做?

只需使用配置文件保存上次使用的图像或使用My.Settings可能重复,可能重复,但我无法理解上面给出的链接中的任何内容,这对我来说很难理解,我不知道如何使用该链接来实现我的目标,因为我只是一个初学者。所以,请给我提点别的建议或者解释一下。谢谢你的回复。链接中的解决方案是三行如果你不能理解三行,那么你应该去阅读vb.net的基础知识:
My.Settings.FirstName=“Chris”Dim F=My.Settings.FirstName My.Settings.Save()
是的,我不能理解这三行的含义,但我会的。谢谢你的解释。