我已经在vb.net的appconfig中添加了键值
<?xml version="1.0" encoding="utf-8" ?>
<configuration>
<appSettings>
<add key="Key0" value="0" />
<add key="Key1" value="1" />
<add key="Key2" value="2" />
</appSettings>
</configuration>
我想遍历应用程序配置中的所有键值,并将其值读取到textbox1,textbox2和textbox3。
我已经做了一些工作,但是未能实现,这是我尝试过的。
If form1.combobox1.selecteditem = 0 then
Dim appsettings = configurationmanager.appsettings
dim result as string
for each result in appsetting
if result = appsettings("Key1") then
textbox1.text = result
else
if result = appsettings("key2") then
textbox2.text = result
end if
next
以上在if条件中引发的错误,能否请您帮我得到从VB.net平台中的Appconfig文件读取值到文本框的解决方案。
答案 0 :(得分:0)
我不确定If form1.combobox1.selecteditem = 0 then
是什么意思
如果框中有一个0,则If ComboBox1.SelectedText = "0" Then
应该起作用。组合框中的项目是对象。
如果您没有选择的项目,那么If ComboBox1.SelectedIndex = -1
您错过了End如果是的话,我将其添加到了我认为可能属于的位置
If ComboBox1.SelectedText = "0" Then
Dim appsettings = ConfigurationManager.AppSettings
Dim result As String
For Each result In appsettings
If result = appsettings("Key1") Then
TextBox1.Text = result
ElseIf result = appsettings("key2") Then
TextBox2.Text = result
End If
Next
End If
如果您可以下载Visual Studio Community 2017(免费)并将Option Strict设置为on,它将为您的编码提供很大帮助。 未针对app.config测试代码。