用VB.NET编程语言开发,新建一个窗体formA,窗体formA中有4个控件,从左到有分别是ComboBox1,TextBox1,TextBox2,TextBox3,有个文本abc.ini,文本内容 AAA,长=AA1,宽=BB1,高=CC1 BBB,长=AA2,宽=BB2,高=CC2 CCC,长=AA3,宽=BB3,高=CC3 如何实现将AAA对应ComboBox1,AAA对应ComboBox1,AA1对应的TextBox1,BB1对应的TextBox2,CC1对应的TextBox3,以此类推,AAA,AA1,BB1,CC1等这些都变量,不固定。反过来ComboBox,TextBox的值该变是也用相应的用逗号分开的格式写入数据到文本abc.ini。
时间: 2024-03-24 10:37:37 浏览: 15
下面是一个实现的示例代码,你可以参考一下:
```
Imports System.IO
Public Class FormA
Dim iniFilePath As String = "abc.ini" ' ini文件路径
Private Sub FormA_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' 读取ini文件并初始化ComboBox和TextBox
ReadIniFile()
End Sub
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
' 根据ComboBox1的值更新TextBox1、TextBox2、TextBox3的值
If ComboBox1.SelectedIndex >= 0 Then
Dim itemValue As String = ComboBox1.SelectedItem.ToString()
Dim values() As String = itemValue.Split(","c)
If values.Length = 4 Then
TextBox1.Text = values(1)
TextBox2.Text = values(2)
TextBox3.Text = values(3)
End If
End If
End Sub
Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
' 将ComboBox和TextBox的值写入ini文件
WriteIniFile()
End Sub
Private Sub ReadIniFile()
' 读取ini文件并初始化ComboBox和TextBox
If File.Exists(iniFilePath) Then
Dim lines() As String = File.ReadAllLines(iniFilePath)
For Each line As String In lines
Dim values() As String = line.Split(","c)
If values.Length = 4 Then
ComboBox1.Items.Add(values(0))
End If
Next
If ComboBox1.Items.Count > 0 Then
ComboBox1.SelectedIndex = 0
End If
End If
End Sub
Private Sub WriteIniFile()
' 将ComboBox和TextBox的值写入ini文件
Dim lines As New List(Of String)()
For Each item As String In ComboBox1.Items
Dim values() As String = item.Split(","c)
If values.Length = 4 Then
Dim line As String = String.Format("{0},{1},{2},{3}", values(0), TextBox1.Text, TextBox2.Text, TextBox3.Text)
lines.Add(line)
End If
Next
If lines.Count > 0 Then
File.WriteAllLines(iniFilePath, lines.ToArray())
End If
End Sub
End Class
```
在窗体的Load事件中,我们调用了ReadIniFile方法,该方法会读取abc.ini文件并初始化ComboBox1控件。在ComboBox1的SelectedIndexChanged事件中,我们根据ComboBox1的值更新TextBox1、TextBox2、TextBox3的值。在保存按钮的Click事件中,我们调用了WriteIniFile方法,该方法会将ComboBox和TextBox的值写入abc.ini文件。
需要注意的是,该示例代码中的abc.ini文件格式必须按照题目所给的格式,即每行格式为“名称,长=长度,宽=宽度,高=高度”。如果abc.ini文件格式不正确,该代码将无法正常读取和写入数据。