Re: [.NET] 讀取text檔裡的座標值

看板Visual_Basic作者jijung (一生把你放在夢裡頭)時間19年前 (2006/07/24 00:25)推噓3(3推 0噓 1→)

留言4則, 2人參與討論串2/2 (看更多)

※ 引述《yfefey (還沒想到)》之銘言： : 一個text裡面存了很多(x,y)這樣子的座標 : 現在想要把它一個一個讀出來，並且x座標相加平均，y座標相加平均 : 然後show出平均座標值 : 請問程式大概是怎麼跑的？ : 在yahoo知識+有找到一篇很有相關的 : http://tw.knowledge.yahoo.com/question/?qid=1105051209183 : 但是看不懂... = =" : 我用的txt檔是長這樣： : (23,28)(23,30)(23,35)(23,36)(23,38)(24,26).... : .............................................. : .............................................. : .......... : 不像上面知識+的格式 : 是盡量想用自己這樣的格式… : 如果不行的話當然是以能寫出程式為主 : 希望有高手能指點一個方向 : 謝謝。我只寫x出來y 的部份就自已寫囉^^ 應該有更好的寫法，但我要睡覺了明天要上班 = = Imports System.IO Dim file As New StreamReader("D:\xy.txt") '你的檔案路徑 Dim line As String Dim array() As String Dim i, xSum, xQty As Integer xSum = 0 'x 加總 xQty = 0 'x 數量 Do line = file.ReadLine If line <> Nothing Then array = line.Split("(") '利用檔案特性右括號後二碼就是x值 'array就會變成像這樣 23,28) For i = 1 To array.Length - 1 xSum += Val(array(i).Substring(0, 2)) '取得x值 xQty += 1 'x數加1 Next i End If Loop Until line Is Nothing MessageBox.Show(CStr(xSum) + " x 平均值: " + CStr(xSum / xQty)) file.Close() -- 68年次 ......老了 (┬＿┬） http://www.wretch.cc/album/jijung -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 203.67.226.105