GrapeCity SPREAD for Windows Forms 11.0J
LoadTextFileRange(Stream,CellRange,TextFileFlags,String,String,String,Encoding) メソッド


シートのテキストのロード先のストリーム
テキストファイルからロードするときのデータの処理範囲を指定します。
テキストファイルからロードするときのデータの処理方法を指定します。
行区切り文字列
列区切り文字列
セル区切り文字列
エンコーディング
指定したエンコーディングを使用して、指定したファイルから区切り付きテキストをシートにロードします。
構文
'Declaration
 
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, _
   ByVal encoding As Encoding _
) 
'使用法
 
Dim instance As SheetView
Dim stream As Stream
Dim cellRange As CellRange
Dim textFileFlags As TextFileFlags
Dim rowDelimiter As String
Dim columnDelimiter As String
Dim cellDelimiter As String
Dim encoding As Encoding
 
instance.LoadTextFileRange(stream, cellRange, textFileFlags, rowDelimiter, columnDelimiter, cellDelimiter, encoding)

パラメータ

stream
シートのテキストのロード先のストリーム
cellRange
テキストファイルからロードするときのデータの処理範囲を指定します。
textFileFlags
テキストファイルからロードするときのデータの処理方法を指定します。
rowDelimiter
行区切り文字列
columnDelimiter
列区切り文字列
cellDelimiter
セル区切り文字列
encoding
エンコーディング
例外
例外説明
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 メンバ
オーバーロード一覧

 

 


© 2004-2018, GrapeCity Inc. All rights reserved.