$: 1) Form1.Hide; 2) Form1.Show; 3) Printer.Print “y= “;y.Text
' ': , A ( - ), : ! . '! : ': , A - . & B ! ! ! ! % ':B . " ': , TextBox, -! . # ! !'!, A : ! !– Text1, Text2, Text3. $ # B -': .
+ Visual Basic B % : ! ! ! ': . % – ': , ': '! , - # '! ': . $ - B B Visual Basic 6 , .#. Forms Controls. Forms – # B , Controls –# ! . & # B, .
' 3 |
* , |
VB, |
|
, |
: |
|
|
1) : ( % – |
|
, A ! # # |
- |
. + B ! B # A % .
2): % & –!, A : ! # .
8.3 ' " *
J ! # :
1.* # , ! # - !, A % ( !, - , # !, . .).
2.* .
3.# ': ( %!) – % ! -.
$ ! -. @ !, -% # % ! - . % , -( ), ! # ':- . Š ': ( ),% . $ '! ! !, A . $ % B# % ! B A ': ,
– .
% % ': - , % Delete
$ 8.1. – * ! !:
= 200 + *
!: J % !! ! ! # , B ! . Š , ! !, , - % ! ( , ). - ! ' ,, , – - : ! % ! .
1.J ! ( 8.5), ! B !' .
2.B Visual Basic.
3.+ Visual Basic '! ! B ! -Form1. \ A ! # ,( ) , ! # .
362
$B ! 8.1.
1 |
2 |
|
3 |
|
|
|
4). + Properties, A :, |
|
|
Label3 Caption : '- |
|
|
. |
|
|
3. |
* ! - |
1).J ! |
|
! |
|
(TextBox – ) ! - |
|
! - |
! Text1. $! - |
|
. |
! ( |
|
|
|
|
8.5). Š # , B- |
|
|
% Text2 Text3. |
Properties; |
|
|
2).< ! % |
|
|
, A :, |
|
|
Text1; Name, |
|
|
Text1 ( ). |
|
|
|
3). $ |
|
|
Text % # Text1.(+ - |
|
|
B ). |
|
|
|
< # Text2 '! , |
|
|
Text3 – ( )* Text |
|
|
Text2 Text3. |
|
|
|
|
4. |
* ! - |
1).J ! |
|
|
|
(CommandButton – ) |
|
|
! ! - |
|
|
, # ! B ! |
|
|
. |
Properties; |
|
|
2). < ! % |
|
|
, A :, |
|
|
CommandButton1; |
|
|
Caption, CommandButton1 '- |
|
|
,; Name |
|
|
|
CommandButton1 Rachet. |
|
|
|
3). + Properties, A :, |
|
|
CommandButton2; Caption - |
|
|
,, Name Vixod. |
|
|
|
|
|
|
* – ': B % , A' , !B # # ! : % . " % ( ) # ': , !
! . " .
+ , !.
$% # ( % & .
8 : ! = 2 –% ! .frm.
8 : ! = - % ! .vbp.
, = :
$ File Save Project '! (G$ $ *) OK '! (G-$ $ *) OK.
8.4 ' * *
$ # ! ! ! % ' , # - B ! . " ! « !» (Click) #- : ! ! – % & -.
$! : ! (Code Window), A : ! ! % -': . $ ! ! , # ! # . " ! -Visual Basic.
8.4.1 9
< : ! , , B .
J , # , A: ! -! # ! ; ! ! -# : ! B ! ! .
+!:
! ! !
– ^, * , / , \ – ! ! # - , +, – ;
|
! – < , > , = , >= , <= , <> ; |
|
! – And, Or, Not, Xor . |
$% – '! . @ !B : ! ! ( + ), A!: : .
J :
“* ” + “ ” + “ ” = * . @ ! Visual-Basic 8.2.
" ! 8.2. – "
Π|
K |
&- |
|
q , |
n/n |
|
. |
|
|
1 |
Integer |
% |
# -32768 +32768, 2 |
2 |
Single precision |
! |
# |
# #- |
|
|
|
, 4 ( : ! #- |
|
|
|
! ) |
3 |
Long Integer |
& |
, 4 |
4 |
Double precision |
# |
# |
# #- |
|
|
|
, 8 |
5 |
String |
$ |
! 65535 . % |
|
|
|
B |
6 |
Currency |
@ |
# |
(15 . # |
|
|
|
4 # , 8 ) |
7 |
Variant |
|
, ! ! . - |
|
|
|
% !, # ! % . |
+ , A : , B ( ) . & %- ! # -! !:
– Const,
– Dim. ) Const :
[Global] Const < ' > = = [,< ' > = = ]... 1 $: const Pi = 3.1415
const Max% = 250
const Clovo$ = “ ”
" B , A ! , - !. # B ! -! ! .
) Dim :
Dim < ' 3>[([ ,])] [As[New] type][, < ' 3>[([ ])][As[New]type]...
@ :
As type – # : (Integer, Long,...) # ': . J :
Dim a As Integer, Dim Temper As Single,
Dim d, b, rakurc – # ! Variant,
Dim FIO <s String – -! B -
,
Dim Street <s String*75 – ! B(75 – - ).
New – : ! ! ! -': , ! Form1.
' # : B -:
Dim A(8,3);
Dim A(0 To 8, 0 To 3) Dim A(8,0 To 3) Dim A(-4 To 10)
( # – 60.
* ! % # B– . ' % !.
1 + # !: {} –# , [ ] – B , < > – # !.
@ ! % ! ( & : ! -(General), A # # : ! - ! A : ! % .
J : General Option Explicit
Dim X As Integer Dim I,Y
\ A ! # , #- ! B : Variant. D # , A #- : ! B , A % A .
J % : %. ) :
|
J : |
< > = = |
|
# ! B ! # - |
|
Y = 0 |
|
Z = (x + 7) / 2 |
: ! # |
|
|
|
8.4.2 ^ – , |
|
; % & |
: ! # # – - |
!, # ! ( ), ( ). +- ! : ! - # ! ! % Enter; ! %, , # OK . . $ -! B ( ), A% ! # .
3 & B , , .: !, , : ! # # -! , # ! .
@ ! Print. * :
[ ' ]Print [{Spc(n),Tab(n)}][ = ][{;I,}] ,
:
' – (Printer);
Spc(n) Tab(n) – n ! # # # ;
= – , A : ! ;
; , – : B ! ! # 14 .
J :
Printer.Print “y = “;y.Text
@ ! #- – Format.
* :
Format[$] (expression [,fmt]),
: $ – ,
expression – # B !, frm – : ! B !:
0 – : !, , 000000 – # % 6 , ! A % 6 , !.
# – : # .
. – : ! ! , , ####.##.
% – # , B ! %- : ! 100%.
, – B B ! 1000.
H – # # . $ – “ “.
: – # .
/ – .
$ B - ! : ! % . J , -
0 % & & : ! -Val.
* :
Val ( = ) – .
J :
+ ! 5 ( 5 : ! ! ). @ ! # # ! ! # .
Val(a.Text) = 5
0 % & & : ! -Str.
* :
Str ( ) – =
J : |
y.Text = Str(S) + “ ” |
$ 8.2 – |
@ ! , 8.1, |
. |
!:
1). G$ $ * :
$ File Open Project '!.
J '! ! . + ! ! :
View Project Explorer , A !,Project1 (= ) ( Forms ( #Form1.
2). @ # ' , '! ! -(Code), ! :
, Y :, (Object) – !,
, Y :, (Procedure) – - .
Rachet, – -Click. : ! , A # , -– # ! Y ( 8.6).
