FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread.CellType 名前空間 > RichTextCellType クラス : AllowArrowKeysMoveActiveCell プロパティ |
'Declaration Public Property AllowArrowKeysMoveActiveCell As FlagArrowKeys
'使用法 Dim instance As RichTextCellType Dim value As FlagArrowKeys instance.AllowArrowKeysMoveActiveCell = value value = instance.AllowArrowKeysMoveActiveCell
public FlagArrowKeys AllowArrowKeysMoveActiveCell {get; set;}
FarPoint.Win.Spread.CellType.RichTextCellType rtf = new FarPoint.Win.Spread.CellType.RichTextCellType(); rtf.WordWrap = true; rtf.Multiline = true; rtf.AllowArrowKeysMoveActiveCell = FarPoint.Win.Spread.FlagArrowKeys.All; fpSpread1.ActiveSheet.Cells[1, 1].CellType = rtf; fpSpread1.ActiveSheet.Cells[1, 1].Value = @"{\rtf1\ansi\ansicpg1252\deff0\deflang1033 {\fonttbl{\f0\fscript\fprq2\fcharset0 Comic Sans MS;} {\f1\froman\fprq2\fcharset0 Times New Roman;} {\f2\fswiss\fcharset0 Arial;}}{\colortbl ;\red128 \green0\blue128;\red0\green255\blue255;\red255\green0\ blue0;\red0\green255\blue0;\red0\green0\blue255;} \viewkind4\uc1\pard\cf1\b\f0\fs24 Testing\cf2\b0\fs28 \cf3 \f1\fs40 1... \cf4\i 2... \cf5\ul\i0 3...\cf0\f2\fs20\par}";
Dim rtb As New FarPoint.Win.Spread.CellType.RichTextCellType rtb.Multiline = True rtb.WordWrap = True rtb.AllowArrowKeysMoveActiveCell = FarPoint.Win.Spread.FlagArrowKeys.All FpSpread1.ActiveSheet.Cells(1, 1).CellType = rtb FpSpread1.ActiveSheet.Cells(1, 1).Value = "{\rtf1\ansi\ansicpg1252\deff0\deflang1033" + _ "{\fonttbl{\f0\fscript\fprq2\fcharset0 Comic Sans MS;}" + _ "{\f1\froman\fprq2\fcharset0 Times New Roman;}" + _ "{\f2\fswiss\fcharset0 Arial;}}" + _ "{\colortbl ;\red128\green0\blue128;\red0\green255\blue255;" + _ "\red255\green0\blue0;" + _ "\red0\green255\blue0;\red0\green0\blue255;}" + _ "\viewkind4\uc1\pard\cf1\b\f0\fs24 Testing\cf2\b0\fs28" + _ " \cf3\f1\fs40 1... \cf4\i 2... \cf5\ul\i0 3...\cf0\f2\fs20\par" + _ "}"