分隔文本由逗號分隔符要顯示第一和/或第二隻 - 在一個消息vb.net

Question

我有一個CSV文件032214.cvs數據文件等於12345678,1.1234，G00大號

消息框：

Dim FileReader As String 
FileReader = My.Computer.FileSystem.ReadAllText("C:\Apps\CSVDATA\032214.csv") 
MessageBox.Show((FileReader),"Verify Information", 
MessageBoxButtons.Ok,MessageBoxIcon.Question) 

它顯示了所有12345678,1.1234,G00 L但我只想顯示12345678

Answer 1

試試這個;

Dim FileReader As String 
FileReader = My.Computer.FileSystem.ReadAllText("C:\Apps\CSVDATA\032214.csv") 
StrToDisplay = Split(FileReader,",")(0) 
MessageBox.Show((StrToDisplay),"Verify Information", 
MessageBoxButtons.Ok,MessageBoxIcon.Question) 

讓我知道它是否有效。

Answer 2

該語法在我看來爲VB.Net而不是VBScript，無論如何，使用Split與可選的count參數。

'Split(expression[, delimiter[, count[, compare]]]) 
StrToDisplay = Join(Split(FileReader, ",", 2), ",")