defaultvb.aspx.vb

来自「Telerik是很大的第三方软件制造商」· VB 代码 · 共 17 行

Imports System
Imports Telerik.QuickStart
Imports Telerik.QuickStart.Grid
Imports Telerik.WebControls

Namespace Telerik.GridExamplesVBNET.Styles.ColorSchemes.Classic

    Public MustInherit Class DefaultVB
        Inherits XhtmlPage
        Protected WithEvents RadGrid1 As RadGrid

        Private Sub RadGrid1_NeedDataSource(ByVal [source] As Object, ByVal e As GridNeedDataSourceEventArgs) Handles RadGrid1.NeedDataSource
            RadGrid1.DataSource = DataSourceHelperVB.GetDataTable("SELECT TOP 20 CustomerID, CompanyName, ContactName, ContactTitle, Address, PostalCode FROM Customers")
        End Sub

    End Class
End Namespace