彩票走势图

Aspose.Cells是怎样为电子表格添加图片并为图片设置超链接的呢？答案就在这里。本文为大家提供了最简单的代码来实现图片链接设置。OK,下面就让慧都小编来和大家一起学习吧：

[C#]

 //Instantiate a new workbook
Workbook workbook = new Workbook();
//Get the first worksheet
Worksheet worksheet = workbook.Worksheets[0];
//Insert a string value to a cell
worksheet.Cells["C2"].PutValue("Image Hyperlink");
//Set the 4th row height
worksheet.Cells.SetRowHeight(3, 100);
//Set the C column width
worksheet.Cells.SetColumnWidth(2, 21);
//Add a picture to the C4 cell
int index = worksheet.Pictures.Add(3, 2, 4, 3, "f:\\test\\school.jpg");
//Get the picture object
Aspose.Cells.Drawing.Picture pic = worksheet.Pictures[index];
//Set the placement type
pic.Placement = PlacementType.FreeFloating;
//Add an image hyperlink
Aspose.Cells.Hyperlink hlink = pic.AddHyperlink("");
//Specify the screen tip
hlink.ScreenTip = "Click to go to Aspose site";
//Save the excel file
workbook.Save("f:\\test\\ImageHyperlink.xls");

[VB]

 'Instantiate a new workbook
Dim workbook As New Workbook()
'Get the first worksheet
Dim worksheet As Worksheet = workbook.Worksheets(0)
'Insert a string value to a cell
worksheet.Cells("C2").PutValue("Image Hyperlink")
'Set the 4th row height
worksheet.Cells.SetRowHeight(3, 100)
'Set the C column width
worksheet.Cells.SetColumnWidth(2, 21)
'Add a picture to the C4 cell
Dim index As Integer = worksheet.Pictures.Add(3, 2, 4, 3, "f:\test\school.jpg")
'Get the picture object
Dim pic As Aspose.Cells.Drawing.Picture = worksheet.Pictures(index)
'Set the placement type
pic.Placement = PlacementType.FreeFloating
'Add an image hyperlink
Dim hlink As Aspose.Cells.Hyperlink = pic.AddHyperlink("")
'Specify the screen tip
hlink.ScreenTip = "Click to go to Aspose site"
'Save the excel file
workbook.Save("f:\test\ImageHyperlink.xls")

简单吧！生成的文件效果图如下：