| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 723 人关注过本帖
标题:矩阵函数参数引用的问题
取消只看楼主 加入收藏
zxlzzjz
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2008-4-15
收藏
 问题点数:0 回复次数:2 
矩阵函数参数引用的问题
大家都知道在VB6里可以用二维数组来代表矩阵,我先定义了一个函数为矩阵的转秩,但是不知道怎么引用,引用的参数是什么。
比如下面矩阵转秩的函数:
   Public Function Trans(m() As Double) As Double()
         Dim n()
         Dim hang As Integer ' 定义行数
         Dim lie As Integer  ’定义列数
         ReDim m(hang, lie)
         ReDim n(lie, hang)
         For i = 0 To hang - 1
            For j = 0 To lie - 1
             n(j, i) = m(i, j)
            Next j
         Next i
    End Function
自己写的应该对吧?  然后后面引用此函数时怎么用,比如对A(3,4) 进行转秩
应该是 Trans(A()) 还是 Trans(A(3,4)),还是别的,怎么得到 A的转秩? 如在文本框里显示,Text.text=?
总是出现类型不匹配,急死小弟了
另求高手讲解一下,数组和二维数组的引用规则,
搜索更多相关主题的帖子: 函数 矩阵 参数 
2008-04-15 17:52
zxlzzjz
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2008-4-15
收藏
得分:0 
谢谢楼上的大哥了。有点懂了。 但是比如定义此过程 为 Function Trans(m())
下面要调用此过程 怎么写语句呀 怎么总是 类型不匹配?
2008-04-15 19:24
zxlzzjz
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2008-4-15
收藏
得分:0 
关键是调用 过程中的参数怎么写 比如
'下面是求矩阵逆阵的函数
Public Function Inv(m() As Double) As Double()
Dim i As Integer
Dim j As Integer
Dim k As Integer
Dim n As Integer
下面N长
这是个通用过程,在窗体中调用INV函数
怎么写语句 急
如 dim a(2,1) as double
a(0,0)=1
...‘ 省略
a(2,1)=6
求a(2,1)的逆阵b()
怎么调用此INV函数

[[it] 本帖最后由 zxlzzjz 于 2008-4-15 20:32 编辑 [/it]]
2008-04-15 19:28
快速回复:矩阵函数参数引用的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.042076 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved