VB中用什么方法定义一串数 ？？

来源：百度知道 编辑：UC知道 时间：2024/06/06 19:06:14
怎样定义1到1000！！
数组定义 我想取其中的奇数 怎么办！！
元素是奇数！！

数组？
dim a(1 to 1000) as integer
=================================
取数组中奇数下标，还是数组中的元素是奇数？
下面是取奇数下标：
for i=1 to 1000 step 2
a(i)=i'这里做你要做的操作
next i
====================================
for i=1 to 1000
if a(i) mod 2 <> 0 then
print a(i);'这里添加你的操作
endif
next i

Dim m(1 To 500) As Integer
For i = 0 To 500
m(i) = i * 2 + 1
Next i