Visual Basic net

[ mka @ 27.09.2013. 07:58 ] @

Pozdrav, imam problem sa dijelom koda za promjenu picturebox ikone. Primjer problema

Code:

dim tekst1 as String
dim tekst2 as String
tekst1="PictureBox.Image"
tekst2="My.Resources.slika"

e sad kako da napisem tekst1=tekst2 pa da to u vb izgleda kao PictureBox.Image=My.Resources.slika i da promjeni sliku?
Hvala unaprijed

[ dusans @ 27.09.2013. 08:18 ] @

A šta je problem da napišeš ovo umesto svega onog?

Code:

PictureBox.Image=My.Resources.slika

[ mka @ 27.09.2013. 08:33 ] @

Imam vise picturebox-ova i iz sql baze povlacim informaciju o kome picturebox-u se radi i koju sliku da stavi

[ dusans @ 27.09.2013. 08:57 ] @

Onako kako si zamislio preko stringova ne može pošto u VB.net-u ne postoji eval.

Evo ti jedan od načina kako da uradiš to što treba.
Prvo pronađeš picture box po imenu, evo ti jedan način, primer:
http://bytes.com/topic/visual-...s/348664-getting-controls-name

Zatim da mu dodeliš odgovarajući image:

Code:

PictureBox.Image = My.Resources.ResourceManager.GetObject("ImageName")

[ mka @ 27.09.2013. 18:20 ] @

Hvala puno, pomoglo mi je al' sam imao problema jer nisam znao da controls ima child pa ovi mogu jos child da imaju...

rjesio sam problem na sledeci nacin

Code:

Public Shared Function nadjisve(ByVal list As List(Of Control), ByVal parent As Control, ByVal ctrlType As System.Type) As List(Of Control)
        If parent Is Nothing Then Return list
        If parent.GetType Is ctrlType Then
            list.Add(parent)
        End If
        For Each child As Control In parent.Controls
            nadjisve(list, child, ctrlType)
        Next
        Return list
    End Function

Hvala puno !!!