当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 动态生成带事件的MsFlexGrid

ASP.NET
ADO+ 引导数据种类的演变(转自 ms 一)
C#抢鲜快报之FAQ20
通过指定IP地址得到当前的网络上的主机的域名
网上追捕(很多实用的port)
asp+中的发送者是什么意思
一个完整的网上追捕的原程序
C#里操作时间的例子!
查看主机的内存使用情况
asp+中是如何连接数据库ado+的
一个用c#写的扫描asp源码漏洞的应用程序
一个用c#写的扫描asp源码漏洞的应用程序(续)
两个获取http页面的c#函数
asp.net高级教程(一)---asp.net , 还是asp+ ?
asp.net高级教程(二)--- 转换编程思维
asp.net高级教程(三)---对象
asp.net高级教程(三)---实战篇
asp.net高级教程(五)---实战篇(中)
C#消息队列应用程序 -1
C#消息队列应用程序 -2
使用 ASP+ 列表绑定控件(上)

ASP.NET 中的 动态生成带事件的MsFlexGrid


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 197 ::
收藏到网摘: n/a


Option Explicit
Dim WithEvents objExt As VBControlExtender ' 使用 WithEvents 声明 VBControlExtender 变量
Private Sub LoadControl()
'Licenses.Add "Project1.Control1", "ewrinvcmcoe"
Licenses.Add "MSFlexGridLib.MSFlexGrid", _
"72E67120-5959-11cf-91F6-C2863C385E30"
Set objExt = Controls.Add("MSFlexGridLib.MSFlexGrid", "myCtl")
With objExt
.Left = 0
.Top = 0
.Width = Me.ScaleWidth
.Height = Me.ScaleHeight
.Visible = True ' 该控件在缺省情况下为不可见的。
.ToolTipText = "这是一个MSFlexGrid控件!"
End With
End Sub
Private Sub Form_Load()
LoadControl
End Sub
Private Sub objExt_ObjectEvent(Info As EventInfo)
' 使用 Select Case 语句编写控件的事件处理程序。
Select Case Info.Name
Case "Click"
' 在此处处理 Click 事件。
MsgBox "click 事件"
' 在这里处理其他情况
Case Else ' 未知事件
' 在此处理各种未知的事件。
' MsgBox "else 事件"
End Select
End Sub