在一个小于 10 的整数前面怎么加个 0 ??????????????????

800_1 2002-11-07 03:34:14
Dim c(i) As Integer
Dim x As Integer

For x = 1 To i
If chk(x).Checked = True Then
If x < 10 Then
c(i)._________________  要怎么填?
ElseIf x >= 10 Then
c(i) = x
End If
...全文
576 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
Donmi 2002-11-08
  • 打赏
  • 举报
回复
不可能,首先,你将c(i)格式化后又赋给c(i),等于将整数字符化后又赋给整型变量,系统又将自动进行类型转换,但得到的结果也不可能全为0,应该还是c(i)的原值。
800_1 2002-11-08
  • 打赏
  • 举报
回复
问题解决了,谢谢各位师兄
800_1 2002-11-07
  • 打赏
  • 举报
回复
c(i) = Format(c(i), "00")

显示出小于10的全为0
yufenfeila 2002-11-07
  • 打赏
  • 举报
回复
Integer类型不能在前面加0,可以先转换成String类型再加0
yohomonkey 2002-11-07
  • 打赏
  • 举报
回复
只能使用string,比较或是提取是使用cint()来转换!
Donmi 2002-11-07
  • 打赏
  • 举报
回复
不可能,因为你的c(i)是Integer类型,即使你加上0系统也会自动去除的,不信你可试试:c(i)=06,结果:c(i)=6,但若转换成字符串则可以用Format(c(i),"00")
oo渣渣oo 2002-11-07
  • 打赏
  • 举报
回复
Format(10,"00#")

16,722

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