Foxtable(狐表)用户栏目专家坐堂 → 改按键标题


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

主题:改按键标题

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


加好友 发短信
等级:八尾狐 帖子:1953 积分:15015 威望:0 精华:0 注册:2016/4/28 9:58:00
改按键标题  发帖心情 Post By:2016/9/24 18:08:00 [显示全部帖子]

If user.group = "业务主管"  
    Dim dr As Row  = Tables("课程表").Current
    Dim cmb As WinForm.button
    cmb = Forms("教务管理").Controls("button6")
    If cmb.text = "修改当前记录" Then
        DataTables("课程表").AllowEdit = False
        cmb.text = "保存修改记录"
    End If
    
    If cmb.text = "保存修改记录" Then
        dr.save()
        DataTables("课程表").AllowEdit = True
        cmb.text ="修改当前记录"
    End If
End If
请问如何改按键标题,这样写不变呢,谢谢

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


加好友 发短信
等级:八尾狐 帖子:1953 积分:15015 威望:0 精华:0 注册:2016/4/28 9:58:00
  发帖心情 Post By:2016/9/24 19:36:00 [显示全部帖子]

谢谢

 回到顶部