unde gresesc la acest cod, in VB

Discutii despre tot ce nu se incadreaza in celelalte categorii.

Moderators: Moderatori ajutatori, Moderatori

Post Reply
User avatar
K0k0
Membru, skill +3
Membru, skill +3
Posts: 1217
Joined: 13 Feb 2014, 00:25
Detinator Steam: Da
Been thanked: 72 times

20 Aug 2014, 12:11

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?
RoyalServer
User avatar
NisQ
Utilizator neserios (tepar)
Utilizator neserios (tepar)
Posts: 4070
Joined: 26 May 2011, 01:52
Detinator Steam: Da
CS Status: 4k hours and still countin'
Detinator server CS: GG.FRAGWAY.COM
SteamID: nisq4vibe
Reputatie: Utilizator neserios (tepar)
Location: LONDON U.K
Has thanked: 29 times
Been thanked: 75 times
Contact:

20 Aug 2014, 12:20

if checkbox1.cheked = true then
checked*
Workin' on my sheet - https://dreambabes.co.uk/
User avatar
K0k0
Membru, skill +3
Membru, skill +3
Posts: 1217
Joined: 13 Feb 2014, 00:25
Detinator Steam: Da
Been thanked: 72 times

20 Aug 2014, 12:50

ma scuzi, e scris checked dar am transcris eu aici gresit, deci problema este alta
User avatar
sharkstar
Membru, skill +4
Membru, skill +4
Posts: 1735
Joined: 24 Dec 2012, 15:51
Detinator Steam: Da
CS Status: Rupetot
SteamID: privat
Location: Bucuresti
Has thanked: 70 times
Been thanked: 42 times

20 Aug 2014, 13:48

Nu inteleg de ce te chinui cu msgbox si nu folosesti un label...
I've never been more normal than I am now.
My tumblr
User avatar
DeaGle[A]
Membru, skill 0
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

20 Aug 2014, 14:26

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
User avatar
K0k0
Membru, skill +3
Membru, skill +3
Posts: 1217
Joined: 13 Feb 2014, 00:25
Detinator Steam: Da
Been thanked: 72 times

20 Aug 2014, 15:00

rezolvat!
Post Reply

Return to “Discutii generale”

  • Information