我有一個表有5萬多筆的資料,現在用下面的vb語句，填充treeview
SQL = "select PackNo from T11_QC_OK"
rs.Open SQL, conn, adOpenForwardOnly
While Not rs.EOF
TV.Nodes.Add "Father", tvwChild, "A" & rs("PackNo"), rs("PackNo")
rs.MoveNext
Wend
用了兩分鐘才填充完成，有快一點的方法嗎?