.
Name | |
Caption | , |
AutoSize | : True ( , , Caption) False ( ) |
Visible | : True ( ) False ( ) |
Enabled | : True ( ) False ( ) |
Height Width | ( ) |
Left Top | , |
ControlTipText | , . CommandButton1 : CommandButton1.ControlTipText = " " |
BackColor, ForeColor BorderColor | , |
BackStyle | |
BorderStyle | . : - fmBorderStyleSingle ( ) - fmBorderStyleNone ( ) |
SpecialEffect | . BorderStyle , , . BorderStyle , |
Picture ( ) | . , : CommandButtonI.Picture = _ LoadPicture(":\my doc\Kpy.bmp") LoadPicture() . |
Picture ( ) | , . picture LoadPicture("") |
Tag | , . . Tag , , . Tag . Tag , . Private Sub UserForm Initialize () Dim As Object CommandButton1.Tag = "" CommandButton2. Tag = "" CommandButton3. Tag = "" TextBox1.Tag = "" For Each In Controls If .Tag="" Then .Visible = True Else .Visible = False End If Next End Sub |
, BackColor, Forecolor BorderColor, . (Properties), , , .
|
|
,
vbBlack | 00 | |
vbRed | OxFF | |
vbGreen | OxFFOO | |
vbYellow | OxFFFF | |
vbBlue | OxFFOOOO | |
vbMagenta | OxFFOOFF | |
vbCyan | OxFFFFOO | |
vbWhite | OxFFFFFF |
, VBA Name (. . ) . , Name CommandButton1, CommandButton2 . . , , . , CommandButton1 , CommandButton1 . , . Windows , . : , . , . .
TextBox | txt | txtAcount |
Label | lbl | lblInform |
CommandButton | cmd | cmdOK |
ListBox | lst | lstNames |
ComboBox | cbo | cboFirms |
ScrollBar | scr | scrDown |
SpinButton | spn | spnUp |
OptionButton | opt | optChoice |
CheckBox | chk | chkSex |
ToggleButton | Tgl | TglSwitch |
Frame | fra | fraStatus |
Image | img | imgBall |
RefEdit | ref | ref Fun |
MultiPage | mit | rnltPages |
TabStrip | tab | tabTwoTabs |
UserForm | frm | frmGame |