يك سوال در مورد فايل متني در وي بي

با سلام

يك دستور مي خواهم كه بتونم مثلا خط هاي فرد (يا زوج يا ...) يك فايل با پسوند txt. رو بخونه .

ممنون :)

یعنی چی دستور میخوام؟
منظورت دستور تحت داسه؟ فکر نکنم تو داس امکان پذیر باشه. ولی برنامشو خیلی راحت میشه نوشت.

سلام

من سوال رو در قسمت Visual Basic مطرح كردم .
مي خواهم يك برنامه بنويسم كه خط هاي زوج يك فايل متني رو كه قبلا ايجاد كرده نشون بده .

کاری نداره که. یه کانتر بذار. سر اعداد زوج خط رو بخون.

f = FreeFile
Open "c:\YourTextFile.txt" For Input As #f
Do While Not EOF(f)
i = i + 1
Input #f, txtTemp
If i Mod 2 = 0 Then txtData = txtData & txtTemp & vbCrLf
Loop
Close
Text1.Text = txtData

Private Sub Form_Load()

f = FreeFile
Open "c:\YourTextFile.txt" For Input As #f
Do While Not EOF(f)
i = i + 1
Input #f, txtTemp
If i Mod 2 = 0 Then txtData = txtData & txtTemp & vbCrLf
Loop
Close
Text1.Text = txtData

End Sub

يادم رفت بگم Text1 رو انتخاب كن و در پنجره مشخصات اون مقادير زير رو اصلاح كن:
MultiLine رو True كن
ScrollBars رو به #3-Both ست كن