Asp组件初级入门与精通系列之四

原创 2004年08月04日 02:54:00

数组问题

数组在程序中使用的很多,而且比较容易出问题

我们通过小例子来看看

 <?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

打开vb6,新建Activex Dll工程。工程名修改为fCom,类名修改为fC4

点击菜单->工具->添加过程

我们在名称内输入AcceptArray1,类型选择子程序,范围选择公有,然后确定

再次操作:在名称内输入AcceptArray2,类型选择函数,范围选择公有,然后确定即可

功能:传递数组地址到组件,使用ByRef关键字,并赋值返回

Public Sub AcceptArray1(ByRef varray As Variant) As Variant

    varray(0) = "龙卷风"

    varray(1) = "20"

End Sub

 

功能:返回一个字符串数组

Public Function AcceptArray2() As Variant

       Dim a(2) as Variant

    a(0) = "龙卷风"

a(1) = "20"

AcceptArray2=a

End Function

 

Ok,一个组件就写好了,点击菜单->文件->生成fCom.dll文件

确定,在目录下就会有fCom.dll文件

 

测试

打开visual interdev6.0,生成一个asp文件

 

<%@ Language=VBScript %>

<HTML>

<BODY>

<%

dim obj

set obj = server.createobject("fCom.fC4")

dim a(2)

'测试第一个组件方法

obj.AcceptArray1(a)

response.write a(0)

response.write "<br>"

response.write a(1)

response.write "<br>"

'测试第二个组件方法

dim b

b=obj.AcceptArray2()

for i=0 to ubound(b)

Response.Write b(i)

response.write "<br>"

next

%>

 

</BODY>

</HTML>

 

配置好虚拟目录,在ie中执行此asp文件,得到结果如下:

龙卷风
20
龙卷风
20

 

总结一下:

字符串,数字通过值传递或者作为返回值被返回

如果使用引用传递,将参数的类型设为Variant。这样做可以避免一些错误。不过尽可能的减少引用传递参数

 

未完待续

软件测试自学指南---从入门到精通

近来,软件测试行业发展迅速,企业越来越重视测试了。越来越多的人加入了测试大军中,很多人也想通过自学来学习软件测试技术加入这个行业,但是现在软件测试的书籍越来越多,也良莠不齐,而且软件测试涉及的技术也越...
  • xc5683
  • xc5683
  • 2013年07月24日 13:30
  • 170862

C#从入门到精通源码资源汇总下载(全部免积分)

NET学习从入门到精通100+源代码大放送 专辑中全部是源码资源,有基础学习源码,也有从网上需要购买的源码,现在全部免积分供大家学习参考 专辑地址为:http://download.csdn.n...
  • swj524152416
  • swj524152416
  • 2016年11月01日 16:51
  • 5268

一入侯门“深”似海,深度学习深几许(入门系列之一)

在这个深度学习系列文章中,我们力图用最为通俗易懂、图文并茂的方式,带你入门深度学习。我们都知道,高手从来都是自学出来的。所以,这个深度学习的入门系列,能带给你的是“从入门到精通”,还是“从入门到放弃”...
  • yhily2008
  • yhily2008
  • 2017年05月23日 06:45
  • 1201

asp.net 初级入门学习之ATM

这不, 看到这个14:00, 就想起昨晚整到凌晨才把这个ATM写完, 提笔的有点晚,不过, 基本上还是完成了。 本次博文的目的是把刚学的asp.net 基础知识再巩固下。若有雷同,纯属偶合~~~ ...
  • HK_5788
  • HK_5788
  • 2015年06月17日 14:31
  • 679

初级入门ASP基本语法知识

  • 2010年11月08日 20:11
  • 56KB
  • 下载

asp.net初级入门

  • 2008年02月09日 20:06
  • 2.36MB
  • 下载

ASP.NET初级入门经典

  • 2009年03月10日 15:48
  • 2.03MB
  • 下载

mui初级入门教程(四)— 再谈webview,从小白变“大神”!

写在前面 前段时间群里某网友的问题,弹出菜单被子页面挡住了这个老生常谈的问题,其实只要明白webview常见的层级问题,这个问题很容易解释,那么解决方案自然很容易想到,如果没有理解错,html5...
  • qq_24531461
  • qq_24531461
  • 2017年11月09日 16:58
  • 138

微信公众平台开发教程之新手初级入门攻略 附PHP代码实例

在这篇入门教程中,我们假定你已经有了PHP语言程序、MySQL数据库、计算机网络通讯及XML语言基础。如果你还没有,那么请先学习相关知识。 我们将使用微信公众账号豆立方(微信号:BeanCube...
  • binsoft
  • binsoft
  • 2014年08月30日 14:07
  • 21102

maven初级入门

1.maven的介绍 1.Maven项目对象模型(POM),可以通过一小段描述信息来管理项目的构建,报告和文档的软件项目管理工具。 Maven 除了以程序构建能力为特色之外,还提供高级项目...
  • z18447052654
  • z18447052654
  • 2018年01月09日 14:27
  • 31
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:Asp组件初级入门与精通系列之四
举报原因:
原因补充:

(最多只允许输入30个字)