Telerik Forums
Reporting Forum
1 answer
337 views

Dear Telerik Support,

 

I am generating invoices by saving a Telerik Report as a PDF file.  I am running into inconsistent behavior with the borders.  I have attached an image of the PDF which contains comments that explain the issues I am experiencing.  I have also attached the report code.

 

Please Advise,

 

Jim

Imports System.ComponentModel  
Imports System.Drawing  
Imports System.Windows.Forms  
Imports Telerik.Reporting  
Imports Telerik.Reporting.Drawing  
Imports System  
Imports System.Data  
Imports System.Data.SqlClient  
 
Public Class Invoice  
    Inherits Telerik.Reporting.Report  
 
    Private WithEvents detail As Telerik.Reporting.DetailSection  
    Private WithEvents da_ReportData As System.Data.SqlClient.SqlDataAdapter  
    Private WithEvents reportHeader As Telerik.Reporting.ReportHeaderSection  
    Private WithEvents tb_PageNumber As Telerik.Reporting.TextBox  
    Private WithEvents tb_CurrentTime As Telerik.Reporting.TextBox  
    Private WithEvents pageFooter As Telerik.Reporting.PageFooterSection  
    Private WithEvents pageHeader As Telerik.Reporting.PageHeaderSection  
    Private WithEvents labelsGroup As Telerik.Reporting.Group  
    Private WithEvents labelsGroupFooter As Telerik.Reporting.GroupFooterSection  
    Private WithEvents pb_Logo As Telerik.Reporting.PictureBox  
    Private WithEvents tb_FromAddress As Telerik.Reporting.TextBox  
    Private WithEvents tb_FromCityStateZip As Telerik.Reporting.TextBox  
    Private WithEvents tb_FromPhone As Telerik.Reporting.TextBox  
    Private WithEvents tb_FromWebAddress As Telerik.Reporting.TextBox  
    Private WithEvents tb_PageHeader As Telerik.Reporting.TextBox  
    Private WithEvents textBox1 As Telerik.Reporting.TextBox  
    Private WithEvents textBox2 As Telerik.Reporting.TextBox  
    Private WithEvents textBox3 As Telerik.Reporting.TextBox  
    Private WithEvents textBox4 As Telerik.Reporting.TextBox  
    Private WithEvents textBox5 As Telerik.Reporting.TextBox  
    Private WithEvents textBox8 As Telerik.Reporting.TextBox  
    Private WithEvents textBox9 As Telerik.Reporting.TextBox  
    Private WithEvents textBox6 As Telerik.Reporting.TextBox  
    Private WithEvents textBox7 As Telerik.Reporting.TextBox  
    Private WithEvents textBox10 As Telerik.Reporting.TextBox  
    Private WithEvents textBox11 As Telerik.Reporting.TextBox  
    Private WithEvents textBox12 As Telerik.Reporting.TextBox  
    Private WithEvents textBox13 As Telerik.Reporting.TextBox  
    Private WithEvents textBox14 As Telerik.Reporting.TextBox  
    Private WithEvents textBox15 As Telerik.Reporting.TextBox  
    Private WithEvents textBox16 As Telerik.Reporting.TextBox  
    Private WithEvents textBox17 As Telerik.Reporting.TextBox  
    Private WithEvents textBox18 As Telerik.Reporting.TextBox  
    Private WithEvents textBox19 As Telerik.Reporting.TextBox  
    Private WithEvents textBox20 As Telerik.Reporting.TextBox  
    Private WithEvents textBox21 As Telerik.Reporting.TextBox  
    Private WithEvents textBox22 As Telerik.Reporting.TextBox  
    Private WithEvents textBox23 As Telerik.Reporting.TextBox  
    Private WithEvents textBox24 As Telerik.Reporting.TextBox  
    Private WithEvents textBox25 As Telerik.Reporting.TextBox  
    Private WithEvents textBox26 As Telerik.Reporting.TextBox  
    Private WithEvents textBox27 As Telerik.Reporting.TextBox  
    Private WithEvents textBox28 As Telerik.Reporting.TextBox  
    Private WithEvents textBox29 As Telerik.Reporting.TextBox  
    Private WithEvents textBox30 As Telerik.Reporting.TextBox  
    Private WithEvents textBox31 As Telerik.Reporting.TextBox  
    Private WithEvents textBox32 As Telerik.Reporting.TextBox  
    Private WithEvents textBox33 As Telerik.Reporting.TextBox  
    Private WithEvents labelsGroupHeader As Telerik.Reporting.GroupHeaderSection  
 
    Public Sub New()  
 
        InitializeComponent()  
        Me.DataSource = Nothing 
 
    End Sub  
 
    'NOTE: The following procedure is required by the telerik Reporting Designer  
    'It can be modified using the telerik Reporting Designer.    
    'Do not modify it using the code editor.  
    Private Sub InitializeComponent()  
        Dim formattingRule1 As Telerik.Reporting.Drawing.FormattingRule = New Telerik.Reporting.Drawing.FormattingRule  
        Dim reportParameter1 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter  
        Dim styleRule1 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule  
        Dim styleRule2 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule  
        Dim styleRule3 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule  
        Dim styleRule4 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule  
        Me.labelsGroupHeader = New Telerik.Reporting.GroupHeaderSection  
        Me.labelsGroupFooter = New Telerik.Reporting.GroupFooterSection  
        Me.labelsGroup = New Telerik.Reporting.Group  
        Me.pageHeader = New Telerik.Reporting.PageHeaderSection  
        Me.tb_PageHeader = New Telerik.Reporting.TextBox  
        Me.pb_Logo = New Telerik.Reporting.PictureBox  
        Me.pageFooter = New Telerik.Reporting.PageFooterSection  
        Me.tb_CurrentTime = New Telerik.Reporting.TextBox  
        Me.tb_PageNumber = New Telerik.Reporting.TextBox  
        Me.reportHeader = New Telerik.Reporting.ReportHeaderSection  
        Me.tb_FromPhone = New Telerik.Reporting.TextBox  
        Me.tb_FromCityStateZip = New Telerik.Reporting.TextBox  
        Me.tb_FromAddress = New Telerik.Reporting.TextBox  
        Me.tb_FromWebAddress = New Telerik.Reporting.TextBox  
        Me.detail = New Telerik.Reporting.DetailSection  
        Me.da_ReportData = New System.Data.SqlClient.SqlDataAdapter  
        Me.textBox1 = New Telerik.Reporting.TextBox  
        Me.textBox2 = New Telerik.Reporting.TextBox  
        Me.textBox3 = New Telerik.Reporting.TextBox  
        Me.textBox4 = New Telerik.Reporting.TextBox  
        Me.textBox5 = New Telerik.Reporting.TextBox  
        Me.textBox8 = New Telerik.Reporting.TextBox  
        Me.textBox9 = New Telerik.Reporting.TextBox  
        Me.textBox6 = New Telerik.Reporting.TextBox  
        Me.textBox7 = New Telerik.Reporting.TextBox  
        Me.textBox10 = New Telerik.Reporting.TextBox  
        Me.textBox11 = New Telerik.Reporting.TextBox  
        Me.textBox12 = New Telerik.Reporting.TextBox  
        Me.textBox13 = New Telerik.Reporting.TextBox  
        Me.textBox14 = New Telerik.Reporting.TextBox  
        Me.textBox15 = New Telerik.Reporting.TextBox  
        Me.textBox16 = New Telerik.Reporting.TextBox  
        Me.textBox17 = New Telerik.Reporting.TextBox  
        Me.textBox18 = New Telerik.Reporting.TextBox  
        Me.textBox19 = New Telerik.Reporting.TextBox  
        Me.textBox20 = New Telerik.Reporting.TextBox  
        Me.textBox21 = New Telerik.Reporting.TextBox  
        Me.textBox22 = New Telerik.Reporting.TextBox  
        Me.textBox23 = New Telerik.Reporting.TextBox  
        Me.textBox24 = New Telerik.Reporting.TextBox  
        Me.textBox25 = New Telerik.Reporting.TextBox  
        Me.textBox26 = New Telerik.Reporting.TextBox  
        Me.textBox27 = New Telerik.Reporting.TextBox  
        Me.textBox28 = New Telerik.Reporting.TextBox  
        Me.textBox29 = New Telerik.Reporting.TextBox  
        Me.textBox30 = New Telerik.Reporting.TextBox  
        Me.textBox31 = New Telerik.Reporting.TextBox  
        Me.textBox32 = New Telerik.Reporting.TextBox  
        Me.textBox33 = New Telerik.Reporting.TextBox  
        CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()  
        '  
        'labelsGroupHeader  
        '  
        Me.labelsGroupHeader.Height = New Telerik.Reporting.Drawing.Unit(0.20003955066204071, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.labelsGroupHeader.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.textBox16, Me.textBox17, Me.textBox18, Me.textBox19})  
        Me.labelsGroupHeader.Name = "labelsGroupHeader" 
        Me.labelsGroupHeader.PrintOnEveryPage = True 
        Me.labelsGroupHeader.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.labelsGroupHeader.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.labelsGroupHeader.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.labelsGroupHeader.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid  
        '  
        'labelsGroupFooter  
        '  
        Me.labelsGroupFooter.Height = New Telerik.Reporting.Drawing.Unit(1.8998819589614868, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.labelsGroupFooter.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.textBox24, Me.textBox25, Me.textBox26, Me.textBox27, Me.textBox28, Me.textBox29, Me.textBox30, Me.textBox31, Me.textBox32, Me.textBox33})  
        Me.labelsGroupFooter.Name = "labelsGroupFooter" 
        Me.labelsGroupFooter.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.labelsGroupFooter.Style.Visible = True 
        '  
        'labelsGroup  
        '  
        MeMe.labelsGroup.GroupFooter = Me.labelsGroupFooter  
        MeMe.labelsGroup.GroupHeader = Me.labelsGroupHeader  
        '  
        'pageHeader  
        '  
        Me.pageHeader.Height = New Telerik.Reporting.Drawing.Unit(0.20000004768371582, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.pageHeader.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.tb_PageHeader})  
        Me.pageHeader.Name = "pageHeader" 
        Me.pageHeader.PrintOnFirstPage = False 
        '  
        'tb_PageHeader  
        '  
        Me.tb_PageHeader.Name = "tb_PageHeader" 
        Me.tb_PageHeader.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(6.4311714172363281, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19996063411235809, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_PageHeader.Value = "=Fields.PageHeader" 
        '  
        'pb_Logo  
        '  
        Me.pb_Logo.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02091217041015625, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.000039259593904716894, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.pb_Logo.Name = "pb_Logo" 
        Me.pb_Logo.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(6.4790878295898437, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.89996081590652466, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.pb_Logo.Style.BackgroundImage.Repeat = Telerik.Reporting.Drawing.BackgroundRepeat.NoRepeat  
        Me.pb_Logo.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.pb_Logo.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.pb_Logo.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.None  
        Me.pb_Logo.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.pb_Logo.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0.10000000149011612, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.pb_Logo.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.pb_Logo.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0.10000000149011612, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.pb_Logo.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Bottom  
        Me.pb_Logo.Value = "~/Images/Logos/logo_OPR.gif" 
        '  
        'pageFooter  
        '  
        Me.pageFooter.Height = New Telerik.Reporting.Drawing.Unit(0.28125, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.pageFooter.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.tb_CurrentTime, Me.tb_PageNumber})  
        Me.pageFooter.Name = "pageFooter" 
        '  
        'tb_CurrentTime  
        '  
        Me.tb_CurrentTime.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.099999986588954926, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.02083333395421505, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_CurrentTime.Name = "tb_CurrentTime" 
        Me.tb_CurrentTime.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.1187498569488525, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_CurrentTime.Style.Font.Name = "Arial" 
        Me.tb_CurrentTime.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.tb_CurrentTime.StyleName = "PageInfo" 
        Me.tb_CurrentTime.Value = "=NOW()" 
        '  
        'tb_PageNumber  
        '  
        Me.tb_PageNumber.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.2395832538604736, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.02083333395421505, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_PageNumber.Name = "tb_PageNumber" 
        Me.tb_PageNumber.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.1979167461395264, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_PageNumber.Style.Font.Name = "Arial" 
        Me.tb_PageNumber.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.tb_PageNumber.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.tb_PageNumber.StyleName = "PageInfo" 
        Me.tb_PageNumber.Value = "=PageNumber" 
        '  
        'reportHeader  
        '  
        Me.reportHeader.Height = New Telerik.Reporting.Drawing.Unit(3.7999999523162842, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.reportHeader.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.pb_Logo, Me.tb_FromPhone, Me.tb_FromCityStateZip, Me.tb_FromAddress, Me.tb_FromWebAddress, Me.textBox1, Me.textBox2, Me.textBox3, Me.textBox4, Me.textBox5, Me.textBox8, Me.textBox9, Me.textBox6, Me.textBox7, Me.textBox10, Me.textBox11, Me.textBox12, Me.textBox13, Me.textBox14, Me.textBox15})  
        Me.reportHeader.Name = "reportHeader" 
        Me.reportHeader.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.reportHeader.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.reportHeader.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.None  
        Me.reportHeader.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.reportHeader.Style.Visible = True 
        '  
        'tb_FromPhone  
        '  
        Me.tb_FromPhone.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02083333395421505, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.2999606132507324, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromPhone.Name = "tb_FromPhone" 
        Me.tb_FromPhone.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.379166841506958, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999997317790985, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromPhone.Value = "=Fields.FromPhone" 
        '  
        'tb_FromCityStateZip  
        '  
        Me.tb_FromCityStateZip.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02083333395421505, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.0999604463577271, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromCityStateZip.Name = "tb_FromCityStateZip" 
        Me.tb_FromCityStateZip.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.379166841506958, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999997317790985, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromCityStateZip.Value = "=Fields.FromCityStateZip" 
        '  
        'tb_FromAddress  
        '  
        Me.tb_FromAddress.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02083333395421505, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.90000009536743164, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromAddress.Name = "tb_FromAddress" 
        Me.tb_FromAddress.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.3791670799255371, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999997317790985, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromAddress.Value = "=Fields.FromAddress" 
        '  
        'tb_FromWebAddress  
        '  
        Me.tb_FromWebAddress.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02083333395421505, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.4999607801437378, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromWebAddress.Name = "tb_FromWebAddress" 
        Me.tb_FromWebAddress.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.379166841506958, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999997317790985, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromWebAddress.Value = "=Fields.FromWebAddress" 
        '  
        'detail  
        '  
        formattingRule1.Filters.AddRange(New Telerik.Reporting.Data.Filter() {New Telerik.Reporting.Data.Filter("RowNumber()%2", Telerik.Reporting.Data.FilterOperator.Equal, "=1")})  
        formattingRule1.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer))  
        Me.detail.ConditionalFormatting.AddRange(New Telerik.Reporting.Drawing.FormattingRule() {formattingRule1})  
        Me.detail.Height = New Telerik.Reporting.Drawing.Unit(0.20007896423339844, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.detail.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.textBox20, Me.textBox21, Me.textBox22, Me.textBox23})  
        Me.detail.Name = "detail" 
        Me.detail.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.detail.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.detail.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.detail.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        '  
        'textBox1  
        '  
        Me.textBox1.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.000039418537198798731, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.8999999761581421, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox1.Name = "textBox1" 
        Me.textBox1.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.89996069669723511, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox1.Style.Font.Bold = True 
        Me.textBox1.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(14, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox1.Value = "Invoice" 
        '  
        'textBox2  
        '  
        Me.textBox2.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.8999999761581421, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox2.Name = "textBox2" 
        Me.textBox2.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.99583292007446289, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox2.Style.Font.Bold = True 
        Me.textBox2.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(14, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox2.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox2.Value = "No." 
        '  
        'textBox3  
        '  
        Me.textBox3.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.1000003814697266, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.8999999761581421, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox3.Name = "textBox3" 
        Me.textBox3.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.2998420000076294, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox3.Style.Font.Bold = True 
        Me.textBox3.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(14, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox3.Value = "=Fields.InvoiceNo" 
        '  
        'textBox4  
        '  
        Me.textBox4.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.1000003814697266, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox4.Name = "textBox4" 
        Me.textBox4.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.2998420000076294, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox4.Style.Font.Bold = False 
        Me.textBox4.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox4.Value = "=Fields.InvoiceDate" 
        '  
        'textBox5  
        '  
        Me.textBox5.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox5.Name = "textBox5" 
        Me.textBox5.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.99583292007446289, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox5.Style.Font.Bold = True 
        Me.textBox5.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox5.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox5.Value = "Invoice Date:" 
        '  
        'textBox8  
        '  
        Me.textBox8.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.2999999523162842, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox8.Name = "textBox8" 
        Me.textBox8.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.99583292007446289, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox8.Style.Font.Bold = True 
        Me.textBox8.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox8.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox8.Value = "Terms:" 
        '  
        'textBox9  
        '  
        Me.textBox9.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.1000003814697266, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.2999999523162842, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox9.Name = "textBox9" 
        Me.textBox9.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.2998420000076294, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox9.Style.Font.Bold = False 
        Me.textBox9.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox9.Value = "=Fields.Terms" 
        '  
        'textBox6  
        '  
        Me.textBox6.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.1000003814697266, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.5, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox6.Name = "textBox6" 
        Me.textBox6.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.2998420000076294, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox6.Style.Font.Bold = False 
        Me.textBox6.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox6.Value = "=Fields.CurrentDueDate" 
        '  
        'textBox7  
        '  
        Me.textBox7.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.5, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox7.Name = "textBox7" 
        Me.textBox7.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.99583292007446289, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox7.Style.Font.Bold = True 
        Me.textBox7.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox7.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox7.Value = "Due Date:" 
        '  
        'textBox10  
        '  
        Me.textBox10.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox10.Name = "textBox10" 
        Me.textBox10.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.3000791072845459, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox10.Style.Font.Bold = False 
        Me.textBox10.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox10.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left  
        Me.textBox10.Value = "=Fields.InvoiceDescription" 
        '  
        'textBox11  
        '  
        Me.textBox11.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.5, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox11.Name = "textBox11" 
        Me.textBox11.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.90000009536743164, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox11.Style.Font.Bold = True 
        Me.textBox11.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(14, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox11.Value = "Bill to:" 
        '  
        'textBox12  
        '  
        Me.textBox12.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.000078837074397597462, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(3.0000784397125244, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox12.Name = "textBox12" 
        Me.textBox12.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.3000001907348633, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox12.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox12.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox12.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox12.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox12.Value = "=Fields.ToCompanyName" 
        '  
        'textBox13  
        '  
        Me.textBox13.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.7999999523162842, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox13.Name = "textBox13" 
        Me.textBox13.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.3000001907348633, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox13.Style.BorderColor.Top = System.Drawing.Color.Black  
        Me.textBox13.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox13.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox13.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox13.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox13.Value = "=Fields.ToContactName" 
        '  
        'textBox14  
        '  
        Me.textBox14.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.000078837074397597462, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(3.2001571655273437, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox14.Name = "textBox14" 
        Me.textBox14.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.3000001907348633, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox14.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox14.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox14.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox14.Value = "=Fields.ToAddress" 
        '  
        'textBox15  
        '  
        Me.textBox15.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.000078837074397597462, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(3.4002361297607422, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox15.Name = "textBox15" 
        Me.textBox15.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.3000001907348633, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox15.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox15.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox15.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox15.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox15.Value = "=Fields.ToCityStateZip" 
        '  
        'textBox16  
        '  
        Me.textBox16.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02091217041015625, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox16.Name = "textBox16" 
        Me.textBox16.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.7790887355804443, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox16.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox16.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox16.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox16.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox16.Style.Font.Bold = True 
        Me.textBox16.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox16.Value = "Description" 
        '  
        'textBox17  
        '  
        Me.textBox17.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.8000795841217041, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.000039736431062920019, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox17.Name = "textBox17" 
        Me.textBox17.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.79992103576660156, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox17.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox17.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox17.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox17.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox17.Style.Font.Bold = True 
        Me.textBox17.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox17.Value = "Units " 
        '  
        'textBox18  
        '  
        Me.textBox18.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4.5999999046325684, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox18.Name = "textBox18" 
        Me.textBox18.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.80000019073486328, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox18.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox18.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox18.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox18.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox18.Style.Font.Bold = True 
        Me.textBox18.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox18.Value = "Cost " 
        '  
        'textBox19  
        '  
        Me.textBox19.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4000792503356934, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox19.Name = "textBox19" 
        Me.textBox19.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.0999212265014648, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox19.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox19.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox19.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox19.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox19.Style.Font.Bold = True 
        Me.textBox19.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox19.Value = "Total " 
        '  
        'textBox20  
        '  
        Me.textBox20.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02091217041015625, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox20.Name = "textBox20" 
        Me.textBox20.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.7790887355804443, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox20.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox20.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox20.Value = "=Fields.ItemDescription" 
        '  
        'textBox21  
        '  
        Me.textBox21.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.8000795841217041, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.000078837074397597462, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox21.Name = "textBox21" 
        Me.textBox21.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.7999998927116394, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox21.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox21.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox21.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox21.Value = "=Fields.Units" 
        '  
        'textBox22  
        '  
        Me.textBox22.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4.6001582145690918, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.000078837074397597462, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox22.Name = "textBox22" 
        Me.textBox22.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.7999998927116394, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox22.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox22.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox22.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox22.Value = "=Fields.Cost" 
        '  
        'textBox23  
        '  
        Me.textBox23.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4000792503356934, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox23.Name = "textBox23" 
        Me.textBox23.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.0998420715332031, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox23.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox23.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox23.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox23.Value = "=Fields.ItemTotal" 
        '  
        'textBox24  
        '  
        Me.textBox24.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19988155364990234, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox24.Name = "textBox24" 
        Me.textBox24.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.599920392036438, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox24.Style.Font.Bold = True 
        Me.textBox24.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox24.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox24.Value = "Total Amount" 
        '  
        'textBox25  
        '  
        Me.textBox25.Format = "{0:C2}" 
        Me.textBox25.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4000792503356934, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19988155364990234, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox25.Name = "textBox25" 
        Me.textBox25.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.0998420715332031, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox25.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox25.Value = "=Fields.CurrentAmt" 
        '  
        'textBox26  
        '  
        Me.textBox26.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.39996084570884705, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox26.Name = "textBox26" 
        Me.textBox26.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.5999206304550171, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox26.Style.Font.Bold = True 
        Me.textBox26.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox26.Value = "Outstanding Invoice(s)" 
        '  
        'textBox27  
        '  
        Me.textBox27.Format = "{0:C2}" 
        Me.textBox27.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4.6999998092651367, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.39996084570884705, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox27.Name = "textBox27" 
        Me.textBox27.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.7000001072883606, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox27.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox27.Value = "=Fields.OutstandingInvDesc" 
        '  
        'textBox28  
        '  
        Me.textBox28.Format = "{0:N2}" 
        Me.textBox28.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4001579284667969, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.39996084570884705, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox28.Name = "textBox28" 
        Me.textBox28.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.0998420715332031, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox28.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox28.Value = "=Fields.OutstandingInvAmt" 
        '  
        'textBox29  
        '  
        Me.textBox29.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.6000397801399231, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox29.Name = "textBox29" 
        Me.textBox29.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.6000000238418579, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox29.Style.Font.Bold = True 
        Me.textBox29.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox29.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox29.Value = "Late Fee" 
        '  
        'textBox30  
        '  
        Me.textBox30.Format = "{0:N2}" 
        Me.textBox30.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4001579284667969, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.6000397801399231, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox30.Name = "textBox30" 
        Me.textBox30.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.0998420715332031, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox30.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox30.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox30.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox30.Value = "=Fields.LateFee" 
        '  
        'textBox31  
        '  
        Me.textBox31.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.80000239610672, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox31.Name = "textBox31" 
        Me.textBox31.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.6000000238418579, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox31.Style.Font.Bold = True 
        Me.textBox31.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox31.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox31.Value = "Total Amount Due" 
        '  
        'textBox32  
        '  
        Me.textBox32.Format = "{0:C2}" 
        Me.textBox32.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4000792503356934, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.80011874437332153, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox32.Name = "textBox32" 
        Me.textBox32.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.0998420715332031, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox32.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.[Double]  
        Me.textBox32.Style.BorderWidth.Bottom = New Telerik.Reporting.Drawing.Unit(5, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox32.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox32.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox32.Value = "=Fields.TotalAmountDue" 
        '  
        'textBox33  
        '  
        Me.textBox33.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.099999986588954926, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.2998815774917603, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox33.Name = "textBox33" 
        Me.textBox33.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(4.5999207496643066, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.5, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox33.Value = "=Fields.InvoiceNote" 
        '  
        'Invoice  
        '  
        Me.Groups.AddRange(New Telerik.Reporting.Group() {Me.labelsGroup})  
        Me.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.labelsGroupHeader, Me.labelsGroupFooter, Me.pageHeader, Me.pageFooter, Me.reportHeader, Me.detail})  
        Me.PageSettings.Landscape = False 
        Me.PageSettings.Margins.Bottom = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.PageSettings.Margins.Left = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.PageSettings.Margins.Right = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.PageSettings.Margins.Top = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.PageSettings.PaperKind = System.Drawing.Printing.PaperKind.Letter  
        reportParameter1.Name = "pi_InvoiceID" 
        reportParameter1.Type = Telerik.Reporting.ReportParameterType.[Integer]  
        Me.ReportParameters.Add(reportParameter1)  
        Me.Style.BackgroundColor = System.Drawing.Color.White  
        styleRule1.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Title")})  
        styleRule1.Style.Color = System.Drawing.Color.Black  
        styleRule1.Style.Font.Bold = True 
        styleRule1.Style.Font.Italic = False 
        styleRule1.Style.Font.Name = "Tahoma" 
        styleRule1.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(20, Telerik.Reporting.Drawing.UnitType.Point)  
        styleRule1.Style.Font.Strikeout = False 
        styleRule1.Style.Font.Underline = False 
        styleRule2.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Caption")})  
        styleRule2.Style.Color = System.Drawing.Color.Black  
        styleRule2.Style.Font.Name = "Tahoma" 
        styleRule2.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(11, Telerik.Reporting.Drawing.UnitType.Point)  
        styleRule2.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle  
        styleRule3.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Data")})  
        styleRule3.Style.Font.Name = "Tahoma" 
        styleRule3.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(11, Telerik.Reporting.Drawing.UnitType.Point)  
        styleRule3.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle  
        styleRule4.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("PageInfo")})  
        styleRule4.Style.Font.Name = "Tahoma" 
        styleRule4.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(11, Telerik.Reporting.Drawing.UnitType.Point)  
        styleRule4.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle  
        Me.StyleSheet.AddRange(New Telerik.Reporting.Drawing.StyleRule() {styleRule1, styleRule2, styleRule3, styleRule4})  
        Me.Width = New Telerik.Reporting.Drawing.Unit(6.5, Telerik.Reporting.Drawing.UnitType.Inch)  
        CType(Me, System.ComponentModel.ISupportInitialize).EndInit()  
 
    End Sub  
 
    Function GetReportData(ByVal pi_InvoiceID As Integer) As SqlDataAdapter  
 
        Dim lo_Connection As SqlConnection = New SqlConnection(OutPar.Database.AppConnectionString)  
        Dim lo_Command As SqlCommand = New SqlCommand("otgi_InvoiceFetch", lo_Connection)  
        lo_Command.CommandType = CommandType.StoredProcedure  
        lo_Connection.FireInfoMessageEventOnUserErrors = False 
 
        'Add parameters  
        Dim prm_BeginPayDate As SqlParameter = New SqlParameter("@pi_InvoiceID", SqlDbType.Int, 4)  
        prm_BeginPayDate.Value = pi_InvoiceID 
        lo_Command.Parameters.Add(prm_BeginPayDate)  
 
        Try  
            'Open the connection and execute the command  
            Me.da_ReportData.SelectCommand = lo_Command 
 
        Catch ex As Exception  
            'An error has occurred  
 
        Finally  
            'Close connection  
            If lo_Connection.State = ConnectionState.Open Then  
                lo_Connection.Close()  
            End If  
        End Try  
 
        'Return data to report  
        GetReportData = Me.da_ReportData  
 
    End Function  
 
    Private Sub Invoice_NeedDataSource(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.NeedDataSource  
 
        'Declare objects/variables  
        Dim lo_Report As Telerik.Reporting.Processing.Report = CType(sender, Telerik.Reporting.Processing.Report)  
 
        'Set the report data source passing report parameters  
        lo_Report.DataSource = GetReportData(Me.ReportParameters("pi_InvoiceID").Value)  
 
    End Sub  
 
End Class  
 
Steve
Telerik team
 answered on 10 Nov 2009
3 answers
109 views
Hi,

 I have added one HTMLTextbox in my report.I put <i>Sample text</i> in Value property

But while running i am getting as <i>Sample text</i> .

How to show this text as italic?

Thanks for any help



sabarishbabu
Top achievements
Rank 1
 answered on 09 Nov 2009
1 answer
96 views
If I have a simple tabular report in which all data is contained in a table object, where should the table object exist in the report template?  At run-time I am binding my business object to the table itself. 

When I place the table in the detail section, there are two pages in the web viewer.  The first page has the report header and the second page has the full table of data (not paginated).  If I place the table object in any of the other sections, I get a similar effect.  However, in every case the printed report is paginated correctly.

I believe that the answer is to place the table object in the detail section and bind the business object to the report itself but in this case the table cannot contain a header row or it will be repeated for every row.  In this case I can remove the header row and place the separate table header in the page header section but then you run into a problem synchronizing the column widths between the detail row and header row. 

Is there a technique that I am missing?  What is the proper method?

Thanks,
Dave
Steve
Telerik team
 answered on 09 Nov 2009
1 answer
126 views
Hi,
I have been looking for a reporting tool that can print HTML table for a long time.  I have Crystal Reports, but it can not print table tags. 3 months ago I downloaded Telerik Reporting, but it could not print tables (like those created with the RadEditor)

Please tell me the latest version can print the table tag. If not, do anyone know of a report tool that can?. I need to print manuals with header/footer and where the content is HTML that comes from SQL Server text-fields.


Regards
Atle
Steve
Telerik team
 answered on 09 Nov 2009
1 answer
74 views
i have upgraded my deployed server to Q3 and now all i get on the viewer is a display saying Submit Query Submit Query (see attached image)



any ideas
kevin



Steve
Telerik team
 answered on 09 Nov 2009
0 answers
58 views
Hello Sir
am new in the report. I have an application with master(Invoice Header) and details(invoice details). I tried with subreport as per your sample attachment(http://www.telerik.com/community/forums/reporting/telerik-reporting/master-and-subreport.aspx) given.(I could not saw the vidio becase its url showsing error). but the master report and detail working  fine in seperately.

    when i'm, merge the subreport to the master, the parameter cantaines null values in detail report. can u help me for this issues.

thanks in advance.
subbiee.
subbarayan
Top achievements
Rank 1
 asked on 09 Nov 2009
8 answers
322 views
Greetings,

I seem to be having a problem when using the web based Report Viewer when I set the report parameters at run time.


Here's a summary of the problem:

I have a report that is generating a data source in the NeedDataSource event. 
The data source is being generated using data from the ReportParameters collection.

I have an aspx page that has a viewer control that is not bound to a report at design time.
My report page has a series of input controls that can be used to change the report parameters. 
After the user enters his report parameters and clicks the submit button, the code behind creates a new report object, assigns the parameters and then assigns the report to the viewer control.

This works fine the first time the user generates the report.  If the user changes his parameters and regenerates the report, the report is always generated using the first set of parameters. 

Here is some of the sample code:

GenerateReport(p1,p2) is called when the user clicks a "submit" button.  I've simplified the parameters for ease of reading. 
ToplineMaster and VerbatimMaster are the report objects.  Based on the input from the user, we determine which report to show (but this only happens on the first load of the page, the user does not change report types on the fly)
private void GenerateReport(List<int> p1, List<int> p2)  
{  
  if(Mode == 1)  
  {  
    ToplineMaster report = new ToplineMaster();  
    report.ReportParameters["p1"].Value = p1;  
    report.ReportParameters["p2"].Value = p2;  
              
    rv_Rpt_Viewer.Report = report;  
  }  
  else if (Mode == 2)  
  {  
    VerbatimMaster report = new VerbatimMaster();  
    report.ReportParameters["p1"].Value = p1;  
    report.ReportParameters["p2"].Value = p2;  
              
    rv_Rpt_Viewer.Report = report;
  }  

Both report types use a similar NeedDataSource method.  I changed it a bit to keep things simple, but basically I'm generating report line items based on data generated from my business logic layer and then binding those line items to the report.  The report works fine when I run it the first time.
private void ToplineMaster_NeedDataSource(object sender, EventArgs e)     
        {     
            // given the question ids, load the questions from the database     
            // and bind the list to the report     
            List<int> p1 = new List<int>();     
            p1 = (List<int>)(sender as Telerik.Reporting.Processing.Report).Parameters["p1"];     
   
            List<int> p2 = new List<int>();     
            p2 = (List<int>)(sender as Telerik.Reporting.Processing.Report).Parameters["p2"];     
    
            List<BusinessDataObject> lineItems = new List<BusinessDataObject>();  
   
            foreach (int id in p1)     
            {    
                // generate data from business objects/database  
                lineItems.Add(Data);   
            }     
    
            (sender as Telerik.Reporting.Processing.Report).DataSource = lineItems;     
                 
    
        }    
 

I did some searching around today, but couldn't find the magic google/forum search query to find an explanation which leads me to believe that I'm doing something wrong.

Can anyone offer a hand?

Thanks!

Rick
Top achievements
Rank 2
 answered on 07 Nov 2009
1 answer
144 views
It seems to me like the support for Parametrized Queries is severely lacking.  If you choose to go the route of using an sqldataAdapter with parameters you can no longer use the table or cross-tab wizards and most of the report has to created by hand.

As far as I can see the performance difference between using a filter to select certain data over using a parameter in the sql query is minimal, but I am test on such a small scale I don't know if it will truly make a difference.

I need to know how the filters work.  I assume that the query pulls all of the data into the dataset and then the filter selects the needed data from that.  This seems very inefficient to me because we are pulling a large amount of data from the DB then grabbing the small chunk we need and throwing the rest away.  While a PQ will only pull the data you need from the DB, eliminating the need for a secondary filter.

Is this how it works, if so that just seems silly to me that there is such lacking support for PQ's in the designer.
Hrisi
Telerik team
 answered on 06 Nov 2009
1 answer
108 views
Hey

Is there any good example for building report dynamic. I can't find very much information about this. Only ifnormation i found was this: http://www.telerik.com/help/reporting/programmatic-control-of-reports.html

My problem is that the report would change depending on the data.

Here are some of mye problem:
- Add controls dynamic. I know i can add controls in design mode and look at the "code behind". But it looks like i need to place control with a absolute position. I need to use sections. I tried to use panels, but this is useless if i need to give the panel a absolute position, because the content length of every panel will be different.
- How can i control page break? I would like every new section to start on a new page.

Thanks

Steve
Telerik team
 answered on 05 Nov 2009
1 answer
121 views

 

Hi

I'm trying to fill a HTMLTextBox on a subreport programatically in order to change appearence depending on the data. I managed to get line breaks working by changing from BR to DIV tags, but I can't get the styles to work. Since I have a lot of subreports I really don't want to include FONT tags into the code and risk creating a maintenance nightmare. Is there a way to set styles programatically?

I've tried adding the HTML using a script that is called from the HTMLTextBox, such as
...
PositionLine = "<DIV Class='PositionCompany>'" & PositionLine & "</DIV>"
Return PositionLine

but this only gives me linebreaks, not the formatting. "'PositionCompany" is a style rule defined in the master report.

How do I call the CSS formatting? (By the way, I can't set it directly since I use several different style rules inside the same HTMLTextBoc depending on data.

Thanks in advance!

Re
Dennis

   Public Shared Function Position(ByVal Company As StringByVal City As StringByVal Country As StringByVal CompanyType As StringByVal Title As StringByVal DetailLong As StringByVal DetailShort As StringAs String 
 
        Dim PositionLine As String = Company.ToString  
 
        If City <> "" Then 
            If PositionLine <> "" Then 
                PositionLine += ", " & City.ToString  
            Else 
                PositionLine = City.ToString  
            End If 
        End If 
        If Country <> "" Then 
            If PositionLine <> "" Then 
                PositionLine += ", " & Country.ToString  
            Else 
                PositionLine = Country.ToString  
            End If 
        End If 
        If CompanyType <> "" Then 
            If PositionLine <> "" Then 
                PositionLine += " (" & CompanyType.ToString & ")" 
            Else 
                PositionLine = CompanyType.ToString  
            End If 
        End If 
        If PositionLine <> "" Then 
            PositionLine = "<DIV Class='PositionCompany'>" & PositionLine & "</DIV>" 
        End If 
        If Title <> "" Then 
            If PositionLine <> "" Then 
                PositionLine = PositionLine & "<DIV Class='PositionTitle'>" & Title.ToString & "</DIV>" 
            End If 
        End If 
        If DetailShort <> "" Then 
            If PositionLine <> "" Then 
                PositionLine = PositionLine & "<DIV Class='PositionDetails'>" & DetailShort.ToString & "</DIV>" 
            End If 
        End If 
 
        If DetailLong <> "" Then 
            If PositionLine <> "" Then 
                PositionLine = PositionLine & "<DIV Class='PositionDetails'>" & DetailLong.ToString & "</DIV>" 
            End If 
        End If 
 
 
        Return PositionLine  
 
    End Function 
 
Steve
Telerik team
 answered on 05 Nov 2009
Top users last month
Jay
Top achievements
Rank 3
Bronze
Iron
Iron
yw
Top achievements
Rank 2
Iron
Iron
Stefan
Top achievements
Rank 2
Iron
Iron
Iron
Kao Hung
Top achievements
Rank 1
Iron
Bohdan
Top achievements
Rank 2
Iron
Iron
Iron
Want to show your ninja superpower to fellow developers?
Want to show your ninja superpower to fellow developers?