: 6 (Label), 4 (TextBox), (Image) (CommandButton). Toolbox.
Label 
.
ٸ Label Toolbox. , . , . .
. . - , , .
, , . 5 .
, . TextBox ( 
).
, 4 . .
: . CommandButton 
Image 
.
, ().
, , Name. (, , )
Caption , , .
. 2.1 (Name) Caption .
| . 2.1 | ||
| (Name) | Caption | |
| Label1 | 1 | |
| Label2 | 2 | S = 2 * ( + )*H |
| Label3 | (): | |
| Label4 | .4 | . (): |
| Label5 | (): | |
| Label6 | (S): |
, ( Font ForeColor), ( BackColor). , .
( !) , .
|
|
|
( ). , . , .
(Name) : , , , .
Caption. Text. , (, - ). , , ( ). Text.
- , . . (Name) , Caption : , .
(Image) Picture.
, - . ; , Paint. ( )
, .
4. , 1- .
5. 2- .
6. 3- .
2.3.
: . :
1. : , , .
2. S = 2*( + )*
3. : S 4- .
( ). , Code View , .
( ) : ( ) ( ).
, - .
_Click. Private Sub, End Sub; () , Visual Basic .
( ).
Private Sub _Click
= Vl(.t)
= Vl(.t)
= Vl(.Text)
S = 2 * ( + ) *
.Text = Str(S)
End Sub
( ) . = . * + . .Text Text . ( , .)
|
|
|
val() , , Str(X) , .
, Visual Basic ( ), c 
.
7. , 1- .
8. 2-
9. 3-
10. 4- , . S :
S = Sqr(P * ( ) * ( ) * ( )), = ( + + )/2
( : Sqr(X) X; X/Y Y.)
2.4. :
, ,
, . (, , ) Visual Basic . , ! .
