以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  自定义函数返回多个值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=77100)

--  作者:newsun2k
--  发布时间:2015/11/11 9:28:00
--  自定义函数返回多个值
如题,如何实现?
或者可否自定义一个类?

--  作者:大红袍
--  发布时间:2015/11/11 9:39:00
--  

自定义类,在全局代码那里定义

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=73927&skin=0

 

如果返回多个值,可以弄成数组或集合返回。


--  作者:newsun2k
--  发布时间:2015/11/11 10:44:00
--  
嗯,类的这个比较适合我。
不过只有只读的属性,如何设置可读写的类的属性?


--  作者:newsun2k
--  发布时间:2015/11/11 10:45:00
--  

就是这个,赋值是什么?set? 

 Public ReadOnly Property CtsTmr As System.Windows.Forms.Timer

        Get

            Return _CtsTmr

        End Get

    End Property


--  作者:大红袍
--  发布时间:2015/11/11 11:09:00
--  

没必要这样写,简单一点的,直接定义就好了,如

 

Public a As String

Public b as Integer


--  作者:大红袍
--  发布时间:2015/11/11 11:11:00
--  

Class ABC

 

 Private m_integer As Integer

 Public Property [Integer]() As Integer
  Get
   Return m_integer
  End Get
  Set
   m_integer = value
  End Set
 End Property

End Class