主题：[求助]动态函数

老师，

 

Dim str2 As String
str &= "dim txt " & vbcrlf

下面开始想要定义一个空间 就出错 应该怎么写  不会是不能再dim ?
 str &="txt=dim " & dr("idtype") & dr("id") & " as WinForm." & dr("controltype") & vbcrlf

str &= "txt= forms("""& dr("ckname") &""").CreateControl(""" & dr("idtype") & "_" & dr("idjc") & "_" & dr("id") & """, ControlTypeEnum." & dr("controltype")  & ")" & vbcrlf

 

 类似‘’Dim btn111 As WinForm.Button=e.Form.Control(..,..)

 

 

此主题相关图片如下：qq图片20171215091852.png