PowerTools SPREAD for Windows Forms 8.0J
LoadTextFileRange(Stream,CellRange,TextFileFlags) メソッド


シートのテキストのロード先のストリーム
テキストファイルからロードするときのデータの処理範囲を指定します。
テキストファイルからロードするときのデータの処理方法を指定します。
指定したファイルから区切り付きテキストをシートにロードします。
構文
'Declaration
 
Public Overloads Sub LoadTextFileRange( _
   ByVal stream As Stream, _
   ByVal cellRange As CellRange, _
   ByVal textFileFlags As TextFileFlags _
) 
'使用法
 
Dim instance As SheetView
Dim stream As Stream
Dim cellRange As CellRange
Dim textFileFlags As TextFileFlags
 
instance.LoadTextFileRange(stream, cellRange, textFileFlags)
public void LoadTextFileRange( 
   Stream stream,
   CellRange cellRange,
   TextFileFlags textFileFlags
)

パラメータ

stream
シートのテキストのロード先のストリーム
cellRange
テキストファイルからロードするときのデータの処理範囲を指定します。
textFileFlags
テキストファイルからロードするときのデータの処理方法を指定します。
次のサンプルコードは、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-2015, GrapeCity inc. All rights reserved.