这个意思?
Dim t As Table = Tables("表A")Dim rn = t.grid.GetCellRange(1, 3, 10, 3)rn.Image = Getimage("d:\test.Ico")