📄 如何实现combobox中的选项能够被改动,但不用重新编译程序.txt
字号:
你 可 以 把 选 项 保 存 在 文 件 、 数 据 库 或 注 册 表 中 , 然 后 在 程 序 启 动 时 加 入 ComboBox。 这 样 每 次 你 只 需 要 修 改 文 件 或 注 册 表 就 可 以 了 , 而 不 需 要 重 新 编 译 程 序 。 下 面 的 例 子 就 是 从 注 册 表 中 读 取 :
Private Sub Form_Load()
Dim s As String
Dim i As Integer
i = 0
Do
s = GetSetting(appname := "MyApp", section := "Startup", _
key := i, default := "")
If s <> "" Then Combo1.AddItem s
i = i + 1
Loop Until s = ""
End Sub
<END>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -