7,763
社区成员
发帖
与我相关
我的任务
分享如何实现特殊格式的序号显示
比如会计里面票据的帐号是00758757-00758807连续的号，这里一共有50个序号，要求只输入第一个号码就生成这一个序列的序号。可前面还要两个0
format可以吗？
format可以吗？
...全文
请发表友善的回复…
发表回复
yiming616 2003-07-07
- 打赏
- 举报
哎，为什么要编注册内容呀
向我多好，编的软件都是免费的
VB代码计算器 3.7.4 欢迎下载试用
下载地址：
华军软件 http://www.onlinedown.net/soft/7545.htm
向我多好，编的软件都是免费的
VB代码计算器 3.7.4 欢迎下载试用
下载地址：
华军软件 http://www.onlinedown.net/soft/7545.htm
hohowu 2003-06-16
- 打赏
- 举报
谢谢各位的回答。
如果是让用户输入第一个序号到文本框里去，然后程序自动加1，一直到第50个作为最后一个。
那么，格式就按照用户输入的格式来了。也就是后面引号里的能否为变量？而不是固定的是前面有一个0的？
如果是让用户输入第一个序号到文本框里去，然后程序自动加1，一直到第50个作为最后一个。
那么，格式就按照用户输入的格式来了。也就是后面引号里的能否为变量？而不是固定的是前面有一个0的？
csdngoodnight 2003-06-16
- 打赏
- 举报
以字符串数据类型出现。
rainstormmaster 2003-06-15
- 打赏
- 举报
tmpStr=format(tmpstr,"0#######")
ydzqw 2003-06-15
- 打赏
- 举报
同意
用format
用format
awfikthh 2003-06-15
- 打赏
- 举报
dim tmpStr as string '取得的序号存入此变量
dim sortNumber as long
sortNumber=758757
for i=0 to 50
tmpStr=format(sortNumber+i,"0#######")
'分别取得序号
next
'00758757-00758807一共是51个号
dim sortNumber as long
sortNumber=758757
for i=0 to 50
tmpStr=format(sortNumber+i,"0#######")
'分别取得序号
next
'00758757-00758807一共是51个号
