Makeplus

Un buen día amigos, continuando con la segunda parte de este post, que por cierto muy difundido y un tema que a nadie se le hace extraño ya que existen muchas publicaciones sobre esto en la red. En esta ocasión le he agregado a mi reporte muchas mas cosas como una imagen, nueva etiquetas, margenes, etc. Les muestro la codificación: Imports System.IO Imports iTextSharp.text Imports iTextSharp.text.pdf Public Class Form1     Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load         'TODO: esta línea de código carga datos en la tabla 'InfolabDataSet.Granulometria' Puede moverla o quitarla según sea necesario.         Me.GranulometriaTableAdapter.Fill(Me.InfolabDataSet.Granulometria)         Dim items As Integer = DataGridView1.Rows.Count - 1         itemx.Text = items     End Sub     Private Sub ToolStripDropDownButton1_Click(sender As Object, e As EventArgs) Handles ToolStripDropDownButton1.Click         Try             ' Inten