台灣最大程式設計社群網站
線上人數
1367
 
會員總數:244807
討論主題:188842
歡迎您免費加入會員
討論區列表 >> VB.NET >> split解陣列
[]  
[我要回覆]
1
回應主題 加入我的關注話題 檢舉此篇討論 將提問者加入個人黑名單
split解陣列
價值 : 150 QP  點閱數:347 回應數:4

樓主

Lo Henry
門外漢
0 4
859 2
發送站內信

If My.Computer.FileSystem.FileExists("D:/RPCPUT/ToolData.002") Then
TM_DATA = My.Computer.FileSystem.ReadAllText("D:/RPCPUT/ToolData.002")
TOOL_LINE_DATA = Split(TM_DATA, Chr(10))
End If
ToolData.002檔案大小38K,2700多列
同樣程序在兩部電腦中,一部正常另一部電腦 TOOL_LINE_DATA資料只有510個,超出部份均為?是何問題,求解




搜尋相關Tags的文章: [ split ] ,
本篇文章發表於2019-01-24 20:26
別忘捐VP感謝幫助你的人 新手會員瞧一瞧
1樓
回應

Daimom
捐贈 VP 給 Daimom 檢舉此回應
檔案都一樣?
你把不正常電腦的檔案放到 正常那台電腦的檔案,資料一樣??
本篇文章回覆於2019-01-25 11:37
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
2樓
作者回應

Lo Henry
檢舉此回應
兩台電腦都使用相同的程序及檔案,結果是1-ok 1-ng
本篇文章回覆於2019-01-25 18:48
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
3樓
回應

香帥
檢舉此回應
因有編碼關係,用看的不準
請加一行

在兩台電腦執行後的結果,po 在這,再幫你找問題。
本篇文章回覆於2019-01-26 01:42
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
4樓
作者回應

Lo Henry
檢舉此回應
Public Class Form1
Dim TOOL_LINE_DATA(), TM_DATA As String
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If My.Computer.FileSystem.FileExists("D:/RPCPUT/ToolData.002") Then
TM_DATA = My.Computer.FileSystem.ReadAllText("D:/RPCPUT/ToolData.002")
TOOL_LINE_DATA = Split(TM_DATA, Chr(10))
End If
MsgBox(Str(UBound(TOOL_LINE_DATA)))
End Sub
End Class

A電腦(WIN 7,Visual Studio 2005)執行結果2004,TOOL_LINE_DATA(0-2004)都有資料是OK,重複按下Button1執行結果都一樣.
B電腦(WIN XP,Visual Studio 2005)執行結果2004,TOOL_LINE_DATA(0-510)有資料,TOOL_LINE_DATA(511-2004)皆為?,再次按下Button1執行執行結果2004,TOOL_LINE_DATA(0-255)有資料,TOOL_LINE_DATA(256-2004)皆為?
執行結果有copy到圖檔,可是我不會傳送,抱歉

本篇文章回覆於2019-01-29 17:59
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
   
1

回覆
如要回應,請先登入.