在VB中以编程方式创建窗体设置

您可以通过表单设计器实现这一点。

转到应用程序设置/属性绑定,然后单击。。。按钮

然后单击此处,为文本属性指定一个新设置:

.Net负责在程序退出时自动保存设置。如果要强制保存,只需致电 My.Settings.Save()

您可以创建自己的设置类,该类继承 ApplicationSettingsBase :

Imports System.Configuration

Public Class MyUserSettings
    Inherits ApplicationSettingsBase
    <UserScopedSetting()> _
    <DefaultSettingValue("white")> _
    Public Property BackgroundColor() As Color
        Get
            BackgroundColor = Me("BackgroundColor")
        End Get

        Set(ByVal value As Color)
            Me("BackgroundColor") = value
        End Set
    End Property
End Class

保存设置:

Dim Mus As New MyUserSettings
Mus.BackgroundColor = Color.AliceBlue
Mus.Save()

加载设置:

Dim Mus As New MyUserSettings
MessageBox.Show(Mus.BackgroundColor.ToString)

资料来源: MSDN

VBA中的一种方法是使用标准函数将设置保存到注册表:

Call SaveSetting(appName, Section, Key, Value)

Value = GetSetting(appName, Section, Key)

只需将它们放入表单构造函数和表单析构函数中:

Private Sub UserForm_Initialize()
...
end sub

Private Sub UserForm_Terminate() 
...
end sub