首先,你已经完成的步骤是:
①新建一个用户控件[注意,用户控件(UserControl)不是自定义控件(CustomControl)]
并将其 Dock 属性设置为 Fill
然后,你需要做的是动态增减控件.
但在此处,你可以直接增删控件.
具体实现如下:
将其 AutoScroll 属性设置为 True,即自动显示滚动条,
并设置其 FlowDirection 属性(例如设置为 TopDown)
这样就省去了手动调整 RadioButton 位置的麻烦
(十分简洁,注释除外):
''' summary
''' 创建一个新的 RadioButton.
''' /summary
Private Function CreateRadio() As RadioButton
Dim NewRadio As New RadioButton
components.Add(NewRadio)
'components 字段由控件设计器自动创建,
'此代码目的是使控件在销毁(Dispose)时能自动销毁 RadioButton
'详情参见 RadioList.Designer.vb
NewRadio.Parent = RadioPanel
'设置容器
AddHandler NewRadio.CheckedChanged, AddressOf RadioButtons_CheckedChanged
'设置事件处理程序
Return NewRadio
End Function
''' 移除已存在的 RadioButton.
Private Sub RemoveRadio(ByVal dest As RadioButton)
components.Remove(dest)
dest.Dispose()
End Sub
'无中生有的 RadioButton 的事件处理程序
Private Sub RadioButtons_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
'在此处设置选中项的属性,通过 sender 来确定不同的 OptionButton
'你可以通过将 OptionButton 放在一个列表,
'如 List(Of OptionButton) 中来像数组一样维护选项的次序
'注意,此处需要判断 sender 的 Checked 属性是否为 True
'因为 Changed 是"改变",而不是"选中"
'例如:
If DirectCast(sender, RadioButton).Checked Then
SelectedIndex = ...
End If
n年前用VB做过几个不同形式的工控系统.
①.)VB很适合作上位机的用户界面(UI)
①.、vb.net ?完全符合面向对象的编程语言抽象、封装、继承的四大特性,而vb不支持继承.
vb中只是On Error.....goto和On Errer Resume Next ,这些错误称为非结构化异常处理.而在vb.net中采用的结构化异常处理机制,try...catch....finally控制.
vb.net 允许创建不同类型的应用程序,例如,创建ASP.NET和ASP.NET Web 服务应用程序,还允许创建控制台应用程序和作为桌面服务运行的应用程序.但是vb 只能创建Windows窗体.
扩展资料
Visual Basic(简称VB)是Microsoft公司开发的一种通用的基于对象的程序设计语言,为结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言.是一种可用于微软自家产品开发的语言.
"Visual" 指的是开发图形用户界面 (GUI) 的方法——不需编写大量代码去描述界面元素的外观和位置,而只要把预先建立的对象add到屏幕上的一点即可.
"Basic"指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 语言,是一种在计算技术发展历史上应用得最为广泛的语言.
Visual Basic源自于BASIC编程语言.VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建Active?X控件,用于高效生成类型安全和面向对象的应用程序 .
参考资料:百度百科-Visual Basic
Private WithEvents NewTextBox As TextBox
'通过使用WithEvents关键字声明一个对象变量为新的命令按钮
Private Sub Command1_Click()
If NewTextBox Is Nothing Then
Set NewTextBox = Controls.Add("VB.TextBox", "cmdNew", Form1)
NewTextBox.Visible = True
Exit Sub
Else
Controls.Remove NewTextBox
Set NewTextBox = Nothing
以上就是土嘎嘎小编为大家整理的vb.net控件工控相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!