2005-11-20から1日間の記事一覧
ここで知ったので、とりあえずメモって感じ。Class CString Private m_str ' 初期化 Private Sub Class_Initialize() m_str = "" End Sub ' プロパティに値を代入するメソッド Public Sub SetString(str) m_str = str End sub Public Property Get Length() …
ここで知ったので、とりあえずメモって感じ。Class CString Private m_str ' 初期化 Private Sub Class_Initialize() m_str = "" End Sub ' プロパティに値を代入するメソッド Public Sub SetString(str) m_str = str End sub Public Property Get Length() …