vb点虐 控件圆角 vbnet tabcontrol

vb的按钮怎样做成圆角的

先制作按钮样式图片，把按钮style属性设为1，picture属性设为制作好的图片。

让客户满意是我们工作的目标，不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户，将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴，公司提供的服务项目有：主机域名、网页空间、营销软件、网站建设、富平网站维护、网站推广。

也可以用shape加label控件代替command控件。

如何在vb点虐 中创建圆角窗体

如下所示：

Private Sub Type(ByVal sender As Control, ByVal p_1 As Integer, ByVal p_2 As Double)

Dim oPath As New Drawing2D.GraphicsPath()

oPath.AddClosedCurve(New Point() {New Point(0, sender.Height / p_1), New Point(sender.Width / p_1, 0), New Point(sender.Width - sender.Width / p_1, 0), New Point(sender.Width, sender.Height / p_1), New Point(sender.Width, sender.Height - sender.Height / p_1), New Point(sender.Width - sender.Width / p_1, sender.Height), _

New Point(sender.Width / p_1, sender.Height), New Point(0, sender.Height - sender.Height / p_1)}, CSng(p_2))

sender.Region = New Region(oPath)

End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Type(Me, 20, 0.1)

End Sub

VB圆角按钮按钮怎么做?

设置按钮的属性Style为1,且将按钮的属性Picture选你想加载的图片或设置按钮的属性BackColor的颜色,都可作出漂亮的按钮.如要改变按钮形状则较复杂.可使用2个Shape控件和1个Label控件完成（仿3D效果），3控件的颜色设成一样。如需加载图片则Label控件改用PictureBox控件，具体代码：

Private Sub Form_Load()

Shape2.Visible = False

End Sub

Private Sub Label1_Click()

Form2.Show

End Sub

Private Sub Label1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

Shape2.Visible = True

End Sub

Private Sub Label1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

Shape2.Visible = False

End Sub

VB添加的按钮怎么样才能变成圆角的

标准控件是不能变的，但你可以灵活一点，用Image控件来代替Command控件，你加载个圆角的图片就是。

个人不建议用ActiveX控件，用了ActiveX控件到别的机子上运行就要安装。一个软件要追求绿色，很多时候很多人一看到软件要安装就不想用了。

本文标题：vb点虐 控件圆角 vbnet tabcontrol
URL分享：http://shouzuofang.com/article/ddjsceg.html