RELATEED CONSULTING
相关咨询
选择下列产品马上在线沟通
服务时间:8:30-17:00
你可能遇到了下面的问题
关闭右侧工具栏

新闻中心

这里有您想知道的互联网营销解决方案
vb点虐 如何获取控件 vbframe控件

vb点虐 鼠标点击控件时 怎样得到控件的名字

这个简单。

创新互联建站专注为客户提供全方位的互联网综合服务,包含不限于网站设计制作、成都网站建设、九龙坡网络推广、微信小程序、九龙坡网络营销、九龙坡企业策划、九龙坡品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等,从售前售中售后,我们都将竭诚为您服务,您的肯定,是我们最大的嘉奖;创新互联建站为所有大学生创业者提供九龙坡建站搭建服务,24小时服务热线:028-86922220,官方网址:www.cdcxhl.com

在VB点虐 中,每个事件都对应有两个参数:sender 和 e 。提取 sender 参数信息就可以获取控件名称。如果不理解其中机制,你直接 msgbox(sender) 将其输出,就能查看其中玄机。

获取控件名称代码:CType(sender, Control).Name。

你好,我想请教一下vb点虐 中怎么调用用户控件,谢谢!

关于用户控件的使用,点虐 与v6环境下是有那么小小的区别。v6环境下的用户控件编写后可以直接使用,而在点虐 环境下,则需要先生成控件库(dll,应用程序扩展格式),然后再将这个控件库导入到点虐 编程环境的工具箱上方可使用。其具体方法如下(以VS 2010,Visual Basic点虐 为例):1、新建项目-Visual Basic-Windows-Windows 窗体控件库-键入控件库名称(默认为Usercontrol1)确定;2、设计你的用户控件,完成后按“F7”进行编译;3、在该解决方案目录下找到控件库扩展(默认为UserControl1.dll),确认项目已经生成。在上三项为控件库DLL的生成方式,下面是调用方式:4、新建项目-Visual Basic-Windows-Windows 窗体应用程序-确定;5、打开工具箱,以任意一个控件上点击右键-选择项-点虐 framework组件-浏览-定位到生成的控件库扩展-确定;6、在工具箱中找到新添加的用户控件,将其拖至窗体中进行设计。经测,在点虐 环境下编译的用户控件是通用的。也就是说使用Visual Basic点虐 编写的用户控件,也可以在C#工程里使用,反之亦然。这充分体现了点虐 语言的交互性,在我看来,点虐 下各种语言能力相当,它们都是作为一种中间语言,编译出中间代码。所以,在点虐 环境下,采用混合编程也未尝不是一样提高效率的一种可选的方式。

VB点虐 怎么获取TabControl中的所有控件

子控件集合。

.controls

第一个子控件的子控件集合。

.controls(0).controls

vb点虐 怎样获取同类控件名称

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


网页题目:vb点虐 如何获取控件 vbframe控件
链接分享:http://scyingshan.cn/article/ddgiesj.html