VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2005/10/03(Mon) 15:04
投稿者DAI
URL
タイトルRe^2: 空の配列の判定

> 私は、こんな感じの関数で判断しています。
> (-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

丁寧に教えて頂きありがとうございます。

そうですか、こういったメソッドを準備しないといけないのですね。
勉強になりました。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -