Class Kin
    Private oConn '//连接对象
 public function hao(a,b)
a=b
end function
end class
aaa=new kin
aaa.hao oConn,"123456"
能对class中的oConn变量进行传递参数吗?
已经定义的参数,我有用,asp用的
我学过c语言,那个能传递参数的
vb能吗;能的话要怎么用,详细点

解决方案 »

  1.   

    aaa=new kin
    aaa.oConn = 111
    aaa.hao aaa.oConn,"123456"
      

  2.   

    我是想问能用function函数传递参数吗?
    我想用这个功能而不是直接给他复制的啊
    例如 
    aaa=new kin
    aaa.oConn = 111
    aaa.hao aaa.oConn,join(array,"and")
    能把数组的值传递给class中的hao 吗???
    用这个还能传递至进去吗aaa.hao bbb,join(array,"and")给oConn穿进去参数吗???
      

  3.   


    Public oConn '//连接对象
    Public Function hao(a, b)
    a = b
    End Function'''''''''''''''''''''''''''''''
    aaa=new kin
    aaa.oConn = 111
    aaa.hao aaa.oConn,join(array,"and")
      

  4.   

    dll是什么啊??
    我学过c语言没学vb;请指点,谢谢
      

  5.   

    好像是这么的传递的是指针或者是 &变量名 或者用指针就能传递参数的
    指针式 * 定义指针
      

  6.   

    你可以用 c/c++ 写个例子,我可以告诉你 VB 能不能实现或怎么去实现
      

  7.   

    这个不知道能不能用,就是这个意思,忘记c语言的指针怎么用了main(){
    int *a=0;
    clrscr();
    void hao(int &p,int q)
    {p=q; }
    hao(&a,100);
    printf("%d",*a);
       getch();
    }
    你看看我这段代码能用吗,VB的,我测试者是能用
    Class Kin_Db_Pager
    Private sSqlCond
    Private aSqlCond()
    '//字符串转换数组,e数组,s字符串 添加开始
    Private Sub StrToArray(e,s)
    if not IsBlank(e) then exit sub  '// IsBlank是判断 e 是不是为空
    redim  Preserve e(ubound(split(s," ")))
    for j= lbound(split(s," ")) to ubound(split(s," "))
    e(j)=split(s," ")(j)
    next
    end Sub
    call StrToArray aSqlCond,"hao1 hao2 hao3"
    最后数组 aSqlCond() 有3个元素分别是hao1,hao2,hao3.我不知道这么用好不好,是否符合vb语法
    我是这是这个结果你看这样能用吗???
      

  8.   

    C/C++ 程序不能像你那样写呀,又不是 java
    而且你指针的概念也很混乱,你的程序放到任何一个 C/C++编译都不会通过,不知道
    你想表达什么。
      

  9.   

    在 C 语言里,指针代表某个内存地址,应为 Windows 是 32 位系统,所以指针的地址也是 32 位的。
    在 VB 里可以用一个 Long 类型来存储这种指针地址,可以用 API 将这种地址内存中的值复制到指定
    的内存地址中。
      

  10.   

    分给你吧,我想知道能不能用,
    Class Kin_Db_Pager
    public sSqlCond 
    public aSqlCond()
        Private Sub Class_Initialize()
            redim aSqlCond(-1)
    end sub
    '//字符串转换数组,e数组,s字符串 添加开始
     public Sub StrToArray(e,s)
     if not IsBlank(e) then exit sub '// IsBlank是判断 e 是不是为空
    redim Preserve e(ubound(split(s," ")))
     for j= lbound(split(s," ")) to ubound(split(s," "))
     e(j)=split(s," ")(j)
     next
     end Sub
    end class
    dim chuan
    chuan=new Kin_Db_Pager
    chuan.StrToArray aSqlCond,"hao1 hao2 hao3"最后 aSqlCond数组吗中字符串吗??
      

  11.   

    你的程序肯定不行,你连基本的类属性是什么都没搞清楚,所以才有
    chuan.StrToArray aSqlCond,"hao1 hao2 hao3"
    的写法出来aSqlCond 是你 chuan 对象的一个属性,不能直接这么就调用到了的
    比如你看看chuan1=new Kin_Db_Pager
    chuan2=new Kin_Db_Pager按照你的理解这时的 aSqlCond 是哪个对象实例的属性?
    所以只有
    chuan1.aSqlCond

    chuan2.aSqlCond
    才能表示清楚 aSqlCond 是那个对象的属性
      

  12.   

    set chuan=new Kin_Db_Pager
    chuan.StrToArray aSqlCond,"hao1 hao2 hao3"
    这个呢
    你说的那个api能举个简单的例子吗??
    谢谢