天花铝格栅规格尺寸:这段代码错在哪里?

来源:百度文库 编辑:神马品牌网 时间:2024/05/09 14:09:57
Dim pal As PalType
Open "in11.txt" For Random As #1 Len = Len(pal)
Get #1, 3, pal
Text1.Text = pal.Name
Text2.Text = pal.Tel
Text3.Text = pal.Post
Close #1
下午六点就要考试了
大家帮帮忙啊

回答:Kimmy★Piggy
学长
6月24日 23:47 for i=1 to 5
t=A(i)
A(i)=A(10-i+1)
A(10-i+1)=t
next i

i到5就可以了,要是到10了的话换了一次又换回来了,等于没换位呀