游戏开发论坛

 找回密码
 立即注册
搜索
查看: 3667|回复: 18

一个问题

[复制链接]

87

主题

790

帖子

806

积分

高级会员

Rank: 4

积分
806
QQ
发表于 2008-7-17 17:41:00 | 显示全部楼层 |阅读模式
Private M()
Public count As Long
Property Let value(index, vData)
    M(index) = vData
End Property
Property Get value(index)
    value = M(index)
End Property
Function Add(fvalue)
    count = count + 1
    If count > 0 Then
        ReDim Preserve M(1 To count)
        M(count) = fvalue
    End If
End Function
Function DelInd(index) '按索引删除元素
    M(index) = ""
    If count >= 0 Then count = count - 1
    If count > 0 Then
        M(index) = M(count + 1)
        ReDim Preserve M(1 To count)
    Else
        Erase M
    End If
End Function

这是我写的集合类
现在的问题是M这个数组我要记录TYPE类型的,怎么做?总不可能一个TYPE类型写一个类吧

8

主题

186

帖子

186

积分

注册会员

Rank: 2

积分
186
发表于 2008-7-17 17:44:00 | 显示全部楼层

Re:一个问题

为什么不听我的意见还删自己的贴?难道这C++不好?

11

主题

747

帖子

752

积分

高级会员

Rank: 4

积分
752
发表于 2008-7-17 17:45:00 | 显示全部楼层

Re:一个问题

把M定为TYPE类型的数组.

为什么我的类不能定仪成公共类,模块里 public A as Class 以后,A类也只在模块里用才有效,怎么回事啊?

87

主题

790

帖子

806

积分

高级会员

Rank: 4

积分
806
QQ
 楼主| 发表于 2008-7-17 17:47:00 | 显示全部楼层

Re: Re:一个问题

jnmao: Re:一个问题

把M定为TYPE类型的数组.

为什么我的类不能定仪成公共类,模块里 public A as Class 以后,A类也只在模块里用才有效,怎么回事啊?

那换个TYPE怎么办?又要写个类?

11

主题

747

帖子

752

积分

高级会员

Rank: 4

积分
752
发表于 2008-7-17 17:48:00 | 显示全部楼层

Re:一个问题

换个TYPE?在定义一个TYPE类型,比如 M1

87

主题

790

帖子

806

积分

高级会员

Rank: 4

积分
806
QQ
 楼主| 发表于 2008-7-17 17:51:00 | 显示全部楼层

Re: Re:一个问题

jnmao: Re:一个问题

换个TYPE?在定义一个TYPE类型,比如 M1

那每定义一个TYPE下面的add几个方法都要重写一遍

11

主题

747

帖子

752

积分

高级会员

Rank: 4

积分
752
发表于 2008-7-17 17:57:00 | 显示全部楼层

Re:一个问题

你的程序里没定义TYPE,类可以被本身调用。TYPE和类是不一样的。

56

主题

758

帖子

768

积分

高级会员

Rank: 4

积分
768
发表于 2008-7-17 17:58:00 | 显示全部楼层

Re:一个问题

很久没有看到讨论技术的帖子了

87

主题

790

帖子

806

积分

高级会员

Rank: 4

积分
806
QQ
 楼主| 发表于 2008-7-17 18:12:00 | 显示全部楼层

Re: Re:一个问题

jnmao: Re:一个问题

你的程序里没定义TYPE,类可以被本身调用。TYPE和类是不一样的。

定义了也只能用一个TYPE啊

11

主题

747

帖子

752

积分

高级会员

Rank: 4

积分
752
发表于 2008-7-17 18:14:00 | 显示全部楼层

Re:一个问题

不懂你要做什么,用数组不行吗?
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

作品发布|文章投稿|广告合作|关于本站|游戏开发论坛 ( 闽ICP备17032699号-3 )

GMT+8, 2026-1-21 18:03

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表