vb里怎样实现链式存储结构?