Text1.Text = List1.List(n) n表示列表框中的第n项. 如果要读完所有的, 一个循环就搞定了.
创新互联建站专业为企业提供淳安网站建设、淳安做网站、淳安网站设计、淳安网站制作等企业网站建设、网页设计与制作、淳安企业网站模板建站服务，10多年淳安做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。
用StreamReader和StreamWriter读写文本文件，在读取的过程中判断字符串即可。
1、实现上传按钮方法代码。
2、判断图片对象是否为空代码。
3、取得数据库字段 dt.Rows(0)("Pic")方法代码。
4、字节数组转换为Image类型方法代码。
5、处理SQL中操作Image类型方法代码。
6、实现的上传结果。
提示表明你的textbox未实例化，你要么直接在窗口上创建一个textbox控件textbox1，要么使用代码动态创建：
dim tx as Textbox
set tx=new Textbox()
大概是这个代码，未测试。这样创建之后就可以使用它了。比如 original=textbox1.text 或者 original=tx.text
