VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[過去ログ]
[管理用]
| 投稿日 | ： 2003/01/24(Fri) 18:51 |
| 投稿者 | ： 秋風 |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： 動的配列を返すプロシージャについて |
こんばんは。
動的配列を返すプロシージャついての質問なのですが、現在、VB5.0を使用
している為、Split関数が使えません。ですので、モジュールで、Split関数
を作成したのですが、その際、分割した後、配列を返したいのですができません。
コードとしましては、
本プログラム
Line Input #intfreefileno, TimeList ←ここに、A,B,C,…とデータがある
strTimeList() = split(TimeList)
…
モジュール
Function split(Time As String) As String() ←ここでエラー
Dim intcheck As Integer
Dim strtime(1 To 30) As String ←30個以内には、データは収まる
i = 1
Do
intlen = Len(Time)
intcheck = InStr(Time, ",")
If intcheck <> 0 Then
strtime(i) = Mid(Time, 1, intcheck - 1)
i = i + 1
End If
Time = Mid(Time, intcheck, intlen - intcheck)
Loop Until (intcheck = 0)
split = strtime
End Function
と、String()の()でエラーが出てしまいます。VB6.0だと使用可能
とありましたが、VB5.0では不可能でしょうか？調べてはみたものの
解決しませんでした。(;_;)
お分かりの方教えて下さい。お願いします。m(_ _)m
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）