ค้นหาเนื้อหา
ไม่เปิดเผย
อยากทราบอีกอย่างคับ
QUOTE
Open "C:\Documents and Settings\comdd\My Documents\My Received Files\fp\data.txt" For Input As nFileNum
lLineCount = 1
Do While Not EOF(nFileNum)
Line Input #nFileNum, sNextLine
sNextLine = sNextLine & vbCrLf
sText = sText & sNextLine
Loop
Text1.Text = sText
Close nFileNum
lLineCount = 1
Do While Not EOF(nFileNum)
Line Input #nFileNum, sNextLine
sNextLine = sNextLine & vbCrLf
sText = sText & sNextLine
Loop
Text1.Text = sText
Close nFileNum
แบบว่าจะดึงข้อมูลจาก text file มาคำนวนอ่ะคับอยากให้แบบเลือก path ของ text file เองได้จะทำไงเหรอ ผมทำไม่เป็นอ่ะ
ช่วยชี้แนะหน่อยนะคับ
