VB的问题要到VC中来问，真是汗颜啊，关于写顺序文件的一个问题，请高手帮忙啊，什么都好说

Question

可能有些不符合VB语法，太久不用了。
for i=1 to 10
  for j=i to 90+i
    f.write a(j)+" "
  next
  f.writeline
next
你是这个意思吗？

Answer 1

a[100]={1,2,3,...}
for(j=0;j<10;j++)
   向文本中写换行回车
   for(i=1;i<92;i++)
         向文本中写a[i+j]
这是VC 中的格式，你把它改成VB即可！

Answer 2

funny, also have not vb for 3 years.open "xxx.out" for output as #1
for i=1 to 10
  for j=i to 90+i
    print #1, write a(j);     //; is for tab
  next
  print #1,""   //this is returnclose #1

Answer 3

Option ExplicitPrivate Sub Form_Load()Dim i, j As Integer
Dim a(100) As Integer
Dim nFile As Integer
Dim strTemp As StringnFile = FreeFile
For i = 1 To 100
  a(i) = i
Next i
Open "c:\a.txt" For Output As #nFilestrTemp = ""For i = 1 To 10
 For j = 1 To 91
   strTemp = strTemp + Str(a(j) + i - 1) + " "
  
 Next j
  Write #nFile, strTemp
  strTemp = ""
Next i
  Close #nFile
 
 
End Sub