PDA

View Full Version : مشکل با خواندن فایل متنی



saeedvir
جمعه 23 بهمن 1388, 18:21 عصر
سلام
مثلا ما یه فایل متنی در آدرس c:\a.txt داریم
و اطلاعات درونش مثلا این طوری هست :


edit=abc
label=normalحالا من می خواهم که عبارت جلوی

edit= را بخونم و داخل یک textbox بریزم و همچنین عبارت جلوی

label= را جداگانه بخونم و در textbox دیگر بریزم میشه کمک کنید

IamOverlord
جمعه 23 بهمن 1388, 18:31 عصر
سلام دوست عزیز!


Private Sub Command1_Click()
Open "c:\a.txt" For Input As #1
Input #1, strA
Input #1, strB
Close #1
text1.Text = Mid$(strA, 6, Len(strA))
text2.Text = Mid$(strB, 7, Len(strB))
End Sub

:چشمک: