投稿日	： 2004/03/25(Thu) 15:19
投稿者	： くるりん
Ｅメール	：
ＵＲＬ	：
タイトル	： Re^3: 印刷関係での質問です

こんにちわ。少し変更してがんばってみてたのですが、フォームに出力されずどのように進んでいるか
わからなかったので再度質問させていただきます。

様子見用のform2を作成して、以下のようにコードを一部修正しました。

Form2.show

If iflag = 1 Then
    Form2.Cls
    Form2.Line (xline, (yline - 1) * (40 * 6))-((xcnt + 1) * (32 * 6), yline * (40 * 6)), QBColor(11), BF
    Debug.Print xline, (xcnt + 1) * (32 * 6)
    iflag = 0
else
    Form2.Cls
    Form2.Line (xline, (yline - 1) * (40 * 6))-((xcnt + 1) * (32 * 6), yline * (40 * 6)), QBColor(11), BF
    Debug.Print xline, (xcnt + 1) * (32 * 6)
    iflag = 1
End If
      
最初Form1で動かしてみたのですが、 Form1.Cls のところでForm1に全く変化がみられずその後のLine命令でも表示上に変化が見られませんでした。
また、以前のコードではX軸の指定がきちんと出来ていないということがわかったのでその部分は修正いたしました。

お手数ですがご助言をよろしくおねがいします。

★ - 印刷関係での質問です - くるりん 03/24-16:49No.8487
• Re: 印刷関係での質問です - 花ちゃん 03/24-23:03 No.8493
  • Re^2: 印刷関係での質問です - くるりん 03/25-10:28 No.8495
    • Re^3: 印刷関係での質問です - くるりん 03/25-15:19 No.8499
      • Re^4: 印刷関係での質問です - morimori 03/25-15:52 No.8500
        • ありがとうございました〜。 - くるりん 03/25-16:46 No.8501