老师，动态创建窗口后，在动态创建按钮，报错，那儿有问题呢？

此主题相关图片如下：qq截图20210917102244.jpg

Dim frm As New System.Windows.Forms.Form
frm.name = e.Sender.Name
frm.Topmost = True
frm.width = 500
frm.height = 500

msgbox(e.Sender.Name)

Dim zaj As List(of String) = DataTables("导航").GetValues("分组","分组=\'" & e.Sender.Name & "\'","序号")
For Each za As String In zaj
    Dim ajm As List(of DataRow) = DataTables("导航").Select("分组=\'" & e.Sender.Name & "\' and 名称 Is Not Null","序号")
    For Each aj2 As DataRow In ajm
        Dim aj As String = aj2("名称")
        Dim jpg As String = aj2("图标")
        msgbox(aj)
       
        Dim but As WinForm.Button
        but = frm.CreateControl(aj,ControlTypeEnum.button)
        but.Text=aj
        \'but.name = aj
        but.Dock= 1 \'锚定
        but.Height= 30 \'页面高度
        but.Image=GetImage(jpg)  \'图标
        but.TextImageRelation = TextImageRelationEnum.Automatic  \'图标相对位置
        but.ImageAlign= ContentAlignment.MiddleLeft \'图标位置
        but.VisualStyle= IVisualStyle.Office2010Blue  \'主题
        frm.AddControl(but)
        frm.controls.add(frm.Controls(hsmc).basecontrol)
    Next
Next
frm.Show

创建的按钮样式应该怎么设置呢？采用帮助里面的方法报错

这样不报错，但是样式没变，不能指定主题吗？     

but.FlatStyle= FlatStyle.Standard