如何用VB实现QBASIC中的data数据的read

如何用VB实现QBASIC中的data数据的read，在QBASIC中可以实现DATA 1，2，7，9 然后再read到一个变量中。如果用vb实现，那种方法最简单？