咋就没人理我呢？

人家都給你相似的詳細代碼！還要怎么幫你？？？？？？？？？
按照你的所有詳細要求，幫你完成你的工作？？？？

Dim data() As Byte = ds.Tables("employees").Rows(9)("photo")
Dim stmphoto As New MemoryStream(data)
PictureBox1.Image = Image.FromStream(stmphoto)

这是我给的链接网页中的三句，这个你能看懂吧？
那你就成功了。