FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > SheetView クラス > LoadTextFileRange メソッド : LoadTextFileRange(Stream,CellRange,TextFileFlags,String,String,String) メソッド |
'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 _ )
'使用法 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 instance.LoadTextFileRange(stream, cellRange, textFileFlags, rowDelimiter, columnDelimiter, cellDelimiter)
public void LoadTextFileRange( Stream stream, CellRange cellRange, TextFileFlags textFileFlags, string rowDelimiter, string columnDelimiter, string cellDelimiter )
例外 | 説明 |
---|---|
System.ArgumentException | セル区切り文字列を行または列の区切り文字列に含めることはできません。 |
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