| 递增一个字符串中的数字部分 |
|
| 作者：Dev Ashi… 文章来源：本站原创 点击数： 本日：{$DayHits} 更新时间：2003-12-12 13:21:35 |
tmtony翻译：
问：我有一个字段，包含这样的格式："REC-1", "REC-2", "REC-3" 等. 当新增一条记录时，我如何让这个字段的数字部分自动加1呢（下一条记录应为REC-4)
答：使用Right及DMax函数返回字段“FOO”的数字部分的最大值，然后加1
表达式为：
="REC-" & right(DMax("FOO", "FOOTable"), _
Len(DMax("FOO", "FOOTable")) - _
InStr(1, DMax("FOO", "FOOTable"), "-")) + 1
注意：但如果很多用户或多个程序都使用DMax去实现这个结果的话，特别在一个很大的表中这个过程会很慢，所以建议使用DefaultValue，它仅仅使用DMax一次
程序如下，写在更新事件中
Private Sub SomeField_AfterUpdate()
Dim strMax as string
strMax =DMax("FOO", "FOOTable")
me!HiddenFooCtl = "REC-" & right(strMax, _
len(strMax) - _
Instr(1,strMax, "-")) +1
End Sub
|
| 文章录入：tmtony 责任编辑：tmtony |
|
上一篇文章： 转换所有的文本为大/小写
下一篇文章： 取得电脑CPU的名称及速度 |
| 【字体：小 大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 |
用户登录 
新用户注册 
网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）
