vb高手 ,sos! Dim i As LongFor i = 1 To 400 Debug.Print Format(i, "000")Next i 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Dim i As String Dim intI As Integer i = "0000" intI = Val(i) i = String(4 - Trim(Str(intI + 1)), "0") + Trim(Str(intI + 1)) Debug.Print i 應該是這樣: i="000" intI=val(i)i=string(3-trim(str(intI+1)),"0")+trim(str(intI+1)) 如何把剪切板中的GIF给保存下来?! 再问:非常难的VB多元不定方程的正数优解问题 如何将cad的dxf文件,打包到dll文件中。 vb如何调用服务器建立好的dts包? 求教:VB的报表问题! 已经用ADO 控件连接到数据库,请问语句中的加号的作用是什么? 使用vb.net tts转换文本为wav时,下面的源代码如何写?????????? 请那位好心的大哥能解决或提示一下..... dll的问题() 有关触发器…… 有关msflexgrid的两个问题? 关于加密问题,HELP ME
Dim intI As Integer
i = "0000"
intI = Val(i)
i = String(4 - Trim(Str(intI + 1)), "0") + Trim(Str(intI + 1))
Debug.Print i
i="000"
intI=val(i)
i=string(3-trim(str(intI+1)),"0")+trim(str(intI+1))