サンプル投稿用掲示板　　VB2005 〜 用トップページ　　VB6.0 用 トップページ 空の配列の判定(次元数/サイズ/最小値/最大値の取得）(VB6.0) ( No.0 ) 　[親スレッドへ] 日時： 2011/04/05 10:37 名前： 花ちゃん *********************************************************************************** * カテゴリー：[基本コード][応用コード][]                                          * * キーワード：Null,GetMem4,次元数,要素数,,                                        * *********************************************************************************** 元質問：空の配列の判定 - DAI 　2005/10/03-13:56 No.4555 空の配列を判定したいのですが、どのように記述してよいのかわかりません。 ----------------------------------------------------------------------------------- Re: 空の配列の判定 - いな 　2005/10/03-14:33 No.4556 ----------------------------------------------------------------------------------- 私は、こんな感じの関数で判断しています。 (-1ならば、空の配列) '********************************************************************* ' 機    能  : 配列の要素数を返す ' 引 き 数  : strArray  配列 '********************************************************************* Public Function cmnUBound(strAr() As String) As Long     On Error GoTo cmnUBound_ERR          cmnUBound = UBound(strAr)     Exit Function cmnUBound_ERR:     If Err.Number = 9 Then         cmnUBound = -1     End If End Function

　[スレッド一覧へ]　[親スレッドへ]