Previous topicNext topic
Help > 开发指南 > Excel > API > 示例 > 图片 >
如何：修改嵌入的图片

下面的示例演示如何使用 Picture 对象的各种属性和方法来修改工作表中插入的图片。

Vb.Net
'创建一个Workbook工作簿对象.
Dim workbook As New DevExpress.Spreadsheet.Workbook()
'将测量单位设置为毫米
workbook.Unit = DevExpress.Office.DocumentUnit.Millimeter
workbook.BeginUpdate()
Try
    Dim worksheet As DevExpress.Spreadsheet.Worksheet = workbook.Worksheets(0)
    '插入从文件中加载的图片。
    Dim pic As Picture = worksheet.Pictures.AddPicture("D:\Pictures\x-docserver.png", worksheet.Cells("A1"))
    '指定图片名称并绘制边框。
    pic.Name = "Logo"
    pic.AlternativeText = "Spreadsheet Logo"
    pic.BorderWidth = 1
    pic.BorderColor = DevExpress.Utils.DXColor.Black
    '移动图片.
    pic.Move(20, 30)
    '更改图片的行为，使其与基础单元格一起移动和调整大小。 
    pic.Placement = DevExpress.Spreadsheet.Placement.MoveAndSize
    worksheet.Rows(5).Height += 10
    worksheet.Columns("D").Width += 10
    '指定旋转角度.
    pic.Rotation = 30
    '添加一个超链接
    pic.InsertHyperlink("https://www.devexpress.com/products/net/office-file-api/", True)
Finally
    workbook.EndUpdate()
End Try

C#
// 创建一个Workbook工作簿对象.
DevExpress.Spreadsheet.Workbook workbook = new DevExpress.Spreadsheet.Workbook();
// 将测量单位设置为毫米
workbook.Unit = DevExpress.Office.DocumentUnit.Millimeter;
workbook.BeginUpdate();
try
{
    DevExpress.Spreadsheet.Worksheet worksheet = workbook.Worksheets[0];
    // 插入从文件中加载的图片。
    Picture pic = worksheet.Pictures.AddPicture(@"D:\Pictures\x-docserver.png", worksheet.Cells["A1"]);
    // 指定图片名称并绘制边框。
    pic.Name = "Logo";
    pic.AlternativeText = "Spreadsheet Logo";
    pic.BorderWidth = 1;
    pic.BorderColor = DevExpress.Utils.DXColor.Black;
    // 移动图片.
    pic.Move(20, 30);
    // 更改图片的行为，使其与基础单元格一起移动和调整大小。
    pic.Placement = DevExpress.Spreadsheet.Placement.MoveAndSize;
    worksheet.Rows[5].Height += 10;
    worksheet.Columns["D"].Width += 10;
    // 指定旋转角度.
    pic.Rotation = 30;
    // 添加一个超链接
    pic.InsertHyperlink("https://www.devexpress.com/products/net/office-file-api/", true);
}
finally
{
    workbook.EndUpdate();
}