这是导入的%@ Register TagPrefix="CC" Namespace="Powerplus.Tools.BRule.Controls" Assembly="Powerplus.Tools.BRule" %这是调用的CC:ExPager ID="cc_ExPager" runat="server" OnIndexChanged="PageIndex_Changed" Visible="true" /
站在用户的角度思考问题，与客户深入沟通，找到马村网站设计与马村网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：网站建设、做网站、企业官网、英文网站、手机端网站、网站推广、域名注册、雅安服务器托管、企业邮箱。业务覆盖马村地区。
Private ctrName As String '控件名称
Private isClick As Boolean '鼠标点击状态
'注：如果已知点击目标控件的父控件，ctrParent变量可以不要。
Private WithEvents ctrParent As Control '父控件
Private Sub ControlAMouseDown(sender As Object, e As MouseEventArgs) _
Handles Button1.MouseDown
isClick = (e.Button = MouseButtons.Left _
Or e.Button = MouseButtons.Right) '左键或右键按下
If isClick Then
Dim ctr As Control = CType(sender, Control) '转换Object为控件类型
ctrName = ctr.Name '获取控件名称
ctrParent = ctr.Parent '获取控件的父控件
End If
End Sub
'增加这个父控件事件，是为了正确判别鼠标弹起时是否已进入指定目标
Private Sub ParentMouseMove(sender As Object, e As EventArgs) _
Handles ctrParent.MouseMove '如果已取消ctrParent变量，改为相应的父控件
If isClick Then isClick = False '点击状态关闭
End Sub
Private Sub ControlBMouseUp(sender As Object, e As EventArgs) _
Handles Button2.MouseEnter
If isClick Then '如果点击状态为打开
Dim ctr As Control = CType(sender, Control) '转换Object为控件类型
MsgBox(ctrName " | " ctr.Name) '弹出消息显示结果
End If
End Sub
如上楼说的使用FindControl（）函数可以找到的。如下：
Repeater rp = GridView1.Rows[i].FindControl("Repeater1") as Repeater;
这个是我写留言博客时用的，用FindControl(“要找的控件id名”)。
这个例子的功能是“回复”时找到对象的留言内容，并显示（Repeater控件）。不知道你明白了吗？谢谢
这个简单。
在VB.net中，每个事件都对应有两个参数：sender 和 e 。提取 sender 参数信息就可以获取控件名称。如果不理解其中机制，你直接 msgbox(sender) 将其输出，就能查看其中玄机。
获取控件名称代码：CType(sender, Control).Name。
思路：
1，使用ListBox1控件来存放搜索到的文件名，然后ListBox1.SelectedItem就可以返回选中项的文本；
2，利用获得的选中项文本（即文件与路径），使用打开文本文件的方法，读取内容显示在文本框里。
这个简单呀，select * from 表名称 where 列名称'全部' (也就是查找某列的值ComboBox当前值,就显示出所有的记录了），希望能帮到你
