vb6.0中，spread中的button

回复 3楼tianyake的帖子

我通过附件使用 Spread Com 8.0 可以成功设置 ButtonCellType ：

DataFill.zip (9.83 KB, 下载次数: 819)

2014-5-26 17:21 上传

点击文件名下载附件

请参考，如果没有解决问题欢迎继续交流

单独设置某一个单元格为Button是没有问题的，但是在DataFill事件中设置是没有效果的

我现在就是想在绑定的时候根据数据来确定是否显示为Button

回复 1楼tianyake的帖子

请你尝试通过以下方法设置，看能否成功：

1. 
   
2. ' Specify a cell
   
3. fpSpread1.Col = 2
   
4. fpSpread1.Row = 3
   
5. ' Define cell type as button
   
6. fpSpread1.CellType = CellTypeButton
   
7. ' Insert picture in the cell
   
8. fpSpread1.TypeButtonPicture = LoadPicture("C:\Samples\Files\CAMCORD.BMP")
   
9. ' Set button text
   
10. fpSpread1.TypeButtonText = "Manufacturer"
    
11. ' Define the text color
    
12. ' dark blue, RGB(0, 0, 128)
    
13. fpSpread1.TypeButtonTextColor = &H800000
    
14. ' Align text right and picture left
    
15. fpSpread1.TypeButtonAlign = TypeButtonAlignRight
    
16. ' Set the column width to display text and picture
    
17. fpSpread1.ColWidth(2) = 15
    
18. ' Set the row height to display entire picture
    
19. fpSpread1.RowHeight(3) = 20
    
20. 
    

复制代码