在不同窗体之间使用VB.NET变量

我试图使用VB.NET程序设置在每次加载表单时为每个表单加载背景图像。到目前为止，我已经设法让程序在一个表单中设置背景，而这会改变其他表单的背景。但是，当程序运行时关闭并重新打开每个窗体时，后台将变回默认窗体。我需要以某种方式更改背景一次，并在每次打开表单时加载它，这样它就不会在程序运行时每次重新打开表单时都切换回来。我认为使用VB.NET中的My.Settings可以实现这一点，但我不确定

这是更改每个表单背景的代码：

Me.BackgroundImage = PreviewBackgroundBox.Image
MainForm.BackgroundImage = PreviewBackgroundBox.Image
LogInForm.BackgroundImage = PreviewBackgroundBox.Image

---

PreviewBackgroundBox

用于在用户应用图像之前向用户显示图像，然后当用户单击应用时，图像将取自

PreviewBackgroundBox

并设置为所有表单的背景

有人能帮我吗

---

谢谢

基本上，您需要一个字典来记住每个表单要显示的图像。您可以将这样一个字典与处理所涉及逻辑的方法一起存储在模块中

Private imageDict As New Dictionary(Of String, Image)

Public Sub SetImage(ByVal formName As String, ByVal img As Image)
    imageDict(formName) = img
End Sub

Public Function GetImage(ByVal formName As String) As Image
    Dim img As Image
    If imageDict.TryGetValue(formName, img) Then
        Return img
    End If
    Return Nothing 'Or return a default image
End Function

注意：字典存储一些数据，并将其与用于检索此数据的键相关联。在这里，我将使用表单的名称作为键。您还可以使用表单的type

GetType（Form1）

或

Me.GetType（）

并使用

字典（type，Image）

---

每当用户选择另一个图像调用

SetImage

以记住它时。打开表单时，调用

GetImage

以获取记住的图像。

基本上，您需要一个字典来记住每个表单显示的图像。您可以将这样一个字典与处理所涉及逻辑的方法一起存储在模块中

Private imageDict As New Dictionary(Of String, Image)

Public Sub SetImage(ByVal formName As String, ByVal img As Image)
    imageDict(formName) = img
End Sub

Public Function GetImage(ByVal formName As String) As Image
    Dim img As Image
    If imageDict.TryGetValue(formName, img) Then
        Return img
    End If
    Return Nothing 'Or return a default image
End Function

注意：字典存储一些数据，并将其与用于检索此数据的键相关联。在这里，我将使用表单的名称作为键。您还可以使用表单的type

GetType（Form1）

或

Me.GetType（）

并使用

字典（type，Image）

---

每当用户选择另一个图像调用

SetImage

以记住它时。打开表单时，调用

GetImage

获取记住的图像。

是

PreviewBackgroundBox

表单类名吗？

PreviewBackgroundBox

是表单上的图片框

PreviewBackgroundBox

是表单类名吗

PreviewBackgroundBox

是表单上的图片框