____________..
_____ ___________ 2012 .
㳿
0305
6.030503 Գ
2012 .
㳿 , 2010.
.. , .
.. , .-..,
__ __ _____2012.
. _____________.. , ...,
.
__ ___ ____________ 2012 .
________________ .. , ...,
-
..
_______
̲
.
.. 4
.. 5
.. 6
.. 11
.. 12
.. 27
.. 40
.. 41
.. 44
, ᒺ. : .
. 㳿, , . .
. 㳿 :
1.
2.
3.
4. .
|
|
|
5. .
6. .
7. .
3 4 . 7- , . , , .
10 . , :
| /. | |||
| 1. | . . MS Word. -. | ||
| MS Access | MS Access. . MS Word. | ||
| 3. | Excel . | MS Excel MS Word. | |
| 4. | VBA | VBA. MS Word. | |
| 5. | - | , . MS Word. | |
| 10 |
Roz_ ( ).
:
MS Word ( );
MS Word ().doc -;
MS Access ().dbf .
MS Excel (). xls , -.
. 3008-95 . . .
, :
- , , ;
- : , ; , , 1-1,5 ;
- , ; , ; , ;
- , ;
- , : ' ; : ;
- : 25 50, 25-50, 25...50;
- : 10000-150000, 10-150000;
|
|
|
- : 20-25 .;
- , , , , , , ' ;
- +, -, %, ;
- 8, 10, 2,4; , , , , , ;
- : 1, 75; 2,00 1,75:2;
- : , , ;
4 (210 297 ). 1.5 , 14.
4- :
- 20 ;
- 10 ;
- 20;
- 20 .
. ( ), .
(), : . , : 1.1, 1. 2. : , , , , ( 14, ) . . ( 14, ) . ³ 2 . . ³ - 4 . , .
.
, : (2.1.) ( ).
, , , , . . ʳ , , , . .
ֲ Ͳ
__________________________
:____________________________________
__________________
______________________
(, ., )
_____________________
_____________________
_____________________
2011
(, , -, )
| Max. , | ϳ , ( ) | |||||
| 1 | ||||||
| 2 | ||||||
| 3 | ||||||
| 4 | ||||||
| 5 | ||||||
| , |
:
.
|
|
|
1. .
2. MS Word.
3. -.
. MS Access.
1. MS Access.
2.
3. .
4. MS Word.
. Excel .
1. MS Excel
2.
3.
4. MS Word.
IV. VBA
1. VBA.
2. MS Word.
V. -
1. , .
2. MS Word. 2
ϳ 쳺 . , . :
, , .
ᒺ, .
.
, .
ϒ , .
, . , , .
ᒺ, . , , . : ( , ), ( ). , -. , 䳿.
.
| () | |||
| - | 
| , | |
| () | 䳿 | |
| г () | 
| ||
| - | 
| ||
| ǒ |  
|
: , , . , , . :
;
;
.
MS Access.
() , , . - , , .
|
|
|
. , , . :
/
˳
( , 64 000 )
OLE ( , ᒺ- , , ).
, - : , , . :
( 
). : , , .
ᒺ, . : , , , , . , . . . : , , , . , , , . - . :
. . ( , , ). . : , , , , . ( ). , . , , , .
MS Excel
() , , , , .
. , - . .
, :
(< >;<1>;<2>).
ij , - , ᑺ.
xcel .
| 1. | ó | |
| 2. | ˳ | |
| 3. | ó | |
| 4. | ||
| 5. | ||
| 6. | ||
| 7. | ʳ | |
| 8. | ||
| 9. | ||
| 10. | ||
| 11. | ||
| 12. | ||
| 13. | ||
| 14. | ϳ |
- . - . , ' , . , " " "" "". -. .
|
|
|
Գ. , , . ֳ , , . Գ -.
Excel ( ). .
. , . ( ). , . . .
VBA
. - , , .
, , Excel Visual Basic (VBA) . VBA Microsoft Excel, , VBA , . Visual Basic , , .
, , . , .
, 䳿 ( ), .
- , . Visual Basic .
Visual Basic.
| 1. | String | 0-1032 - . |
| 2. | Integer | -32768 +32767. |
| 3. | Long Integer | ֳ , Integer -2 147 483 648 +2 147483647. |
| 4. | Double Precision | 16 300 . |
| 5. | Currency | , 9 223 372 036 854 775 808 9 223 372 036 854 775 807 |
| 6. | Date | 1 100 31 9999 . |
| 7. | Byte | 0 255. |
| 8. | Boolean | : True False. |
| 9. | Variant | - , , . |
| 10. | Object | , ᑺ,, . |
| 11. | Single | -3 402 823 -38 3 402 823 +38 |
| 12. | Decimal | 28 . |
:
1. Dim (dimension );
:
Dim [ As ]
Dim Name As String .
Dim Name As String*35 35 .
2. ;
;
| Integer | % | |
| Long | & | |
| Single | ! | |
| Double | # | |
| Currency | @ | |
| String | $ |
: Dim Name$
3. ;
, .
: Price@=523
@ , Currency
:
| Visual Basic | Visual Basic | ||
| sin x | Sin (x) | Rnd (x) | |
| cos x | os (x) | Str (x) | |
| tg x | Tan (x) | Val (x) | |
| ½ x ½ | Abs (x) | Round (x [, a]) | |
| arctg x | Atn (x) | Fix (x) | |
| ln x | Log (x) | 䒺 | Int (x) |
| ex | Exp (x) | logax | Log(x)/Log(a) |
| Sqr (x) | Sgn (x) |
:
| ij | ||
| Ucase (str) | Ucase (Ivan) IVAN | |
| Lcase (str) | Lcase (IVAN) ivan | |
| Len (str) | Len (Ivanova) | |
| Right (str, int) | Right (Ivanova, 2) va | |
| Left (str, int) | Left (Ivanova, 4) Ivan | |
| Mid (str, int1, int2) | Mid (Ivanova, 2, 3) | |
| String (int, str) | String (4, $) $$$$ | |
| Asc (str) | ACSII- | Asc (R) |
| Chr (int) | ACSII- | Chr (114) r |
InputBox .
: = InputBox ( =, ,, 400, 400)
MessageBox , ( ). , ʔ .
: MsgBox , 1,
. .
IF : . :
IF < > Then < 1 > [ Else < 2 > ]
:
IF < 1 > Then
< 1 >
[ ElseIf < 2 > Then
< 2 > ]
[ Else < n > ]
End If
For (). :
For x=x0 To xn[ Step h]
< >
[ Exit For ]
Next x
x ; x0 xn ; h . h=1, Step . Exit For . , .
While. :
While < >
< >
Wend
, , . , , . Exit While.
Do ( ). :
Do
< >
[ Exit Do ]
Loop While / Until < >
2. Do While / Until < >
< >
[ Exit Do ]
Loop
< > - , : , ; While , ; Until - , ; Exit Do - . : Do While... Loop - , , , , ().
Function (). , 䳿 .
:
Function < > ([ ]) [As < > ]
< >
[ Exit Function ].
End Function
:
- ;
, ;
- ,
Exit Function .
.
Function TotalTax(Cost)
StateTax=Cost*0.05 5%
CityTax= Cost*0.015 ̳ 1,5 %
TotalTax= StateTax + CityTax
End Function
Function ' , . Function () . : ᒺ
:
Private Sub Command_Click()
Dim ֳ As Currency
Dim ʳ As Integer
Dim As Single
ֳ=Val(Text1.Text)
ʳ= Val(Text2.Text)
= ֳ*ʳ
Text3.Text=
End Sub
Excel
-
, , , (). , .
:
;
;
;
.
, , . () . 3 %. . . .
, , , . ᒺ . , , , . , , , , . , .
, , : , , . ( - ).
Գ
, ( ). , :
;
;
.
, ᒺ .
, , , . . , .
, , . , , , , .
, , . , . Excel
- () .
Excel
(),
