データベースでvb.netの動的ボタンを作成

Question

vb.netでボタンを動的に作成したいと思います。私はレストランの販売時点で働いています。どのようにそれが行われるかについての任意のアイデア？それはデータベースを持っています。あなたはレストランの販売店を作る方法について考えていますか？

いくつかのサンプルを検索しようとしましたが、正しいプロセスが見つかりませんでした。

Answer 1

Dim PointButton As Point = New Point 
    Try 
     cn = MySQLi.MySQLConnectionMobile 
     Query = "SELECT `table` FROM `last_sync`" 
     da = New MySqlDataAdapter(Query, cn) 
     ds = New DataSet 
     ds.Clear() 
     da.Fill(ds, Table) 

     ReDim MyButton(ds.Tables(0).Rows.Count) 

     Dim one As Integer = 1 
     For i = 0 To ds.Tables(0).Rows.Count - 1 
      MyButton(i) = New Button 
      MyButton(i).Text = ds.Tables(0).Rows.Item(i).Item(0).ToString 
      MyButton(i).Name = "Table" & one.ToString 
      MyButton(i).BackColor = Color.Transparent 
      PointButton.Y = 3 
      If one = 1 Then 
       PointButton.X = PointButton.X 
      Else 
       PointButton.X = PointButton.X + MyButton(i).Width + 10 
      End If 
      MyButton(i).Location = PointButton 

      DirectCast(main_junk.Panel2, Panel).Controls.Add(MyButton(i)) 
      one += 1 
      AddHandler MyButton(i).Click, AddressOf main_junk.Button_Click 
     Next 
    Catch ex As Exception 
     MsgBox(ex.Message, MsgBoxStyle.Critical, "Uknow Databases") 
    End Try 

ここで、main_junkはフォームです。 これはハンドラ用です

Public Sub Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) 
    'YOUR CODE HERE 
End Sub