Label (Popis) ve formuláři VBA

Vložit Label

Karta Vývojář - Visual Basic. Menu Insert - UserForm. Z Toolboxu vložíme Label.

Vlastnosti:

Seznam základních vlastnistí prvku Label (Popis)

• (Name)
• Accelerator
• AutoSize
• BackColor
• BackStyle
• BorderColor
• BorderStyle
• Caption
• ControlTipText
• Enabled
• Font
• ForeColor
• Height
• HelpContextID
• Left
• MouseIcon
• MousePointer
• Picture
• PicturePosition
• SpecialEffect
• TabIndex
• TabStop
• Tag
• TextAlign
• Top
• Visible
• Width
• WordWrap

(Name)

Pojmenování prvku (můžeme změnit). Ve vzorcích se pak budeme na tento prvek odkazovat. V našem příkladě je Name Label1

Accelerator

Nastaví nebo získá přístupovou (zkratkovou klávesu Alt) klávesu daného ovládacího prvku.

  Label1.Accelerator = "C"
  ZkratkovaKlavesa = Label1.Accelerator


Význam u jiných prvků, ale i u Label jde nastavit.

AutoSize

Specifikuje, zda mění objekt automaticky velikost v souladu se svým celým obsahem. Pokud mění tak velký text zvětší objekt.

Hodnota (True False)

  Label1.AutoSize = False
  AutosizeStav = Label1.AutoSize


BackColor

Vrací nebo nastavuje barva pozadí objektu Label.

  Label1.BackColor = RGB(255, 128, 128)
  BarvaPozadi = Label1.BackColor


BackStyle

Vrací nebo nastavuje styl pozadí objektu Label.

fmBackStyleTransparent (0) Pozadí je průhledné.

fmBackStyleOpaque (1) Pozadí je neprůhledné (výchozí nastavení).

  Label1.BackStyle = fmBackStyleTransparent


BorderColor

Vrací nebo nastavuje barvu okrajů.

  Label1.BorderColor = RGB(254, 127, 127)


BorderStyle

Vrací nastavení nebo změní nastavení okrajů.

fmBorderStyleNone - 0 - nemá viditelný okraj

fmBorderStyleSingle - 1 -

  Label1.BorderStyle = fmBorderStyleSingle


Poznámka ignoruje se pokud je vlastnost SpecialEffect = none

Caption

Varcí Text na objektu Label (Popis) nebo ho nastaví.

  Label1.Caption = "muj text"
  AktualniTextVLabel = Label1.Caption


ControlTipText

Bublinková nápověda. Zobrazí se při najetí nad objekt

  Label1.ControlTipText = "Muj druhý text"
  ControlTipText = Label1.ControlTipText


Enabled

Určuje, zda se může ovládací prvek stát aktivním a odpovídat na události, generované uživatelem. Nebo specifikuje jak je tato vlastnost nastavena.

  Label1.Enabled = True
  EnabledNastaveni = Label1.Enabled


Font

Vrací nastavení fontu nebo nastaví změnu fontu.

  Label1.Font.Italic = True
  Label1.Font.Size = 22
  Label1.Font.Bold = True
  Label1.Font = "Times New Roman"
  velikostFontu = Label1.Font.Size
  typFontu = Label1.Font
  FontJeKurziva = Label1.Font.Italic


ForeColor

Varcí nastavení nebo definuje barvu popředí objektu tj. v našem případě jakou barvu bude mít text.

  Label1.ForeColor = RGB(255, 255, 0)


Height

Vrací výšku objektu nebo jeho výšku nastaví.

  Label1.Height = 20
  Vyska = Label1.Height


HelpContextID

  


Left

Umístění objektu od levého okraje. Nebo zjištění jak je umístěn objekt.

  umistenileft = Label1.Left
  Label1.Left = 12


MouseIcon

Přiřazení ikony por objekt

  Label1.MouseIcon = LoadPicture("c:\mojeIkonka.ico")


MousePointer

Vrací typ ukazatele myši, nebo nastaví ukazatel myši. Hodnoty jsou:

