13518219792
Label（标签控件）是图形控件. Lbl X
在左云等地区，都构建了全面的区域性战略布局，加强发展的系统性、市场前瞻性、产品创新能力，以专注、极致的服务理念，为客户提供成都网站制作、成都做网站 网站设计制作按需设计,公司网站建设,企业网站建设,成都品牌网站建设,全网营销推广,成都外贸网站建设,左云网站建设费用合理。
TextBox（文本框）显示文本或输入文本. Txt X
CommandButton（命令按钮）作为按钮进行使用. Cmd X
OptionButton（单选控件）单选 Opt X
CheckBox（复选控件）复选 Chk X
ListBox（列表框控件）进行多个项目的选择 Lst X
ComboBox（组合框控件）组合其他控件 Cbo X
HscrollBar（横向滚动条） Hsb X
VscrollBar（竖向滚动条） Vsb X
DriveListBox（磁盘列表框） Drive1
DirListBox（文件夹列表框） Dir1
FileListBox（文件列表框） File1
Form（窗体） Frm X
PictureBox（图形框控件）显示图片 Pic X
与使用System.Windows.Forms命名空间中的控件的用法没有区别。
首先添加引用。
其次导入(Imports)命名空间。
接着就可以使用了：
1、要使用用户控件的实例成员，就先创建一个用户控件的实例，再通过实例名.实例成员名访问；
2、要使用用户控件的共享（Shared）成员，通过用户控件类名.共享成员名访问。
如果你问的是怎样创建自己的用户控件类：
1、继承类System.Windows.Forms.UserControl；
2、继承任何一个已经存在的控件类（只要这个控件类不是NotInheritable的就行）。
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.net中，每个事件都对应有两个参数：sender 和 e 。提取 sender 参数信息就可以获取控件名称。如果不理解其中机制，你直接 msgbox(sender) 将其输出，就能查看其中玄机。
获取控件名称代码：CType(sender, Control).Name。
