添 加 控 件

翻译|其它|编辑:郝浩|2006-08-18 13:52:00.000|阅读 1767 次

概述:

# 界面/图表报表/文档/IDE等千款热门软控件火热销售中 >>

相关内容:

一、程序功能: 当程序运行时,在窗体显示vb.net爱好者欢迎你

二、程序设计: 主要利用了Label控件的各种属性来实现程序功能

三、代码设计:


Public Class Form1

Inherits System.Windows.Forms.Form

'创建一个名Label1的Label控件,设为窗体级变量,方便其他过程调用


Dim Label1 As New Label


#Region " Windows 窗体设计器生成的代码 "

#End Region

'窗体第一次加载时代码

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

With Label1 '使用With...End With语句,可避免多次重写控件名

.Location = New Point(50, 80) '设置Label1相对于窗体左上角的图标,即标明它在窗体的位置

.Size = New Size(200, 80) '设置Label1的宽和高'

.Text = "vb.net爱好者欢迎你" '设置Label1的Text属性,即在窗体显示的名称

.Font = New Font("SIMSUN", 14, FontStyle.Bold) '设置字体为宋体,字号14,粗体

.ForeColor = Drawing.Color.Blue '设置Label1的前景色

End With

Controls.Add(Label1) '将控件加到窗体中

End Sub

'窗体按下左键时代码

Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As _ System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown

Label1.Dispose() '当在窗体按下左键时,清除Label1控件

End Sub

End Class


四、 源代码下载

注:本例是利用添加代码的方式在窗体中添加控件并设置控件的各种属性,如果在设计向窗体添加控件方法 是在左侧的工具箱窗口双击要添加的控件或将选定的控件拖放到窗体中即可,然后可以在右侧的属性窗口中为控件设置相应的属性。


标签:

本站文章除注明转载外,均为本站原创或翻译。欢迎任何形式的转载,但请务必注明出处、不得修改原文相关链接,如果存在内容上的异议请邮件反馈至chenjj@evget.com


为你推荐

  • 推荐视频
  • 推荐活动
  • 推荐产品
  • 推荐文章
  • 慧都慧问
扫码咨询


添加微信 立即咨询

电话咨询

客服热线
023-68661681

TOP