2017-05-24 11 views
0

私のTXT file1がある空白行件まで出力を表示するにはVBScriptが

​​

Fruits 

Vegetables 

2 txtfile出力は次のようになります。

Banana 

Orange 


Brocoli 

Beans 

Iからつかむことができるはず - ------空白にして、私はそれを行う際に問題があります。

+1

あなたが何かをしようとしている必要があり、次のコードは、あなたのTXTファイルを読み込むについていくつかのアイデアを与えるかもしれないと思いますか?あなたのコードを見てみましょう。 – Gurman

+0

あなたの出力に「Apple」が含まれていないのはなぜですか?サンプルを提供する方法の詳細については、[ここ](https://stackoverflow.com/help/how-to-ask)を見て、[ここ](https://stackoverflow.com/help/mcve)を参照してください。 –

答えて

0

は私が

Set fso = CreateObject("Scripting.FileSystemObject") 
strWholeData = fso.OpenTextFile("C:\...\xxx.txt").ReadAll 
strDataArr = Split(Trim(strWholeData),vbNewLine) 
For di = Lbound(strDataArr) To Ubound(strDataArr) 
    Msgbox strDataArr(di) 
Next 
+0

ありがとうIsmail。感謝 。 – Unique