
No.3
- 回答日時:
ラベルを使います。
例えば、
lblBackとlblFrontの2つのラベルがあります。
lblBackの幅を1000(width)、Colorは白に設定。
lblFrontの幅も最初はlblBackと同じにします。Colorは青。
Private Sub InitProgress
lblFront.Width = 0
lblFront.Visible = True
lblBack.Visible = True
End Sub
Private Sub UpdateProgress(Status as Double)
lblFront.Width = lblBack.Width * Status
DoEvents
End Sub
Private Sub EndProgress
lblFront.Visible = False
lblBack.Visible = False
End Sub
Private Sub Button1_Click()
Call InitProgress
Do
'処理
Call UpdateProgress(処理数/合計数)
Loop
Call EndProgress
End Sub
手抜きですがこんな感じですかね。
後はご自分で工夫してください。
ありがとうございました。実行してみましたが、やり方が悪いのかDAO処理の為なのか、処理が終わってから満タンに表示されてしまいます。
No.2
- 回答日時:
N = 100
Me.進行ゲージ.Max = N
Me.進行ゲージ.Value = 0
Me.進行ゲージ.Visible = True
For I = 1 To N
No.1
- 回答日時:
プログレスバーに進行状況を表示するサンプルコードです。
Private Sub Form_Load()
Me.進行ゲージ.Visible = False
End Sub
Private Sub コマンド0_Click()
Dim I As Integer
Dim N As Integer
Me.進行ゲージ.Max = 100
Me.進行ゲージ.Value = 0
Me.進行ゲージ.Visible = True
For I = 1 To 100
Me.進行ゲージ.Value = I
Pause 0.1
DoEvents
Next I
Me.進行ゲージ.Visible = False
End Sub
[標準モジュール]
Public Sub Pause(ByVal PauseTime As Single)
Dim Finish As Single
Finish = Timer + PauseTime
Do
DoEvents
Loop Until Timer > Finish
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
今、見られている記事はコレ!
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
-
なぜ批判コメントをするの?その心理と向き合い方をカウンセラーにきいた!
今や生活に必要不可欠となったインターネット。手軽に情報を得られるだけでなく、ネットを介したコミュニケーションも一般的となった。それと同時に顕在化しているのが、他者に対する辛らつな意見だ。ネットニュース...
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ゲージ率の導出を教えて欲しい...
-
真空引きをしても-0.1Mpaになら...
-
オカメインコのゲージについて ...
-
対称に設置したひずみゲージの...
-
スキミゲージ?正式な名称は?
-
シクネスゲージの手入れ方法は?
-
プラレールには駅のアナウンス...
-
エアコンの真空引きのホースの...
-
発泡スチロールにキッチンハイター
-
2回路2接点のトグルスイッチで...
-
発泡スチロールをキレイに丸く...
-
発泡スチロール用ビスとかって...
-
ウレタンシールは発報スチロー...
-
貨車側面に書かれた漢字
-
タミヤポルシェ961 198...
-
陶芸の土の保管の仕方
-
FRPエアロのワンオフ製作
-
木工用ボンドは発泡スチロール...
-
スタイロフォームと発泡スチロ...
-
超信地旋回
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
オカメインコのゲージについて ...
-
プラレールには駅のアナウンス...
-
真空引きをしても-0.1Mpaになら...
-
ゲージ率の導出を教えて欲しい...
-
スキミゲージ?正式な名称は?
-
必要な蒸気量の計算方法は?
-
シクネスゲージの手入れ方法は?
-
エアコンの真空引きのホースの...
-
電磁相互作用について。
-
Accessフォームに進行状況ダイ...
-
対称に設置したひずみゲージの...
-
小動物のチンチラ2歳のゲージを...
-
ゲージ理論を勉強するには
-
ひずみゲージのメーカー選定と...
-
クーロンゲージとベクトルポテ...
-
エンジンチェンソーに関する質...
-
歪みゲージを使った応力測定
-
錆びついたノコギリを金属用や...
-
発泡スチロールにキッチンハイター
-
2回路2接点のトグルスイッチで...
おすすめ情報