[求助]VB中数的转换问题

xbb[DFCG] · 发表于 2005-4-11 21:37:21

请问各位编程高手们，如何将一个小于10000或者大于99999的数转换为价于10000和99999之间的数？在VB中如何用代码实现？帮帮忙，本人的编程很差。谢谢了。

noTme · 发表于 2005-4-12 11:06:36

x=iif((x mod 100000)<10000,x mod 100000+10000,x mod 100000)
这零的数目不知道可对!

xbb[DFCG] · 发表于 2005-4-12 20:10:27

谢谢坛主，试试先。

xbb[DFCG] · 发表于 2005-4-12 21:47:02

请教坛主，如果要把一个大于99999的数转为小于99999的数只要用这种形式就行了吗？
X MOD 100000
在线等回复！

xbb[DFCG] · 发表于 2005-4-12 22:11:40

如果我想用下面的方式调用这个转换子过程的话，下面的代码对吗？
If t2 > 99999 Then
Call ss(t1)
End If

Sub ss(ByRef t As Long)
t = IIf(Str(t) Mod 100000)

麻烦你说明一下。谢谢了。

noTme · 发表于 2005-4-13 17:27:29

不用这样的 IIF函数的意思是实现那个IF。。ELSE。。。功能
直接用
X MOD 100000 就OK了

不过太大的数可能会溢出。

		自动登录	找回密码
密码			加入我们