Visual Basic 2008の不透明度の障害
-
05-07-2019 - |
質問
ここには2つのファイルがあります。 1つはメインフォームで、もう1つは作成したダイアログです。ここでダイアログにコードを入力して、ダイアルフォームにあるタイマーから徐々に透明度を取得しようとしています:
If Me.Opacity = "100" Then
Timer1.Stop()
Timer1.Enabled = False
Else
Me.Opacity = Me.Opacity + 1
End If
次に、メインフォームから、ボタンを押すと次のようになります。
Dialog.Timer1.Enabled = True
Dialog.Timer1.Start()
これは機能しないようです。ボタンを押しても何もしません。
誰かがこれに対する解決策を見つけることができますか?
ありがとう、
ケビン
解決
ゼロと1の間で不透明度が測定されるため( 50%= 0.5
、 4%= 0.04
、 100%= 1
など)
もちろん、不透明度を数字 100
ではなく、文字列" 100"
と比較します。
所属していません StackOverflow