Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


40969 / 76735 ←次へ | 前へ→

【40854】Re:ラベルの文字について
質問  tk  - 06/7/25(火) 11:28 -

引用なし
パスワード
   おはようございます。昨日はありがとうございました。
さっそく試させていただきました。
希望通りの動作でした。
これを、今自分が行っている作業に組み込みたいのですがどうも上手くいきません。
内容としては、フォーム上で登録のボタンをクリックしたら下記のように、progressbarを表示させその後、ある作業(動作)を行い、終了後、メッセージボックスが表示されます。
progressbarは実際の動作に平行して動くものではなく、ただのもどきです。
このときに、教えていただいた内容をprogressbarと同時進行させ(文字のスクロール)、メッセージボックスが表示される前にスクロールの文字が消える、ということがしたいのですが、どこにどのように組み込めばよいのかわかりません。
いろいろ試したのですがどうも上手くいきません。
なにとぞお力をお貸し下さい。

ProgressBar1.Max = 18000
 For i = 1 To 18000
   ProgressBar1.Value = ProgressBar1.Value + 1
   Label110.Caption = Int(i * 1 / 180) & "%"
   Frame4.Repaint
 Next i
   ProgressBar1.Value = 0

     ・・・作業・・・・

 MsgBox Me.ComboBox1.Value & "月の更新が終了しました。"

 Frame4.Label110.Caption = ""

0 hits

【40804】ラベルの文字について tk 06/7/24(月) 14:30 質問
【40820】Re:ラベルの文字について ichinose 06/7/24(月) 18:34 発言
【40852】Re:ラベルの文字について hori 06/7/25(火) 10:56 質問
【40854】Re:ラベルの文字について tk 06/7/25(火) 11:28 質問
【40873】Re:ラベルの文字について tk 06/7/25(火) 16:25 質問
【40893】Re:ラベルの文字について ichinose 06/7/25(火) 19:54 発言
【40896】Re:ラベルの文字について 追伸 ichinose 06/7/25(火) 20:21 発言
【40899】Re:ラベルの文字についての追伸2 ichinose 06/7/25(火) 21:44 発言
【40911】ラベルの文字について tk 06/7/26(水) 8:14 質問
【40908】Re:ラベルの文字について hori 06/7/26(水) 1:04 お礼
【40912】ラベルの文字について tk 06/7/26(水) 8:16 質問
【40927】Re:ラベルの文字について tk 06/7/26(水) 13:41 お礼

40969 / 76735 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free