Office中国论坛/Access中国论坛

标题: [求助]如何将序号翻译成文本? [打印本页]

作者: lyyggb    时间: 2005-6-18 18:15
标题: [求助]如何将序号翻译成文本?
例如客户表

1 对应 客户名称AAA

2 对应 BBB

3 对应 CCC

那么知道客户编号,怎样将他翻译显示成客户名称
作者: 海狸先生    时间: 2005-6-18 19:20
dlookup("客户名称","客户表","序号="AAA")
作者: wu8313    时间: 2005-6-20 02:42
如果想要在查询或者代码其他位置达到你的效果,使用一个自定义的函数也是可以的。

Function mystr(num As Variant) As String

Select Case num



Case 111

  

  mystr = "aaa"

   

Case 222



mystr = "bbb"



Case 333



mystr = "ccc"



Case Else



mystr = "输入了上述列表以外的内容"



End Select



End Function

[attach]11346[/attach]

[attach]11347[/attach]



[此贴子已经被作者于2005-6-19 18:44:28编辑过]


作者: goodaccess    时间: 2005-6-20 06:03
值得思考




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3