Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Kako da upotrebim string da pozovem Sub [VB2005]

[es] :: .NET :: Kako da upotrebim string da pozovem Sub [VB2005]

[ Pregleda: 1859 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor
Pretraga teme: Traži
Markiranje Štampanje RSS

bobby63
Nis

Član broj: 11398
Poruke: 180
*.dynamic.sbb.co.yu.



Profil

icon Kako da upotrebim string da pozovem Sub [VB2005]01.12.2006. u 12:36 - pre 211 meseci
Imam vise Sub-ova koji se zovu:
crtaj1
crtaj2
crtaj3
... itd
sad u odredjenom trenutku na osnovu brojaca n treba da pozovem odredjeni Sub
Naziv dobijam sa
Code:
crtajStr = ("crtaj" + CStr(n))

kako sad ovaj string da upotrbim da pozovem odgovarajucu subrutinu?

Pozdrav svima i unapred hvala
Hear all, trust nothing!
 
Odgovor na temu

electroNik
Nikola Milenković
Srbija

Član broj: 46941
Poruke: 78
*.smin.gonet.co.yu.



Profil

icon Re: Kako da upotrebim string da pozovem Sub [VB2005]02.12.2006. u 15:30 - pre 211 meseci
Prosto sa SELECT CASE.
Code:
SELECT CASE n
CASE 1
crtaj1()
CASE 2
crtaj2()
...
END SELECT

Mada nisam siguran da si optimalno napisao kod. Trebalo bi da sve te crtaj procedure staviš u jednu, i da je ovako definišeš:
Code:
Public Sub crtaj(ByVal n as Integer)
...
End Sub
i onda da isto uradiš ono sa SELECT CASE što sam gore napisao. Onda će ti biti lako da uz pomoć brojača pozivaš crtaj f-ju.
Gone Shootin'
 
Odgovor na temu

bobby63
Nis

Član broj: 11398
Poruke: 180
*.dynamic.sbb.co.yu.



Profil

icon Re: Kako da upotrebim string da pozovem Sub [VB2005]02.12.2006. u 23:55 - pre 211 meseci
U medjuvremenu sam uz pomoc case i resio problem, mada mi je to resenje malo rogobatno jer sam dobio relativno dugu listu.
Rutine za crtanje su svaka poseban sub a samo case listu sam takodje stavio u odvojeni sub koji se poziva kada su uslovi zadovoljeni da se ta grafika iscrta.
U svakom slucaju hvala puno.
Hear all, trust nothing!
 
Odgovor na temu

[es] :: .NET :: Kako da upotrebim string da pozovem Sub [VB2005]

[ Pregleda: 1859 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.