小问题~ 如何 把一个小数分成两个数? 如 3.5 怎样 把它分成 3 和 5 两个数??? 如何 把一个小数分成两个数? 如 3.5 怎样 把它分成 3 和 5 两个数???哪位大哥帮下忙! 先谢了顺便问个 问题 Access 数据库中的 自动编号 在使用一段时间后 怎样把它 重新置为 1 ?? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 a = Int(3.56511)b = 3.56511 - Int(3.56511)For n = 1 To Len(b) - 1b = b * 10NextPrint aPrint b 先取得小数的长度(包含小数点)再用left和right函数分别取两边的字符 a = Int(Val(Text1.Text))b = Mid(Val(Text1.Text), Len(a) + 2)Print aPrint b这个更好 1dim arr() as stringarr = split("3.5", ".")debug.print arr(0)debug.print arr(1)2删除所有数据后压缩数据库。 Access 数据库中的 自动编号 在使用一段时间后 怎样把它 重新置为 1 ??答:你先把表里数据全部删除了,然后点 工具->数据库实用工具->压缩和修复数据库就可以了,你下次再输入数据时自动编号就又会从1开始 请教组合查询的问题 vb 时间格式化输出函数 谁在word中用过vb的控件,请近来帮个忙看看吧!在线等 把excel中的数据导入access数据库问题???急!!十万火急啊!!! vb6中如何清楚历史记录啊 如何在DATEGRID中加入求和功能? 200分高分求crc 16源代码,急急急!!! 再这样下去,VB版就没有前途了,工作人员,你们要多发掘人才振兴我版啊!!!! 近来拿分 ActiveX到底是什么?? 做图形的朋友可以看一下 或许会有帮助. 求一sql 语句,将表中某字段中记录有重复值的查询出来?查询结果要有其它字段。急
b = 3.56511 - Int(3.56511)
For n = 1 To Len(b) - 1
b = b * 10
Next
Print a
Print b
再用left和right函数分别取两边的字符
b = Mid(Val(Text1.Text), Len(a) + 2)
Print a
Print b
这个更好
dim arr() as string
arr = split("3.5", ".")debug.print arr(0)
debug.print arr(1)2
删除所有数据后压缩数据库。