プログラムの組み方について (ID:126784)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 案①間違えてました。正しくはこちらです。 案① Private Sub H_Up_Click() If (High.text < 5) Then Timer_Start msgbox "aa" End If End Sub Private Sub S_Up_Click() If (Speed.text < 5) Then Timer_Start msgbox "bb" End If End Sub Private Sub I_Up_Click() Timer_Start If (Interval.text < 5) Then Timer_Start msgbox "cc" End If End Sub Private Sub Timer_Start() If (Timer1.Enabled = False) Then Timer1.Enabled = True End If End Sub