MESCIUS SPREAD for Windows Forms 15.0J
LoadTextFileRange(Stream,CellRange,TextFileFlags,String,String,String) メソッド
使用例 

シートのテキストのロード先のストリーム
テキストファイルからロードするときのデータの処理範囲を指定します。
テキストファイルからロードするときのデータの処理方法を指定します。
行区切り文字列
列区切り文字列
セル区切り文字列
指定したファイルから区切り付きテキストをシートにロードします。
構文
'宣言
 
Public Overloads Sub LoadTextFileRange( _
   ByVal stream As Stream, _
   ByVal cellRange As CellRange, _
   ByVal textFileFlags As TextFileFlags, _
   ByVal rowDelimiter As String, _
   ByVal columnDelimiter As String, _
   ByVal cellDelimiter As String _
) 

パラメータ

stream
シートのテキストのロード先のストリーム
cellRange
テキストファイルからロードするときのデータの処理範囲を指定します。
textFileFlags
テキストファイルからロードするときのデータの処理方法を指定します。
rowDelimiter
行区切り文字列
columnDelimiter
列区切り文字列
cellDelimiter
セル区切り文字列
例外
例外解説
System.ArgumentException セル区切り文字列を行または列の区切り文字列に含めることはできません。
使用例
次のサンプルコードは、LoadTextFileRangeメソッドを使用します。
OpenFileDialog ofd = new OpenFileDialog();
string s;
ofd.Filter = "text files (*.txt)|*.txt";
ofd.FilterIndex = 2;
ofd.RestoreDirectory = true;
if (ofd.ShowDialog() == DialogResult.OK)
{
    s = ofd.FileName;
    FarPoint.Win.Spread.Model.CellRange cr = new FarPoint.Win.Spread.Model.CellRange(0, 0, 3, 3);
    fpSpread1.ActiveSheet.LoadTextFileRange(s, cr,FarPoint.Win.Spread.TextFileFlags.None);
    //fpSpread1.ActiveSheet.LoadTextFileRange(s, cr, FarPoint.Win.Spread.TextFileFlags.None, "\r", ",", "", System.Text.Encoding.ASCII);
    //fpSpread1.ActiveSheet.LoadTextFileRange(s, cr, FarPoint.Win.Spread.TextFileFlags.None, "\r", ",", "");
}
Dim s As String
Dim ofd As New OpenFileDialog()
ofd.Filter = "text files (*.txt)|*.txt"
ofd.FilterIndex = 2
ofd.RestoreDirectory = True
If ofd.ShowDialog() = DialogResult.OK Then
    s = ofd.FileName
    Dim cr As New FarPoint.Win.Spread.Model.CellRange(0, 0, 3, 3)
    FpSpread1.ActiveSheet.LoadTextFileRange(s, cr, FarPoint.Win.Spread.TextFileFlags.Unformatted)
    'FpSpread1.ActiveSheet.LoadTextFileRange(s, cr, FarPoint.Win.Spread.TextFileFlags.Unformatted, Chr(13), ",", "", System.Text.Encoding.ASCII)
    'FpSpread1.ActiveSheet.LoadTextFileRange(s, cr, FarPoint.Win.Spread.TextFileFlags.Unformatted, Chr(13), ",", "")
End If
参照

SheetView クラス
SheetView メンバ
オーバーロード一覧

 

 


© MESCIUS inc. All rights reserved.