用ASP写组件

内容导读

互联网集市收集整理的这篇技术教程文章主要介绍了用ASP写组件，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含635字，纯文字阅读大概需要1分钟。

内容图文

打开VB,新建AX DLL,工程名为Str,类名count,输入如下代码:
代码如下:
Public Function add(ByVal a As Double, ByVal b As Double, ByVal c As Integer, ByVal d As Integer) As Double
d = CInt(d)

If c = 1 Then '加
add = FormatNumber(a + b, d)
ElseIf c = 2 Then '减
add = FormatNumber(a - b, d)
ElseIf c = 3 Then '乘
add = FormatNumber(a * b, d)
ElseIf c = 4 Then '除
add = FormatNumber(a / b, d)
End If

End Function


参数说明:a,b 为需要计算的数值,c为计算类型,d为小数点保留多少位

客户端ASP文件代码:

代码如下:
set obj=server.CreateObject("str.count") 
dim c 
c=obj.Add(455,45,4,2) 
Response.Write c  


上面代码执行结果就是:455除以45,小数点精确到百分位

内容总结

以上是互联网集市为您收集整理的用ASP写组件全部内容，希望文章能够帮你解决用ASP写组件所遇到的程序开发问题。 如果觉得互联网集市技术教程内容还不错，欢迎将互联网集市网站推荐给程序员好友。

内容备注

版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 gblab@vip.qq.com 举报，一经查实，本站将立刻删除。

内容手机端

---