[es] - program za testiranje

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

^{14.11.2006. u 12:05 - pre 213 meseci}

hvala puno

jel možeš da mi objasniš ovo sta radi cstr i val ???

txtRezultat.Text = CStr(Val(txtRezultat.Text) + Val(txtBodovi.Text))

Odgovor na temu

goranvuc
Goran Vucicevic
Novi Sad

Član broj: 4934
Poruke: 1846
*.dialup.neobee.net.

+41 Profil

Re: program za testiranje

^{14.11.2006. u 12:11 - pre 213 meseci}

U pitanju su konverzije tipova, ukratko receno.

Na ovaj nacin se sprecava konkatenacija stringova, jer je u VB-u znak za povezivanje stringova i "+" i "&", a da bi bilo nedvosmisleno, najbolje je da koristis "&", a ja namerno nisam menjao da bi uocila problem. Zato su ti se brojevi spajali, umesto sabirali. Ja sam na ovaj nacin naterao VB da prvo sabere (a ne da spoji brojeve), pa onda dodeli Text svojstvu od Textbox-a.

Naravno da se ti izrazi mogu pisati na veliki broj nacina, ali to je neka druga prica.

Knjigu u sake, ako ces se ovim ozbiljnije baviti i kreni od osnovnih tipova, pa onda predji na "crtanje" i dogadjaje.

Odgovor na temu

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.co.yu
Via: [es] mailing liste

Profil

Re: program za testiranje

^{14.11.2006. u 12:41 - pre 213 meseci}

A ako sam stavila da mi jedata format Number?? Jel on to konta??

>

Odgovor na temu

goranvuc
Goran Vucicevic
Novi Sad

Član broj: 4934
Poruke: 1846
*.dialup.neobee.net.

+41 Profil

Re: program za testiranje

^{14.11.2006. u 12:45 - pre 213 meseci}

"On" to ne konta

DataFormat sluzi za formatiranje vrednosti kada je Textbox "povezan" za polje iz rekordset-a i sl.
Textbox ima svojstvo Text koje je osnovnog tipa String "uvek i za svagda".

Odgovor na temu

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

Re: program za testiranje

^{14.11.2006. u 12:49 - pre 213 meseci}

ok, hvala puno na pomoći....

Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
*.beobug.com.

+7 Profil

Re: program za testiranje

^{14.11.2006. u 13:16 - pre 213 meseci}

Popravili smo vas program
Mozete da skinete zip sa http://www.extramedia.co.yu/eurora3d/files/ReIspitEM.zip
Pozdrav
Nebojsa

HomePage http://www.eurora3d.com

Odgovor na temu

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

Re: program za testiranje

^{15.11.2006. u 09:06 - pre 213 meseci}

postavila sam na kraju uslov
If txtRezultat.Text >15 Then
MsgBox ("UČENIK JE POLOŽIO ISPIT")
Else
MsgBox ("UČENIK NIJE POLOŽIO ISPIT")
End If

i ni u kom slučaju neće da prihvati da je učenik položio ??

Jel isto treba da primenim pretvaranja stringa u number i kojim načinom da primenim to ??

Odgovor na temu

goranvuc
Goran Vucicevic
Novi Sad

Član broj: 4934
Poruke: 1846
*.dialup.neobee.net.

+41 Profil

Re: program za testiranje

^{15.11.2006. u 09:16 - pre 213 meseci}

Sama si sebi odgovorila, ne znam zasto nisi probala?

Code:

If CInt(txtRezultat.Text) >= 15 Then
MsgBox ("UČENIK JE POLOŽIO ISPIT")
Else
MsgBox ("UČENIK NIJE POLOŽIO ISPIT")
End If

Odgovor na temu

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

Re: program za testiranje

^{15.11.2006. u 09:20 - pre 213 meseci}

pa probala al opet ne prihvata

Odgovor na temu

goranvuc
Goran Vucicevic
Novi Sad

Član broj: 4934
Poruke: 1846
*.dialup.neobee.net.

+41 Profil

Re: program za testiranje

^{15.11.2006. u 09:23 - pre 213 meseci}

Ko, sta, gde ne prihvata? Da li si videla i ono "=" sto sam dodao u uslov?

Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
*.com
Via: [es] mailing liste

+7 Profil

Re: program za testiranje

^{15.11.2006. u 09:24 - pre 213 meseci}

Zdravo
U vasem programu ima samo 3 pitanja i rezultat nikad nije veci 0d 15
Stavite If CInt(txtRezultat.Text) = 15 Then
Pozdrav

HomePage http://www.eurora3d.com

Odgovor na temu

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

Re: program za testiranje

^{15.11.2006. u 09:31 - pre 213 meseci}

pa iako stavim >=10 opet neće da prihvati, a i ako stavim da je = 15 i u tom slučaju ne radi...

Odgovor na temu

goranvuc
Goran Vucicevic
Novi Sad

Član broj: 4934
Poruke: 1846
*.dialup.neobee.net.

+41 Profil

Re: program za testiranje

^{15.11.2006. u 09:33 - pre 213 meseci}

Kao sto sam rekao:

Citat:

goranvuc: Ko, sta, gde ne prihvata?

Stavi kod.

Odgovor na temu

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

Re: program za testiranje

^{15.11.2006. u 09:36 - pre 213 meseci}

pa pobogu,
naravno da sam stavila.
Kako bi znala da ne radi ako nisam stavila kod ??!!

Odgovor na temu

goranvuc
Goran Vucicevic
Novi Sad

Član broj: 4934
Poruke: 1846
*.dialup.neobee.net.

+41 Profil

Re: program za testiranje

^{15.11.2006. u 09:42 - pre 213 meseci}

Citat:

gaga_mn: pa pobogu,
naravno da sam stavila.
Kako bi znala da ne radi ako nisam stavila kod ??!!

Pa mislio sam da ga ovde stavis ;)

Eh, sta radi panika.

Odgovor na temu

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

Re: program za testiranje

^{15.11.2006. u 09:53 - pre 213 meseci}

:)) nisam u panici

Case 3
Unload Me
If CInt(txtRezultat.Text) >= 10 Then
MsgBox ("UČENIK JE POLOŽIO ISPIT")
Else
MsgBox ("UČENIK NIJE POLOŽIO ISPIT")
End If

Odgovor na temu

goranvuc
Goran Vucicevic
Novi Sad

Član broj: 4934
Poruke: 1846
*.dialup.neobee.net.

+41 Profil

Re: program za testiranje

^{15.11.2006. u 09:55 - pre 213 meseci}

A da taj "Unload Me" stavis posle?

Code:

Case 3

   If CInt(txtRezultat.Text) >= 10 Then
       MsgBox ("UČENIK JE POLOŽIO ISPIT")
   Else
       MsgBox ("UČENIK NIJE POLOŽIO ISPIT")
   End If

   Unload Me

Da li uopste ulazi u Case 3?

Odgovor na temu

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.co.yu
Via: [es] mailing liste

Profil

Re: program za testiranje

^{15.11.2006. u 10:04 - pre 213 meseci}

> e pa to je
tnx :))

Odgovor na temu

goranvuc
Goran Vucicevic
Novi Sad

Član broj: 4934
Poruke: 1846
*.dialup.neobee.net.

+41 Profil

Re: program za testiranje

^{15.11.2006. u 10:05 - pre 213 meseci}

Da li tvoji ucenici imaju pojma koliko se ti zbog njih mucis?

Odgovor na temu

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

Re: program za testiranje

^{15.11.2006. u 10:09 - pre 213 meseci}

:))

Odgovor na temu