• fmMousePointerDefault 0 - standartní ukazatel
• fmMousePointerArrow 1
• fmMousePointerCross 2
• fmMousePointerIBeam 3
• fmMousePointerSizeNESW 6
• fmMousePointerSizeNS 7
• fmMousePointerSizeNWSE 8
• fmMousePointerSizeWE 9
• fmMousePointerUpArrow 10
• fmMousePointerHourglass 11
• fmMousePointerNoDrop 12
• fmMousePointerAppStarting 13
• fmMousePointerHelp 14
• fmMousePointerSizeAll 15
• fmMousePointerCustom 99

  


Picture

Nastavení obrázek na pozadí.

  Label1.Picture = LoadPicture("c:\mujObrazek.bmp")


PicturePosition

Pozice obrázku relativně k titulku.

• fmPicturePositionLeftTop - 0 - vlevo od titulku zarovnání s horním okrajem
• fmPicturePositionLeftCenter - 1 -
• fmPicturePositionLeftBottom - 2 -
• fmPicturePositionRightTop - 3 -
• fmPicturePositionRightCenter - 4 -
• fmPicturePositionRightBottom - 5 -
• fmPicturePositionAboveLeft - 6 -
• fmPicturePositionAboveCenter - 7 -
• fmPicturePositionAboveRight - 8 -
• fmPicturePositionBelowLeft - 9 -
• fmPicturePositionBelowCenter - 10 -
• fmPicturePositionBelowRight - 11 -
• fmPicturePositionCenter - 12 -

  Label1.PicturePosition = fmPicturePositionLeftTop


SpecialEffect

Vrací nebo určuje speciální efekty objektu.

• fmSpecialEffectFlat 0
• fmSpecialEffectRaised 1
• fmSpecialEffectSunken 2
• fmSpecialEffectEtched 3
• fmSpecialEffectBump 6

  Label1.SpecialEffect = fmSpecialEffectFlat
  Label1.SpecialEffect = 6
   StavSpecialEfekt =Label1.SpecialEffect


TabIndex

Vrací nebo udává pozici jednoho objektu v pořadí karet formuláře.

  Label1.TabIndex = 0


TabStop

Nabývá hodnot TRUE, FALSE.

  


Tag

Doplňkové informace o objektu.

  


TextAlign

Zaroznání textu. Vpravo, vlevo, na střed. Nabývá hodnot:

• fmTextAlignLeft - 1 - Zarovnani vlevo
• fmTextAlignCenter - 2 - Zarovnání na střed
• fmTextAlignRight - 3 - Zarovnání vpravo

  Label1.TextAlign = fmTextAlignCenter
  Label1.TextAlign = 1
  jakZarovnano = Label1.TextAlign


Top

Umístění objektu od horní okraje. Nebo zjištění jak je umístěn objekt.

  umistenitop = Label1.Top
  Label1.Top = 12


Visible

Nastavuje viditelnost objektu, nebo zobrazuje jaký stav má objekt. Nabývá hodnot TRUE, FALSE.

  Label1.Visible = False
  Label1.Visible = True


Width

Vrací šířku objektu nebo jeho výšku nastaví.

  Label1.Width = 110
  Sirka = Label1.Width


WordWrap

Určuje, zda se má obsah ovládacího prvku automaticky zalomit na konci řádku, nebo vrací jeho hodnotu. Nabývá hodnot TRUE, FALSE.

True - Text se zalamuje (výchozí nastavení). False - Text se nezalamuje.

  StavWordWarp = Label1.WordWrap


Ke stažení

Hotový příklad ke stažení: Formulář Label (popis) - ukázky použití

Závěr

Popis vlastnosti objektu Label máme za sebou :)

Článek byl aktualizován: 19.09.2020 11:06

Pavel Lasák - autor webu

Microsoft Office (Word, Excel, Google tabulky, PowerPoint) se věnuji od roku 2000 (od dubna roku 2004 na této doméně) - V roce 2017 jsem od Microsoft získal prestižní ocenění MVP (zatím 8x za sebou). Své vědomosti a zkušenosti dávám k dispozici i on-line ve videích pro SEDUO. Ve firmách školím a konzultuji, učím na MUNI. Tento web již tvořím přes 20 let (o Excel píší přes 25). Zdarma je zde přes 1.500 návodu, tipů a triků, včetně přes 350 různých šablon, sešitů a přes 70 taháků v pdf.