ذخیره اطلاعات در فایل متنی

دوستان سلام
باید پروژه ای رودر وی بی انجام بدم که نیاز به ذخیره کردن اعداد داخل یک آریه در فایل متنی دارم.ولی نمیدونم این کاررو چطور باید در وی بی انجام بدم. اگه کسی هست که بلده لطفا به من کمک کنه. مرسی:تشویق:

سلام از این دستورات می تونین استفاده کنین
:لبخندساده:
Sub TTT()
Dim TT As String
Dim pathfile As String
Dim Arr(4) As String
Arr(0) = "aaaaa"
Arr(1) = "zzzzz"
Arr(2) = "xxxxx"
Arr(3) = "ccccc"
Arr(4) = "vvvvv"
For i = 0 To 4
TT = TT & Arr(i) & " "
Next i
pathfile = "C:\AAA.txt"
Open pathfile For Output As #1
Print #1, TT
Close #1
End Sub

Open pathfile For Output As #1 len(tt)
put #1,1,tt
این درست تر