am si eu o problema in VB, vreau sa fac urmatoarea chestie
daca ProgressBar1 este la valuarea de 33% atunci
verifica daca checkbox1.checked = true atunci
Msgbox ("abc")
altfel
msgbox ("def")
End if
sa traduc mai pe inteles, cum am scris in visual basic
If progressbar1.value = 33 then
if checkbox1.cheked = true then
msgbox ("text1")
else
msgbox ("text2")
end if
end if
unde greseasc?
unde gresesc la acest cod, in VB
Moderators: Moderatori ajutatori, Moderatori
- DeaGle[A]
- Membru, skill 0
- Posts: 66
- Joined: 28 Aug 2009, 16:19
- Detinator Steam: Da
- CS Status: Citesc forumul eXtreamCS.com!
- Reputatie: Ban 4 luni !
(Ban scos de 1 mai!) - Has thanked: 6 times
- Been thanked: 2 times
Dai dublu click pe Button si baga codu :
Timer1.Start()
dupa dai click pe timer1 si bagi codu asta
Timer1.Start()
ProgressBar1.Increment(1)
If ProgressBar1.Value = 30 AndAlso CheckBox1.Checked = True Then
Timer1.Stop()
MsgBox("Ce mesaj sa apara daca e bifat")
ElseIf CheckBox1.Checked = False AndAlso ProgressBar1.Value = 30 Then
MsgBox("Ce mesaj sa apara daca nu e bifat")
Timer1.Stop()
End If
Timer1.Start()
dupa dai click pe timer1 si bagi codu asta
Timer1.Start()
ProgressBar1.Increment(1)
If ProgressBar1.Value = 30 AndAlso CheckBox1.Checked = True Then
Timer1.Stop()
MsgBox("Ce mesaj sa apara daca e bifat")
ElseIf CheckBox1.Checked = False AndAlso ProgressBar1.Value = 30 Then
MsgBox("Ce mesaj sa apara daca nu e bifat")
Timer1.Stop()
End If