VB6.0 WinXP Pro

メモ帳などで事前に名簿（最小５名、最大１８名）を用意しておいて、それを読み込ん
でMSFlexGridの３列目に順に表示させているんですが、名簿を読み込む際にMSFlexGrid
の２列目に先頭の番号を４から順に２１までの番号を人数分だけ自動（一緒に）で表示
させたいんです。２１未満の場合は番号欄は空白のままです。

以下の箇所のどこかに新たな記述を行えばいいんじゃないかとは思うんですが、わから
ないんです・・・。
どうか、よろしくお願いします。

Option Explicit

'ユーザー定義型変数を宣言
Private Type UPlayer
    Parent As Team
    IsDirty As Boolean

    UniformNumber As Long
    Name As String
    IsCaptain As Boolean
    IsStartingMember As Boolean
    IsPlayIn As Boolean
    GetTimeout As Boolean
    
    'トピックの最小から最大まで'
    TopicCount(bbTopicTypeCountMin To bbTopicTypeCountMax) As Long
    'ファウルの最小から最大まで'
    FoulType(bbPlayerFoulMin To bbPlayerFoulMax) As String
    ThrowOutFoulCount As Long
End Type

'mpに代入
Private mp As UPlayer

'選手背番号欄に番号を入れる。または空白にする。
Public Property Get UniformNumberString() As String

    'もし、MSFlexGridのセルに氏名が登録されている場合
    If IsRegisted Then
        'mp.UniformNumberを代入
        UniformNumberString = CStr(mp.UniformNumber)
    'MSFlexGridのセルに氏名が登録されていないセルがある場合
    Else
        '選手背番号欄（MSFlexGridの２列目）は空白のまま
        UniformNumberString = ""
    End If
End Property

> メモ帳などで事前に名簿（最小５名、最大１８名）を用意しておいて、それを読み込ん
> でMSFlexGridの３列目に順に表示させているんですが、名簿を読み込む際にMSFlexGrid

どこでどのようにして読み込んでいるのですか？

> 以下の箇所のどこかに新たな記述を行えばいいんじゃないかとは思うんですが、わから
> ないんです・・・。
普通は、読み込み表示設定しているところでするのではないでしょうか？

このプログラムは、ご自分で作ったのではないのですか？　
ご自分で作ったものならどこで何をしているか、解るはずでは。
ご自分で作ったのではないのなら、作られた方に聞いた方がいいいのでは。

花ちゃんさん、回答ありがとうございます。
実は最初は自分でコツコツ作っていたんですが、ある方が大幅に作り直してくれたん
です。その後音信不通となり、自分でコードが読めなくなってしまって・・・。
よくコードを見直して、それから再度質問させていただきます。

> どこでどのようにして読み込んでいるのですか？
>
> > 以下の箇所のどこかに新たな記述を行えばいいんじゃないかとは思うんですが、わから
> > ないんです・・・。
> 普通は、読み込み表示設定しているところでするのではないでしょうか？
>
> このプログラムは、ご自分で作ったのではないのですか？　
> ご自分で作ったものならどこで何をしているか、解るはずでは。
> ご自分で作ったのではないのなら、作られた方に聞いた方がいいいのでは。