VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[過去ログ]
[管理用]
| 投稿日 | ： 2002/11/06(Wed) 10:08 |
| 投稿者 | ： 半人前 |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^2: 処理が遅すぎる。 |
返信ありがとうございます。
立ち上がるまでの時間はわかるのですが、立ち上げてから一つの計算を求めるのにものすごく、
時間がかかります。（約5分）
'1位の数を数える
For i = 1 To 10000 - 1
If DataTable(7, i) Like Range("A1").Value And DataTable(6, i) = "1" Then
cnt = cnt + 1
End If
Next i
このようなコードなのですが、これだけで答えがでるまで5分くらいかかります。
上のようなコードが他に248個あります。
コードは長いですが、以前は1分30秒くらいですべて表示されました。
急に処理が重くなることはあるのでしょうか？
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）