Foxtable(狐表)用户栏目专家坐堂 → 工资管理系统


  共有21691人关注过本帖平板打印复制链接

主题:工资管理系统

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/6 17:16:00 [只看该作者]

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim idx As Integer =  Tables("工资摘要").FindRow("代码 = '" & e.Node.Name & "'")
If idx >= 0
    Tables("工资摘要").Position = idx
    Forms("工资档案窗口").open()
    Forms("工资档案窗口").Controls("Label1").Text = Tables("工资摘要").current("摘要")
End If

 回到顶部
总数 195 1 2 3 4 5 6 7 8 9 10 下一页 ..20