フレキシブルグリッドコントロールにCSVファイルを出力 (ID:111658)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 初めまして、ＶＢ初心者で説明や理解にもたつくと思いますが、 どうかご教授願います。 今、住所録ソフトを作成しています。 住所録のデータはcsv形式のファイルに収めています。 このデータを一覧表示しようと思い、 フレキシブルグリッドコントロールにＣＳＶファイルのデータを表示させようと 思ったのですが、その方法がよくわかりません。 ネットで調べた感じでは Private Sub Command1_Click() Dim i, n As Integer Dim Num(100), Name(100), sex(100), tel(100) Open "c:\My Documents\住所録.csv" For Input As #1 n = 0 Do Until EOF(1) n = n + 1 Input #1, Num(100), Name(100), sex(100), tel(100) Loop With MSFlexGrid1 For i = 1 To n .Row = i .Col = 0: .Text = Num(i) .Col = 2: .Text = Name(i) .Col = 3: .Text = sex(i) .Col = 4: .Text = tel(i) Next i End With Close #1 End Sub って感じでいけるかと思ったのですが、動作しません。