文字自动折行

单元格中，文字长度超过单元格宽度时，文字自动折行如何实现？我用的VB6.0

你使用的VB6.0，那你使用的是Spread的什么版本呢

Spread for Windows Forms 5 中你可以使用TextCellType或者RichTextBoxCellType来设置自动换行，例如：

1. 
   
2.             RichTextCellType rtCell = new RichTextCellType();
   
3.             rtCell.WordWrap = true;
   
4. 
   
5.             this.fpSpread1.ActiveSheet.Cells[0, 0].CellType = rtCell;
   

复制代码

回复 2楼dof的帖子

vb6  spread8  怎么实现换行呢

回复 3楼zhaoyuanxu的帖子

请通过以下代码测试：

1. 
   
2. fpSpread1.Col = 2
   
3. fpSpread1.Row = 3
   
4. ' Define cell type as static
   
5. fpSpread1.CellType = CellTypeStaticText
   
6. ' Provide text for the specified cell
   
7. fpSpread1.Text = "Select one of the following"
   
8. ' Set the text to wrap to multiple lines
   
9. fpSpread1.TypeTextWordWrap = True
   
10. ' Set vertical alignment to center
    
11. fpSpread1.TypeVAlign = TypeVAlignCenter
    
12. ' Set horizontal alignment to center
    
13. fpSpread1.TypeHAlign = TypeHAlignCenter
    
14. ' Set row height of specified row
    
15. fpSpread1.RowHeight(3) = 38
    
16. ' Set column width of specified column
    
17. fpSpread1.ColWidth(2) = 9
    

复制代码