首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

msflexgrid单元格中安插一个图像,图像能不能适应单元格的大小

2013-01-08 
msflexgrid单元格中插入一个图像,图像能不能适应单元格的大小?RT,原始图片较大,想在单元格中以较小的方式

msflexgrid单元格中插入一个图像,图像能不能适应单元格的大小?
RT,原始图片较大,想在单元格中以较小的方式显示,有这个设置吗?
[解决办法]


Private Sub Form_Load()
MSFlexGrid1.Rows = 2
MSFlexGrid1.FixedRows = 0
MSFlexGrid1.Cols = 10
MSFlexGrid1.FixedCols = 0

MSFlexGrid1.Row = 0
MSFlexGrid1.Col = 0

MSFlexGrid1.ColWidth(0) = 1000
MSFlexGrid1.RowHeight(0) = 1000
Picture1.Picture = LoadPicture("D:\Documents and Settings\All Users\Documents\My Pictures\示例图片\Sunset.jpg")
Picture2.AutoRedraw = True
Picture2.PaintPicture Picture1, 0, 0, 1000, 1000, Picture1.Width, Picture1.Height
Set MSFlexGrid1.CellPicture = Picture2.Image


End Sub

热点排行