If scan.Checked = False Then
Dim msg As Int
msg = Msgbox2("اگر تیک برداشته شود صدا نمی آید!","اخطــار","نه","","باشه",LoadBitmap(File.DirAssets,"settingspower.png"))
If DialogResponse.NEGATIVE Then
scan.Checked = False
Else if DialogResponse.POSITIVE Then
scan.Checked = True
End If
End If
If scan.Checked = True Then
audio.Load(File.DirAssets,"paper.mp3")
audio.Play
End If
سوال
hosseinji 17
آیا این کدم اشتباهه؟؟
If scan.Checked = False Then Dim msg As Int msg = Msgbox2("اگر تیک برداشته شود صدا نمی آید!","اخطــار","نه","","باشه",LoadBitmap(File.DirAssets,"settingspower.png")) If DialogResponse.NEGATIVE Then scan.Checked = False Else if DialogResponse.POSITIVE Then scan.Checked = True End If End If If scan.Checked = True Then audio.Load(File.DirAssets,"paper.mp3") audio.Play End Ifلینک ارسال
به اشتراک گذاری در سایت های دیگر
0 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.