vb.net SplitContainer1.Panel1有多个button，读取数据库依次改变button.name

以下是一个简单的示例代码，假设你的数据库中有一张名为 `Buttons` 的表，包含两个字段 `Id` 和 `Name`，其中 `Id` 是自增的整数类型，`Name` 是字符串类型，用于存储 Button 的名称。

Imports System.Data.SqlClient

' 连接数据库
Dim connectionString As String = "Data Source=your_server;Initial Catalog=your_database;User ID=your_username;Password=your_password;"
Dim connection As New SqlConnection(connectionString)
connection.Open()

' 从数据库中读取数据
Dim query As String = "SELECT * FROM Buttons ORDER BY Id"
Dim command As New SqlCommand(query, connection)
Dim reader As SqlDataReader = command.ExecuteReader()

' 遍历读取到的数据，并依次设置 Button 的名称
Dim index As Integer = 0
While reader.Read()
    If index >= SplitContainer1.Panel1.Controls.Count Then Exit While  ' 如果 Button 数量不足，跳出循环
    Dim button As Button = DirectCast(SplitContainer1.Panel1.Controls(index), Button)
    button.Name = reader("Name").ToString()
    index += 1
End While

' 关闭数据库连接
reader.Close()
connection.Close()

这段代码会先连接数据库，然后执行 SQL 查询语句，从 `Buttons` 表中按照 `Id` 字段升序读取所有记录。接着，它会遍历读取到的数据，将每条记录的 `Name` 字段依次设置为 SplitContainer1.Panel1 下对应 Button 的 Name 属性。需要注意的是，如果 Button 的数量不足，会在读取到足够数量的记录后跳出循环。

你需要将代码中的 `your_server`、`your_database`、`your_username` 和 `your_password` 分别替换为实际的数据库服务器地址、数据库名称、用户名和密码。