Dim n%(1 To 3)是什么意思?Dim n%(1 To 3) 是什么意思呀 %又是什么?

Dim n%(1 To 3)是什么意思?Dim n%(1 To 3) 是什么意思呀 %又是什么? dim是什么意思 Dim m%,n% For m=1 To 3 For n=1 To 5 Step 2 n=n+1 Next n Next m.问n=n+1执行多少次 vb循环语句中sqr(n)是什么意思for i=2 to sqr(n) 中sqr(n)代表什么意思?我只能肯定不是开根号的意思!Private Sub Form_Click()Dim n As Integern = InputBox(请输入一个正整数(>=3))k = 0For i = 2 To Sqr(n)If n Mod i = 0 Th vb程序设计!求1+3+5+7+…+(2n-1)的值.填空!Function func(n)Dim i As (1)For i = 1 To 2*n-1 (2)func = func + i(3)End Function Dim n% n = 1 Do Until n > 6 Print n； n = n + 2.4 Loop运行结果为1,3,5为什么不是1,3,6 Dim i As Integer,n As Integer For i = 0 To 50 i = i + 3 n = n + 1 If i > 10 Then Exit For Next PriDim i As Integer,n As IntegerFor i = 0 To 50i = i + 3n = n + 1If i > 10 Then Exit ForNextPrint n怎么算 谁能告诉我Dim A(1 To 100,0 To 3,-3 To 4)这句话的意思. vb编程：求a=1+3+5+.+（2n-1）的值Private Sub Form_click()Dim a As IntegerDim i As IntegerDim n As Integern = InputBox(n=)For i = 1 To n a = a + 2 * n - 1Next iPrint n=; n, a=; aEnd Sub怎么不对呢? Private Sub Form_Click()Dim m%,n%m = 1For n = 1 To 10 Step 2m = m + n n = n + 1 Next nPrint n=; n,m=; mEnd Sub vba 二维数组A（2 to 6 ,6）是什么意思?,数组元素个数怎么取?括号内逗号前后代表什么?然后,还有一个问题,dim a ()a=array(1,3,5,79).a(i)这个怎么理解 已知：Option Base 0,Dim A(),n% = 7,则下列操作中,错误的操作是( ).已知：Option Base 0,Dim A(),n% = 7,则下列操作中,错误的操作是( ).（1分）A、ReDim A(n)B、ReDim A(n-7)C、ReDim A(n+2)D、ReDim Preserve A(1 To n) 已知：Option Base 0,Dim A(),n% = 7,则下列操作中,错误的操作是( )已知：Option Base 0,Dim A(),n% = 7,则下列操作中,错误的操作是( ).（1分）A、ReDim A(n)B、ReDim A(n-7)C、ReDim A(n+2)D、ReDim Preserve A(1 To n) Hex(ascw(Str_one) Mid(Str,i,1)Hex(ascw(Str_one)Mid(Str,i,1)解释一下这两个方法是什么意思,谢谢'解释下循环里没行实现的功能,谢谢' function zh_str(Str) dim i dim Str_one dim Str_unicode for i=1 to len(Str) Str_one= vb计算1!+3!+*****+（2n+1）!的代码Private Sub Command1_Click()Dim n As Integer, i As Integer, j As Integern = Val(InputBox(请输入N值))m = 1: Sum = 0For i = 1 To 2 * n + 1 Step (2)For j = 1 To im = m * jNext jSum = Sum + mNext iPrint SumEn VB中Dim A!是什么意思 option base 1 dim a(3,-2 to 2,4)数组a包含元素个数有 2 option base 0 dim a(-1,to 4,3,4) 包含数组原数 评定等级() Dim i As Integer For i = 3 To 11 t = Sheets(1).Cells(i,2).Value