打开VB,新建AXDLL,工程名为Str,类名count,输入如下代码: 代码如下: PublicFunctionadd(ByValaAsDouble,ByValbAsDouble,ByValcAsInteger,ByValdAsInteger)AsDouble d=CInt(d) Ifc=1Then''加 add=FormatNumber(a+b,d) ElseIfc=2Then''减 add=FormatNumber(a-b,d) ElseIfc=
作者: 来源: 时间: 17-11-23 15:10:05
关于5UCMS 您有任何需求 均可以留言给我们