作者Changsunche (長孫轍)
看板Visual_Basic
標題[VB6 ] 一些關於文字讀取的問題
時間Thu Oct 29 13:11:48 2009
有個題目是說：
輸入說明：
由標準輸入(鍵盤)輸入。第一航有一個正整數N，3<=N<=100，表示共有N個選手參加比賽。
接下來的N行，依序表示1~N位選手的成績。
每個選手將有六個成績，分數範圍為0~100的整數表示，分別是六個題目得分，
彼此以控格分開。你可以假設前三名都只有唯一依各。
輸出說明：
輸出一行到螢幕上。依序為冠、亞、季軍的編號。並以空白隔開。
範例輸入：
5
10 0 30 0 40 0
80 40 10 20 30 100
10 0 0 0 0 0
10 70 20 40 80 10
100 30 50 70 60 80
範例輸出：
5 2 4
▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
以上是題目，程式是大致寫出來，
但讀取方式可能跟題目本意不同，
想知道如何在text1.text輸入範例輸入的文字之後，
並且可以讀取內容物。
我現在的方式是先建立在D槽一個txt文件，
用讀取文件的方式，輸出也是以txt文件輸出，
但感覺於題目本意無關，
想請各位指教一下。
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 163.24.167.226
1F：→ MOONRAKER:聽不懂。 10/29 13:29
2F：推 ClubT:我也不太懂 所以我用猜的...Text1.MultiLine=True 10/29 15:58
3F：→ ClubT:這樣就可以多行輸入 10/29 15:59
4F：→ ClubT:接下來就一行一行處理 和記事本差不多啦 10/29 15:59
5F：→ MOONRAKER:這一猜怎麼突然有很清爽的感覺 XD 10/29 16:24
對於Text1.Multiline=True這邊，我已經能夠讓一個Text1.text能夠多行輸入，
但問題在於：讀取方面，我不知道要如何像TXT一般讀取，
-----------------------------------------------------------
在TXT文件裡面，讀取方式為：
假設0.txt為文件，並且在D槽內。
----
Open "D:\0.txt" for input as #1 '像這樣，之後使用
Do while not Eof(1)
open #1,n1,n2
Loop
▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
像這樣的讀取方式，但是在Text中，
我不知道要如何讀取QAQ。
意思就是：我會讀取Txt內的數字，
但是不會讀取Text內的資料。
※ 編輯: Changsunche 來自: 125.228.105.94 (10/29 21:15)