我这里有2个文件。一个是我的主要形式,另一个是我做的对话。现在我想在这里输入代码对话框,逐渐从我在拨号表单上的计时器中获得透明度:
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()
这似乎不起作用。当我按下按钮时,它什么也没做。
有人可以找到解决方案吗?
谢谢,
凯文
答案 0 :(得分:1)
因为不透明度在零到一(50% = 0.5
,4% = 0.04
,100% = 1
等之间测量。
更不用说你将不透明度与字符串"100"
进行比较而不是数字100
。