Foxtable(狐表)用户栏目专家坐堂 → [求助]动态函数


  共有1353人关注过本帖树形打印复制链接

主题:[求助]动态函数

帅哥哟,离线,有人找我吗?
blsu33
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2927 积分:20161 威望:0 精华:0 注册:2012/2/3 17:45:00
[求助]动态函数  发帖心情 Post By:2017/12/15 9:32:00 [只看该作者]

老师,

 

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
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/12/15 10:00:00 [只看该作者]

改成

 

str &="dim " & dr("idtype") & dr("id") & " as WinForm." & dr("controltype") & vbcrlf


 回到顶部