投稿日	： 2005/05/11(Wed) 13:34
投稿者	： maruo
Ｅメール	：
ＵＲＬ	：
タイトル	： 制御方法について

はじめまして、
現在、下のプログラムでAutoCADの連続印刷をしています。
選択した複数の図面をリストボックスに代入して順番に処理
する様になっています。部数が1部の時はいいのですが
複部数になるとちょっと問題があるのです。
下の文だと
For i = 1 To Val(Text0.Text)　テキストボックスに数値（例：３）
を入れたとします。すると同じ図面が3枚重なってでてきます。
私の所は、A1用紙を出図するのが多いのですが、いつも並べ替えを
してる有様です。時間が非常にかかります。
それを、解消したいのです。
1〜5迄の図面を例えば3部　1.2.3.4.5/1.2.3.4.5/1.2.3.4.5
の様に後で並び替えをせずに出図するにはどうすればいいのでしょうか？
ご教授おねがいいたします。
-----------------------------------------------------------------------------------
   'リスト内のDWGファイルの数
    i = DwgList.listcount
    'リストの数だけ繰り返し
    For j = 0 to i -1
    'DWGファイル名
         importfile = DwgList.List(j)
        'リストボックスの図面をオープン
        Set acadDoc = acadApp.Documents.Open(importfile)
        '印刷実行
        If CheckBox1.Value = vbChecked And Val(Text0.Text) = 1 Then
        構文
        End If
        If CheckBox1.Value = vbChecked And Val(Text0.Text) > 1 Then
        For i = 1 To Val(Text0.Text)
        構文
        Next
        End If
-----------------------------------------------------------------------------------

        中略

        Next
-----------------------------------------------------------------------------------

★ - 制御方法について - maruo 05/11-13:34No.3127
• Re: 制御方法について - ぶぶ 05/11-13:41 No.3128
  • Re^2: 制御方法について - maruo 05/11-13:56 No.3129
    • Re^3: 制御方法について - 花ちゃん 05/11-14:08 No.3130
      • Re^4: 制御方法について - maruo 05/11-15:26 No.3140
        • Re^5: 制御方法について - maruo 05/11-20:09 No.3157
          • Re^6: 制御方法について - 花ちゃん 05/11-20:42 No.3158
          • Re^6: 制御方法について - ぶぶ 05/12-08:45 No.3163
            • Re^7: 制御方法について - maruo 05/13-07:45 No.3185