投稿日 | : 2002/12/27(Fri) 12:43 |
投稿者 | : Lantern |
Eメール | : |
URL | : |
タイトル | : Re: タイマーコントロール 他の方法 |
メイン以外の各フォームに
Private WithEvents time1 As Timer 'タイマーをイベント付きで宣言
Private Sub Form_Load()
Set time1 = Form1.Timer1 'Form1はメインフォーム
'Timer1はメインフォームのタイマー
End Sub
Private Sub time1_Timer()
Me.Label1.Caption = Time
End Sub
としても実現できました^^