The sample source codes on this page shows how to add images advanced in VB.NET. ByteScout Spreadsheet SDK is the SDK that can write and read, modify and calculate Excel and CSV spreadsheets. Most popular formulas are supported. You may import or export data to and from CSV, XML, JSON as well as to and from databases, arrays and you can use it to add images advanced with VB.NET.
VB.NET code samples for VB.NET developers help to speed up coding of your application when using ByteScout Spreadsheet SDK. In order to implement the functionality, you should copy and paste this code for VB.NET below into your code editor with your app, compile and run your application. Enjoy writing a code with ready-to-use sample VB.NET codes.
Our website provides trial version of ByteScout Spreadsheet SDK for free. It also includes documentation and source code samples.
Imports System.Collections.Generic Imports System.Diagnostics Imports System.IO Imports System.Text Imports Bytescout.Spreadsheet Imports Bytescout.Spreadsheet.MSODrawing Namespace AddImages Class Program Friend Shared Sub Main(args As String()) ' Create spreadsheet Dim doc As New Spreadsheet() ' Add worksheet Dim worksheet As Worksheet = doc.Worksheets.Add() ' Put an image to "C3" cell Dim shape As PictureShape = worksheet.Pictures.Add(2, 2, "image1.jpg") ' Make the picture "floating". It will be not moved if you move or resize the "C3" cell shape.PlacementType = Placement.FreeFloating ' Make the picture brighter shape.Brightness = 0.8F ' Put second image to "K11" cell shape = worksheet.Pictures.Add(10, 10, "image2.jpg") ' Make the picture bound to the cell. It will be moved alonf with the "K11" cell shape.PlacementType = Placement.Move ' Crop 10% from left and right side of the image shape.CropFromLeft = 0.1F shape.CropFromRight = 0.1F ' Delete output file if exists If File.Exists("output.xls") Then File.Delete("output.xls") End If ' Save document doc.SaveAs("output.xls") ' Close spreadsheet doc.Close() ' Open generated XLS document in default application Process.Start("output.xls") doc.Dispose() End Sub End Class End Namespace