| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 切换默认用户代码是多少 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=158094) |
| -- 作者：qazlinle6 -- 发布时间：2020/11/7 16:02:00 -- 切换默认用户代码是多少 切换默认用户代码是多少 |
| -- 作者：有点蓝 -- 发布时间：2020/11/7 16:18:00 -- 切换用户参考：Syscmd.Project.SwitchUser() 没有切换默认用户的用法 |
| -- 作者：qazlinle6 -- 发布时间：2020/11/7 16:35:00 -- 那切换上个用户呢 |
| -- 作者：有点蓝 -- 发布时间：2020/11/7 16:39:00 -- 只有2楼的用法 |
| -- 作者：qazlinle6 -- 发布时间：2020/11/7 16:45:00 -- 只可以重新选用户吗 |
| -- 作者：有点蓝 -- 发布时间：2020/11/7 16:50:00 -- 试试不就知道了 |
| -- 作者：qazlinle6 -- 发布时间：2020/11/7 16:58:00 -- 列1，列2，列3 列1输入内容右移到列2输内容 列2输入内容如果列1第二行有内容就在第二行列2输内容，如果第二行列1没内容就在第二行列1输内容 |
| -- 作者：有点蓝 -- 发布时间：2020/11/7 17:12:00 -- 表格keydown事件 Dim c As Col = e.Table.cols(e.Table.colsel) Select Case c.name Case "列2" If e.Table.Rowsel < e.Table.Rows.count - 1 AndAlso e.KeyCode = keys.enter Then e.cancel = True Dim r As Row = e.Table.rows(e.Table.Rowsel+1) If r.IsNull("列1") e.Table.Select(e.Table.Rowsel+1,e.Table.cols("列1").index) Else e.Table.Select(e.Table.Rowsel+1,e.Table.cols("列2").index) End If End If End Select |
| -- 作者：qazlinle6 -- 发布时间：2020/11/7 17:38:00 -- 我这是扫码抢自动的 不得按回车 |
| -- 作者：qazlinle6 -- 发布时间：2020/11/8 11:22:00 -- If User.name="林乐" Then If LastInputTickCount > 3000 Then Syscmd.Project.SwitchUser() End If End If 什么会显示行多个
|