关于labelvb.net的信息

vb.net如何使用控件数组,希望可以用label为例vb.net和vb6.0不同,无法直接使用控件数组 。不过可以通过其他方式变通一下 。
比如现在有10个label,要将这10个label的text属性统一设置为“这是第X个标签”(X为1-10) 。
1.建立10个label,名称分别为label1、label2、label3 。。label10
2.代码:
For i = 1 To 10
Me.FindControl("label"i).Text = "这是第"i“个标签”
Next i
关键点是Me.FindControl()的方法,在代码中Me.FindControl("label1").text与label1.text是一样的 。
vb.net中如何实现将label背景变透明,但字体显示出来1、将窗口的TransparencyKey属性设置成某一种颜色(在显示时labelvb.net,这种颜色会显示为透明)labelvb.net,如:
Me.TransparencyKey = System.Drawing.Color.Red(可在属性窗口中指定或通过代码设置)
2、将Label的BackColor属性设置为与窗口的TransparencyKey属性相同的颜色labelvb.net,如:
Me.label1.BackColor = System.Drawing.Color.Red(可在属性窗口中指定或通过代码设置)

Me.label1.BackColor = Me.TransparencyKey(只能通过代码设置)
3、将Label的ForeColor属性设置为与窗口的TransparencyKey属性不相的颜色 , 如:
Me.label1.ForeColor = System.Drawing.Color.Blue(可在属性窗口中指定或通过代码设置)
VB.NET中label显示的文字怎么居中?Label 控件不可以水平 , 上下居中
不过可以用 PictureBox 控件做到
拖动一个 PictureBox 控件到工程,并命名为 picTextShow , 把 AutoDraw 设为 True,加上以下代码就可以实现:
Option Explicit Private Sub Form_Load() picTextShow.CurrentX=(picTextShow.ScaleWidth-picTextShow.TextWidth("要显示的文本"))/2 picTextShow.CurrentY=(picTextShow.ScaleHeight-picTextShow.TextHeight("要显示的文本"))
picTextShow.Print "要显示的文本" End Sub
这样文本就可以在图片框中间显示了 。
vb.net 如何重绘Label控件?新建一个Winform,在和Form1平行的位置粘贴如下代码
Public Class MyLabelInherits LabelProtected Overrides Sub OnPaint(e As PaintEventArgs)e.Graphics.DrawEllipse(New Pen(Color.Red), New Rectangle(2, 2, 10, 10))MyBase.OnPaint(e)End Sub End Class
运行,停掉,在工具箱找到MyLabel,拖动就可以看到效果 。这只是最基本的重写 , 要模仿QQ还需要其他技术以及美工 。
asp的详细教程废话不多说 , 开始我们第一天的学习:学习目的:调试出安装环境我要申明一点,操作系统就用2000,如果说要学习一个网络语言还不肯多装一个操作系统的话,那我看也不要学习了 。先到网上下载一个MDAC(要是2.7以上的版本才行),然后安装,安装以后或许会重新启动一次 。然后再下载一个.NET FRAMEWORK SDK , 安装以后会在控制面板里面的管理工具里面多两个东西,这个不用理睬他 , 我们要使用的还是原来的INTERNET服务管理器 。打开它按照ASP教程里面的调试方法建立一个目录,建立一个EXAMPLE1.ASPX,然后用记事本打开这个文件在里面输入script language="c#" runat="server"
void Page_Load()
{
Response.Write("Hello World!");
}
/script-------------------script language="vb" runat="server"
sub page_load()
response.write("Hello World!")
end sub
/script 然后用本地访问,查看结果:十天学会ASP.net之第二天 一、定义变量:string strExample; 字符串("aaa")
char chrExample; 字符('a')
bool blnExample; Bool型(true/false)
【关于labelvb.net的信息】DataTime datExample; 日期型("09/19/2002")
int intExample; 整数(32位有符号整数)
double dblExample; 浮点数(64位双精度浮点数)二、各种运算:= 赋值运算

推荐阅读