Foxtable(狐表)用户栏目专家坐堂 → 如何知道一个对像的类型名称然后去定义


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

主题:如何知道一个对像的类型名称然后去定义

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


加好友 发短信
等级:幼狐 帖子:140 积分:1202 威望:0 精华:0 注册:2013/7/28 12:10:00
如何知道一个对像的类型名称然后去定义  发帖心情 Post By:2013/8/7 11:45:00 [显示全部帖子]

比如,我在表全局事件里,调用一个函数,然后把e这个对像传到函数,函数如可定义接收类型来操作。

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


加好友 发短信
等级:幼狐 帖子:140 积分:1202 威望:0 精华:0 注册:2013/7/28 12:10:00
  发帖心情 Post By:2013/8/7 11:52:00 [显示全部帖子]

直接用Args的话我在函数里没有写属性。
Dim CurrTable As Table = Args(0)
Dim CurrRow As Row = Args(1)
Select Case CurrTable.Name
    Case "退包认领_Table1"
        If CurrRow("是否有买有信息") = False Then
            Tables("Unpacking").Filter = " [拆包编号] = '" & CurrRow("拆包编号") & "'"
            Tables("Unpacking").Position = 1
            Forms("认领编辑").Open
        Else
            MessageBox.Show("选择商品已认领!","友情提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
        End If
End Select


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


加好友 发短信
等级:幼狐 帖子:140 积分:1202 威望:0 精华:0 注册:2013/7/28 12:10:00
  发帖心情 Post By:2013/8/7 11:53:00 [显示全部帖子]

追问,如何遍历当前对像的属性及方法,用Tab看不全,使用起来不放便。


 回到顶部