说我有一个像这样的变量列表,范围从x0到x1:
x0 = 0.0
x1 = 1.0
x2 = 3
x3 = 9
x4 = 18
x5 = 20
x6 = 30
软件包中有一个函数我正在编写代码,在给定的坐标上选择一个点(实际函数并不重要)。
调用view.selectCircle(x,y,z,“Set”,“Point”)
我想要做的是编写一个循环函数,它为x0-x1的所有值运行此函数。我试过这个,但未能让它发挥作用......
For i = 1 To 6
call view.selectCircle("x" & i, 0.0, 0.5, "Set", "Point")
Next
很抱歉,如果这是一个非常基本的问题,因为我对编程很新!
感谢您的帮助。
答案 0 :(得分:1)
您目前没有数组,您有7个单独的变量。如果你想要一个数组,你有两个选择:
x = Array(0.0, 1.0, 3, 9, 18, 20, 30)
For Each point In x
Call view.selectCircle(point, 0.0, 0.5, "Set", "Point")
Next
Dim x(0 To 6) As Double
x(0) = 0.0
x(1) = 1.0
x(2) = 3
x(3) = 9
x(4) = 18
x(5) = 20
x(6) = 30
For i = LBound(x) To UBound(x)
call view.selectCircle(x(i), 0.0, 0.5, "Set", "Point")
Next
请注意,不同类型的循环与数组类型无关,我只使用了两个示例来为您提供选项 - 就这些解决方案而言,它们是可互换的。