vb数组的插入-业主生活–手机房天下问答

房天下 > 房天下问答 > 业主生活 > 其他

vb数组的插入

Option ExplicitPrivate Sub Form_Load() Dim A() As String ReDim A(1 To 5) Dim i As Integer, j As Integer Dim n As String Dim temp As String A(1) = "100": A(2) = "101": A(3) = "102" A(4) = "103": A(5) = "105" n = InputBox("请输入新生学号：") j = Val(InputBox("请输入要插入的位置：")) Print Print Tab(4); "新生学号为：" & n & " "; "插入的位置为：" & j ReDim Preserve A(1 To 6) For i = j To 6 temp = A(i) A(i) = n n = temp Next i Print Tab(4); For i = 1 To 6 Print A(i); " "; Next iEnd Sub上面的代码中temp = A(i) A(i) = n n = temp这一段看的我发晕~~似懂非懂~~请行内人士解答~~非诚勿扰！

更多

提问者：wzyl7g
发布于2011-01-17

分享

共1个回答

起名测名丨Lv 0

temp是一个临时变量，为了倒腾数据方便假设你需要一个学号888，位置还是3循环中，从3到6For i = j To 6 temp = A(i) A(i) = n n = temp Next i 把原本的第3个成员102，赋值给临时变量temp同时给第3成员赋值n，就是888这时888没用了，变量n就用来接收刚才存在temp里的原先的第3成员从头再来把第4位103送进temp现在用来存放上一次循环后，给n的新值，也就是原第3成员102n里再装进103再来105送temp105改成103n里放105最后一次循环temp空值第6里放进105n空值===================你把循环换成这一段试试效果，看能不能助你理解For i = j To 6temp = A(i)Debug.Print "temp="; temp,A(i) = nDebug.Print "a(" & i & ")="; A(i),n = tempDebug.Print "n="; nNext i

+1 2011-01-18 举报

热门人气推荐

推荐楼盘小区二手房商圈租房热门知识相关推荐房产百科

免责声明：问答内容均来源于互联网用户，房天下对其内容不负责任，如有版权或其他问题可以联系房天下进行删除。