vb随机产生10个30~100(包括30和100)的正整数,显示整个数组程序