Evt sevgili Okurlarım...
Şimdi sizlere "Alarm Programı" yapma yöntemini Göstereceğim...
Randevularınıza geç kalmayın...
Formunuza; bir timer1, bir tane text1, ve label1 atıp calıştırın.
Kodları veriyorum
Private Sub Command1_Click()
Text1 = DateAdd("n", 1, Time)
End Sub
Private Sub Form_Load()
Command1_Click
End Sub
Private Sub Timer1_Timer()
label1 = Time
If label1 = Text1 Then
mp.Controls.play
End If
End Sub