private void Form1_Load(object sender, EventArgs e)
{
// 複数行のテキストを入力可能にします
FarPoint.Win.Spread.CellType.TextCellType txt = new FarPoint.Win.Spread.CellType.TextCellType();
txt.Multiline = true;
fpSpread1.ActiveSheet.Cells[1, 1].CellType = txt;
fpSpread1.ActiveSheet.Cells[1, 1].Text = "This is a" + "\r\n" + "text cell.";
fpSpread1.ActiveSheet.Rows[1].Height = 40;
fpSpread1.ActiveSheet.Columns[1].Width = 80;
}
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
' 複数行のテキストを入力可能にします
Dim txt As New FarPoint.Win.Spread.CellType.TextCellType()
txt.Multiline = True
FpSpread1.ActiveSheet.Cells(1, 1).CellType = txt
FpSpread1.ActiveSheet.Cells(1, 1).Text = "This is a" + vbCrLf + "text cell."
FpSpread1.ActiveSheet.Rows(1).Height = 40
FpSpread1.ActiveSheet.Columns(1).Width = 80
End Sub