Foxtable(狐表)用户栏目专家坐堂 → [求助]控件


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

主题:[求助]控件

帅哥,在线噢!
苏州老街
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:801 积分:5112 威望:0 精华:0 注册:2016/10/19 16:45:00
[求助]控件  发帖心情 Post By:2025/3/9 11:34:00 [显示全部帖子]

老师好,窗口中有4个”TblCt”的控件,下面代码怎样重新编写。




Dim TblCtl As Windows.Forms.TableLayoutPanel = e.Form.Panel.Controls("TblCtl")
e.Form.Panel.Controls.Remove(TblCtl)
TblCtl.Dispose

 回到顶部
帅哥,在线噢!
苏州老街
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:801 积分:5112 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2025/3/9 20:26:00 [显示全部帖子]

老师,我分别用”TblCt1、TblCt2、TblCt3、TblCt4来做名称的。
下面代码分别写也不行。
Dim TblCtl As Windows.Forms.TableLayoutPanel = e.Form.Panel.Controls("TblCtl")
e.Form.Panel.Controls.Remove(TblCt1)
TblCtl.Dispose

[此贴子已经被作者于2025/3/9 20:26:52编辑过]

 回到顶部
帅哥,在线噢!
苏州老街
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:801 积分:5112 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2025/3/10 1:31:00 [显示全部帖子]

老师好,关闭窗口报错。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


图片点击可在新窗口打开查看此主题相关图片如下:2025-03-10 01 20 43.png
图片点击可在新窗口打开查看

 回到顶部
帅哥,在线噢!
苏州老街
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:801 积分:5112 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2025/3/10 9:50:00 [显示全部帖子]

老师,我添加到窗口了,没有把代码写进去,现在移除代码报错。

 回到顶部
帅哥,在线噢!
苏州老街
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:801 积分:5112 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2025/3/10 10:47:00 [显示全部帖子]

老师好

For i As Integer = 0 To 7
        .Controls.Add(e.Form.Controls("A" & i).BaseControl , 0 , i)
    Next
       e.Form.Panel.Controls.Add(TblCt)
      TblCt.SetColumnSpan(e.Form.Controls("A0").BaseControl,2)                                     
  
End With
e.Form.ResumeRedraw

 回到顶部
帅哥,在线噢!
苏州老街
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:801 积分:5112 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2025/3/10 11:03:00 [显示全部帖子]

老师好

图片点击可在新窗口打开查看此主题相关图片如下:2025-03-10 11 00 58.jpg
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


 回到顶部
帅哥,在线噢!
苏州老街
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:801 积分:5112 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2025/3/10 11:19:00 [显示全部帖子]

关闭窗口报错

 回到顶部
帅哥,在线噢!
苏州老街
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:801 积分:5112 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2025/3/10 14:24:00 [显示全部帖子]

老师,还是不行。

图片点击可在新窗口打开查看此主题相关图片如下:2025-03-10 11 00 58.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥,在线噢!
苏州老街
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:801 积分:5112 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2025/3/10 16:04:00 [显示全部帖子]

老师,如果控件在面板容器中要移除下面用黄色的代码怎样修改,



Dim TblCt4 As Windows.Forms.TableLayoutPanel = e.Form.Panel.Controls("TblCt4")
e.Form.Panel.Controls.Remove(TblCt4)
TblCt4.Dispose


e.Form.Controls("分表框3").BaseControl.Controls.Add(TblCt4)

 回到顶部
帅哥,在线噢!
苏州老街
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:801 积分:5112 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2025/3/10 17:41:00 [显示全部帖子]

老师,下面代码移除面板容器中的控件报错,移除窗口中的控件不报错。

Dim TblCt4 As Windows.Forms.TableLayoutPanel = e.Form.Panel.Controls("TblCt4")
e.Form.Panel.Controls.Remove(TblCt4)
TblCt4.Dispose

 回到顶部
总数 11 1 2 下一页