You're trying to get the values from the SqlCommand-Object (cmd). You have to read them from the SqlDataReader (lrd).
So instead of
cmd("PictureBox").tostring
you have to write
lrd["PictureBox"].tostring
(and accordingly everywhere else)
(or maybe with round brackets instead of angled brackets - I have no clue of VB ;) )