标题：[求助]ExistControl(Name)

1楼

johnbu 发表于：2012/2/4 10:03:00

想问一下这个用到IF语句里面怎么用呢？？

ExistControl(Name)

它返回的逻辑值是什么样的呢？

2楼

johnbu 发表于：2012/2/4 10:22:00

代码如下

If e.Form.ExistControl("Table1")=0 Then
    Dim tbl As WinForm.Table
    tbl = e.Form.CreateTable("Table1", "销售订单", True)
    tbl.SetBounds(6, 330, 663, 250)
    e.Form.Controls("SplitContainer1").Panel2.AddControl(tbl)
    Tables("销售订单").AddNew()
Else
    Tables("销售订单").DataTable.Load(False)
    e.Form.Controls("SplitContainer1").Panel2.removeControl("Table1")
    Dim tbl As WinForm.Table
    tbl = e.Form.CreateTable("Table1", "销售订单", True)
    tbl.SetBounds(6, 330, 663, 250)
    e.Form.Controls("SplitContainer1").Panel2.AddControl(tbl)
    Tables("销售订单").AddNew()
End If

3楼

blackzhu 发表于：2012/2/4 10:57:00

If e.Form.ExistControl("Table1")=False Then
    Dim tbl As WinForm.Table
    tbl = e.Form.CreateTable("Table1", "销售订单", True)
    tbl.SetBounds(6, 330, 663, 250)
    e.Form.Controls("SplitContainer1").Panel2.AddControl(tbl)
End If
Tables("窗口名_Table1").AddNew()

你那个Else 后面是什么意思?

4楼

johnbu 发表于：2012/2/4 16:39:00

我想把表删除掉再重新加载一下。

5楼

程兴刚 发表于：2012/2/4 19:22:00

以下是引用johnbu在2012-2-4 16:39:00的发言：
我想把表删除掉再重新加载一下。

把表删除掉在加载？加载到哪里？这样的话还要动态再添加表，何不直接条件加载即可！

共5 条记录, 每页显示 10 条, 页签: [1]