vb.net如何加控制条 vbnet自定义控件

vb.net中如何添加滚动条，像在VB6中那样的。不是窗体本身的滚动条

建立滚动条的方法如下vb.net如何加控制条：

（1）将鼠标移到ToolBox内的WinForm标签页的HscrollBar控件上vb.net如何加控制条，单击鼠标左键。

（2）将指针移至窗体中适当的位置vb.net如何加控制条，按住鼠标左键并拖动鼠标将HscrollBar控件调整到合适的大小放开左键。

（3）同样，再在Form上设置一个VscrollBar控件。

相关问答

Q1: VB .NET如何在计算过程中加入进度条？

VB.Net中提供vb.net如何加控制条了ProgressBar控件，用于显示进度条

vb.net如何加控制条我建议你不要用进度条显示剩余时间而是显示执行进度

这样比较好控制

设置ProgressBar的Minimum和Maximum属性为循环的起始和终止数值

然后在代码的循环体中计算当前循环的进度，然后设置进度条的Value属性，

将进度显示在进度条上

比如,简单的例子:

Dim Progress As Integer

ProgressBar1.Minimum = Min

ProgressBar1.Maximum = Max

For i As Integer = Min To Max

'执行计算.......

Progress = i \ Max '计算进度

ProgressBar1.Value = Progress '显示进度

My.Application.DoEvents() '使用Doevents防止窗体假死使进度条看不到，但是会严重降低运行速度

Next

这里的优化技巧是，可以设置为每隔N次循环才更新进度条

If Not Progress Mod N Then ProgressBar1.Value = Progress

不然进度条的更新也许比计算的速度还要慢很多

Q2: VB.NET 用二维数组的方式动态加控制 例如在窗体上动态添加GroupBox，然后再在GroupBox里动态添加控件

下面这段代码完成，在窗体上用语句添加2个 GroupBox控件，且在每个GroupBox控件中添加4个 RadioButton 控件。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim i As Integer

'添加2个GroupBox

Dim MyGroupBox(2) As GroupBox

For i = 1 To 2

'将一个GroupBox控件加入到Form上

MyGroupBox(i) = New GroupBox

Me.Controls.Add(MyGroupBox(i))

'设置该GroupBox控件的属性

MyGroupBox(i).Height = 240

MyGroupBox(i).Width = 600

MyGroupBox(i).Top = (i - 1) * (240 + 20) + 20

MyGroupBox(i).Left = 20

'修改新加入控件的Text值

MyGroupBox(i).Text = "GroupBox" CStr(i)

Next

'每个GroupBox中添加4个单选按钮

Dim MyRadioButton1(4) As RadioButton

Dim MyRadioButton2(4) As RadioButton

For i = 1 To 4

MyRadioButton1(i) = New RadioButton

Me.Controls.Add(MyRadioButton1(i))

MyRadioButton1(i).Parent = MyGroupBox(1)

'设置该GroupBox控件的属性

MyRadioButton1(i).Height = 20

MyRadioButton1(i).Width = 120

MyRadioButton1(i).Top = (i - 1) * (20 + 20) + 40

MyRadioButton1(i).Left = 20

'修改新加入控件的Text值

MyRadioButton1(i).Text = "RadioButton1_" CStr(i)

Next

For i = 1 To 4

MyRadioButton2(i) = New RadioButton

Me.Controls.Add(MyRadioButton2(i))

MyRadioButton2(i).Parent = MyGroupBox(2)

'设置该GroupBox控件的属性

MyRadioButton2(i).Height = 20

MyRadioButton2(i).Width = 120

MyRadioButton2(i).Top = (i - 1) * (20 + 20) + 40

MyRadioButton2(i).Left = 20

'修改新加入控件的Text值

MyRadioButton2(i).Text = "RadioButton2_" CStr(i)

Next

End Sub

vb.net如何加控制条的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet自定义控件、vb.net如何加控制条的信息别忘了在本站进行查找喔。