新网创想网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
最简单的,就是在上面放一个label,用Timer定时器控件控件这个label的移动
10年积累的成都做网站、成都网站设计经验,可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你,你也不认识我。但先网站制作后付款的网站建设流程,更有滨江免费网站建设让你可以放心的选择与我们合作。
选择Text属性,右边出现一悔首高个向下箭头,里芹好面可以回车换行
如果用代码控制,那么:
Button1.Text = “123”碧尺 vbCrLf "345"
'--------------------
百度VB2010(VB.NET)吧建设发展中,需要你的支持和帮助!!!
快加入我们吧!发表你的疑问,经验,程序,分享..
让我们共同进步!
要么重写这个弯消升控件的 OnPaint 事件,判断 BorderStyle 属性为 FixedSingle 的时候自绘其他颜色。
要么不重写,把 BorderStyle 设为 None,直接在这个控件的 Paint 事件里自绘边埋老桥首框,例如:
Private Sub Label1_Paint(sender As Object, e As PaintEventArgs) Handles Label1.Paint
e.Graphics.DrawRectangle(Pens.Red, New Rectangle(Label1.DisplayRectangle.X, Label1.DisplayRectangle.Y, Label1.DisplayRectangle.Width - 1, Label1.DisplayRectangle.Height - 1))
End Sub
运行效果:
VB.NET中某些控件的字体属性是只读的,所以只可以使用大颂NEW方法\x0d\x0a(例子: Label1.Font = New Font("宋体", 9))\x0d\x0a如果是VB6.0中可以直接使用Lable1.Font.Size=Lable1.Font.Size + 3\x0d\x0a(这里使用的滚乎郑例子是Lable控件,如果你使用的是Command控件直接改一下就顷缺好)