以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  做一个窗体按钮内部函数 有错误  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=169439)
--  作者：yifan3429
--  发布时间：2021/6/16 23:17:00
--  做一个窗体按钮内部函数 有错误
Dim e  = args(0)
Select Case e.Form
    Case "项目管理"
        Select Case e.Sender
            Case "明细"
                MessageBox.Show("项目管理-卧室明细")
            Case "新增客户"
                MessageBox.Show("项目管理-新增客户")
        End Select
    Case "项目明细"
        Select Case e.Sender
            Case "刷新"
                MessageBox.Show("项目明细-卧室刷新")
            Case "新增客户"
                MessageBox.Show("项目明细-新增客户")
        End Select
End Select


.NET Framework 版本：4.0.30319.42000
Foxtable 版本：2021.5.29.1
错误所在事件：自定义函数,窗体按钮
详细错误信息：
调用的目标发生了异常。
重载决策失败，因为没有 Public“=”可以用这些参数调用:
    \'Public Shared Operator =(a As String, b As String) As Boolean\':
        与参数“a”匹配的参数无法从“Form”转换为“String”。
--  作者：linyunu1
--  发布时间：2021/6/17 9:45:00
--  
Select Case e.Form.Name
--  作者：有点蓝
--  发布时间：2021/6/17 11:53:00
--  
Dim e  = args(0)
Select Case e.Form.name
    Case "项目管理"
        Select Case e.Sender.name