网站公告列表

  没有公告

加入收藏
设为首页
联系站长
您现在的位置: 博瑞软件 >> 技术文章 >> 网络编程 >> asp >> 文章正文
  一段自动补位的函数(ASP)           ★★★ 【字体:
一段自动补位的函数(ASP)
作者:佚名    文章来源:网上收集    点击数:    更新时间:2008-6-23    
一段自动补位的函数

Function FormatSn(getNum,getBit)
Dim FormatsnNum,Formatsnpre,Formatsnj
FormatsnNum = getBit - len(getNum)
For Formatsnj = 1 To FormatsnNum
Formatsnpre = Formatsnpre & "0"
Next
FormatSn = Formatsnpre & getNum
End Function

使用方法 FormatSn(getNum,getBit)
getNum 计数
getBit 共几位

文章录入:admin    责任编辑:admin 
  • 上一篇文章:

  • 下一篇文章:
  • 发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
    最新热点 最新推荐 相关文章
    没有相关文章
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)
    Copyright©2001-2008 北京博瑞迅通软件技术研究所 版权所有
    京ICP备06052525号