如果要自動換行,設(shè)置label的寬度固定即可。如果手動換行,可以這樣:Label1.Caption = "這是標(biāo)簽" vbCrlf "內(nèi)容換行"
創(chuàng)新互聯(lián)專注為客戶提供全方位的互聯(lián)網(wǎng)綜合服務(wù),包含不限于網(wǎng)站制作、網(wǎng)站設(shè)計、鶴慶網(wǎng)絡(luò)推廣、成都微信小程序、鶴慶網(wǎng)絡(luò)營銷、鶴慶企業(yè)策劃、鶴慶品牌公關(guān)、搜索引擎seo、人物專訪、企業(yè)宣傳片、企業(yè)代運(yùn)營等,從售前售中售后,我們都將竭誠為您服務(wù),您的肯定,是我們最大的嘉獎;創(chuàng)新互聯(lián)為所有大學(xué)生創(chuàng)業(yè)者提供鶴慶建站搭建服務(wù),24小時服務(wù)熱線:028-86922220,官方網(wǎng)址:www.cdcxhl.com
Label1.Text?=?"12時演示:"?+?Now.ToString("yyyy-MM-dd?hh:mm:ss")
Label2.Text?=?"24時演示:"?+?Now.ToString("yyyy-MM-dd?HH:mm:ss")
Label3.Text?=?"UTC時演示:"?+?System.DateTime.UtcNow.ToString("yyyy-MM-dd?HH:mm:ss")
Label4.Text?=?"時間為不補(bǔ)0:"?+?Now.ToString("yyyy-MM-dd?H:m:s")
Label5.Text?=?"時間戳:"?+?CLng(System.DateTime.UtcNow.Subtract(New?Date(1970,?1,?1,?0,?0,?0)).TotalMilliseconds).ToString
Label 控件不可以水平,上下居中
不過可以用 PictureBox 控件做到
拖動一個 PictureBox 控件到工程,并命名為 picTextShow,把 AutoDraw 設(shè)為 True,加上以下代碼就可以實現(xiàn):
Option Explicit Private Sub Form_Load() picTextShow.CurrentX=(picTextShow.ScaleWidth-picTextShow.TextWidth("要顯示的文本"))/2 picTextShow.CurrentY=(picTextShow.ScaleHeight-picTextShow.TextHeight("要顯示的文本"))
picTextShow.Print "要顯示的文本" End Sub
這樣文本就可以在圖片框中間顯示了。
1、將窗口的TransparencyKey屬性設(shè)置成某一種顏色(在顯示時,這種顏色會顯示為透明),如:
Me.TransparencyKey = System.Drawing.Color.Red(可在屬性窗口中指定或通過代碼設(shè)置)
2、將Label的BackColor屬性設(shè)置為與窗口的TransparencyKey屬性相同的顏色,如:
Me.label1.BackColor = System.Drawing.Color.Red(可在屬性窗口中指定或通過代碼設(shè)置)
或
Me.label1.BackColor = Me.TransparencyKey(只能通過代碼設(shè)置)
3、將Label的ForeColor屬性設(shè)置為與窗口的TransparencyKey屬性不相的顏色,如:
Me.label1.ForeColor = System.Drawing.Color.Blue(可在屬性窗口中指定或通過代碼設(shè)置)