Posted on Nov 22, 2006
(permalink)
Actually I just converted the telerikreport.cs to vb.net
Code Begins Here!
///////////////////////////////////////////////////////////////
Imports System.ComponentModel
Imports Telerik.Reporting
Imports Telerik.Reporting.Drawing
Namespace rootnamespace
Public Class safeitemrootname
Inherits Report
Private pageHeader As PageHeaderSection
Private detail As DetailSection
Private pageFooter As PageFooterSection
Private components As Container = Nothing
Public Sub New()
InitializeComponent()
End Sub
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
Private Sub InitializeComponent()
Me.pageHeader = New Telerik.Reporting.PageHeaderSection
Me.detail = New Telerik.Reporting.DetailSection
Me.pageFooter = New Telerik.Reporting.PageFooterSection
Me.pageHeader.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(10.0F, Unit.DefaultType), New Telerik.Reporting.Drawing.Unit(2.0F, Unit.DefaultType))
Me.detail.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(10.0F, Unit.DefaultType), New Telerik.Reporting.Drawing.Unit(3.0F, Unit.DefaultType))
Me.pageFooter.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(10.0F, Unit.DefaultType), New Telerik.Reporting.Drawing.Unit(2.0F, Unit.DefaultType))
Me.Font.Color = System.Drawing.Color.Black
Me.Font.Name = "Tahoma"
Me.Font.Size = New Telerik.Reporting.Drawing.Unit(12.0F, Telerik.Reporting.Drawing.UnitType.Point)
Me.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.pageHeader, Me.detail, Me.pageFooter})
End Sub
End Class
End Namespace
////////////////////////////////////////////////////////////////////////////////////////