王峰炬

摘要： 快速组合数C（N，K）=N*（N-1）*（N-2）*...*(N-K+1)/1*2*3*...*K 的求法： Function ZDGYS(ByVal x As Long, ByVal y As Long) As Long 'GET Greatest Common Divisor最大公约数... 阅读全文

摘要： 下面的算法在 http://www.csdn.net/Develop/Edit.asp?id=28308基础上改进，比其至少快10%： Sub calcfactorial(ByVal n As Integer)Dim XYS() As Integer, x() As Integer, y() As... 阅读全文

摘要： 今天整理文件时发现了以前写的货币金额中文转换（转换一亿亿元以下数目的货币）的代码，帖出来与大家共享： Function daxie(money As String) As String 'Dim x As String, y As StringConst zimu = ".sbqwsbqysb... 阅读全文