Dim t As Table = Tables("表A") Dim cs1 As C1.Win.C1FlexGrid.CellStyle = t.grid.Styles.Add("cs1") cs1.BackgroundImage = getimage("d:\test.jpg") cs1.Display = C1.Win.C1FlexGrid.DisplayEnum.ImageOnly cs1.BackgroundImageLayout = C1.Win.C1FlexGrid.ImageAlignEnum.Stretch