Foxtable(狐表)用户栏目专家坐堂 → 窗口中如何设置代码项目?


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

主题:窗口中如何设置代码项目?

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


加好友 发短信
等级:六尾狐 帖子:1291 积分:9831 威望:0 精华:0 注册:2012/9/19 21:13:00
窗口中如何设置代码项目?  发帖心情 Post By:2013/5/6 6:30:00 [显示全部帖子]

窗口中如何设置代码项目?

      为了提高输入速度,我想在窗口输入框中使用代码项目,如何设置?我看过帮助,帮助中是在表中的列中设置。

因为有时输入框紧挨着,而列又距离较远,来回从窗口和表中调换,降低了输入速度,特别是在生产现场应用录取现场数据,不方便。

请问一下如何解决,

例如:从输入框中输入1,对应的表中单元格(列行)显示“王华”,输入2,表中单元格显示“刘红兰”等等。

易表有这个功能。

我又找了一下帮助,下列代码能实现,但是如果“中国"经常改变的,不是固定的,如何从一个表中来调用, 

If e.Value IsNot Nothing Then
    If
e.Value = "cn" Then
        e.Value =
"中国"
    ElseIf
e.Value = "usa" Then
        e.value =
"美国"
    ElseIf
e.Value = "jp" Then
        e.value =
"日本"
    End
If
End
If

 

 

如表有两列,第一列     第二列 

                  1           王华

                  2           刘红兰

                  3           日本

                  4           刘娟                

第二列的内容经常变化,变化后修改表中数据,而不用重新打开项目改上面代码。

 

If e.Value IsNot Nothing Then
    If
e.Value = "1" Then
        e.Value =
"中国"        '改成调用表中的数据代码
    ElseIf
e.Value = "usa" Then
        e.value =
"美国"
    ElseIf
e.Value = "jp" Then
        e.value =
"日本"
    End
If
End
If

 

 

 

 

 

 

[此贴子已经被作者于2013-5-6 6:48:24编辑过]

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


加好友 发短信
等级:六尾狐 帖子:1291 积分:9831 威望:0 精华:0 注册:2012/9/19 21:13:00
  发帖心情 Post By:2013/5/6 11:46:00 [显示全部帖子]

谢谢

 回到顶部