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

投稿日: 2003/07/13(Sun) 01:19
投稿者tea
Eメール
URL
タイトルMSFlexGridの印刷の質問

MSFlexGridの印刷の質問なんですが、下記コードで実行すると
氏名の1段下に記録項目が表示されてしまいます。
また、各記録項目のデータも各項目の下には表示されません。
どうか教えてください。
よろしくお願いします。

'MSFlexGrid2(0)の記録項目'
            Printer.FontSize = 12: Printer.FontBold = False
            Printer.CurrentX = Lyohaku '左余白'
            Printer.CurrentY = Uyohaku   '上余白'
            Printer.Print "氏    名" & Space$(4) & "  Shoot  " & Space$(1) & "    3Point " & Space$(1) & _
            "  2Point " & Space$(1) & "   F T   " & Space$(1) & " 総得点 " & Space$(1) & _
            " Rebound " & Space$(1) & "  Assist " & Space$(1) & "  Steel  " & Space$(1) & _
            "BlockShot" & Space$(1) & "   Foul  "
            Printer.CurrentY = Printer.CurrentY + 0.5
                        
            '各個人データの印字'
            For i = 1 To Ken
                MSFlexGrid2(0).Row = i
                    For j = 1 To Koumoku
                        MSFlexGrid2(0).Col = j
                        Printer.Print Tab((j - 1) * 11) _
                        ; Right$("    " & Format(MSFlexGrid2(0).Text, _
                        "########"), 8);
                     Next j
                
                '改行幅を1.5倍に設定'
                Printer.CurrentY = Printer.CurrentY + 0.5
                Printer.CurrentX = Lyohaku + 1   '左余白'
                
            Next i


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

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

- Web Forum -