繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 动态生成带事件的MsFlexGrid
- ASP.NET
- 如何使用vb6.0来实现中文实名搜索
- C#实现Window管道技术
- 记录下一些关于测试工具NUNIT的链接资料，有兴趣的朋友也可以跳过去看看
- 编写与.NET属性窗口交互的RAD组件（自序）
- asp.net 关于form认证的一般设置：
- 编写与.NET属性窗口交互的RAD组件（一）
- ActiveX控件的打包发布[无证书发布](一)
- Visual SourceSafe 6.0 的问题思考
- VB报表输出的问题，恳请不吝赐教
- 证书和签名--试用微软提供的证书测试工具系列
- [dotNET]如何利用ConfigurationSettings.AppSettings.GetValues读取配置文件中多个...
- 使用C#编写DES加密程序的framework
- 令你的网页速度大大提高
- 怎样得到一个系统盘的全名，不是字符，是全名，如：本地磁盘(C:)？
- r在richtextbox中插入动画/控件
- Code: Writing Text to a File (Visual Basic)
- 算法讨论:哲学家就餐问题
- 我们所要关注的是什么？
- firebird 连接嵌入式版本
- 从Csharp走到VB.Net(一):MyClass保留字
ASP.NET 中的 动态生成带事件的MsFlexGrid
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 117 ::
收藏到网摘: 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
评论 (0) All
