.


:




:

































 

 

 

 


Ȼ

( һ)

 

-

29.03.02(261100) , 27.03.01 (221700)

 

: .., ..,

.., ., . . .,

.., ., . . .

 

 

2015

 

004.9(072)

M 61

 

M 61 : . /. .., ..,

.. .: , 2015. 32.

 

 

:

- . .. ( һ)

- . .. ( һ)

 

 

29.03.02 27.03.01 , Visual Basic for Application (VBA) .

. , , - , , , .

 

 

004.9(072)

 

 

.

 

 

.

 

 

. (, ), . :

- ;

;

;

, .

.

 

..
1 ; ; ;
2 ; ;
3 ;
4 ; ;
5 , () ;
6
7 ; ,

:

- , ;

- , ;

- , , , ;

- .

- , . - . .

 

 

 

 

1

 

 

, .

 

 

, . .

(). . () , , , , . ().

. (). . , . , REM.

:

REM 1

X=0.5

. -.

:

;

, ;

, .

VB : . . . 1 . 256 .

: (INTEGER), (LONG), (SINGLE) (DOUBLE). , , .

. :

;

, ;

, .

DIM:

DIM AS [, AS ],...

,

DIM str AS STRING, index AS INTEGER, x AS DOUBLE

SINGLE.

() (.)
Integer 2 - -32768 +32767
Long 4 - -2147483648 2147483647
Single 4 7 -3,40282+38 -1,40129-45 ; 1,40129-45 3,40282+38
Double 8 15 -1,79769+308 -4,94065-324 ; 4,94065-324 1,79769+308

 

VBA , :

< = >

=. , , , =. , , . :

k = 0 - k 0

x = 0.5 - x 0.5

y=SIN(x)^2 - y

z = y - z y

: , , .

   
^ y^3 1
- -x 2
*, / , a*b/2 3
\ 5\2 4
MOD 21 MOD 5=1 5
+, - , a+b-c 6

. . . :

1) ;

2) ;

3) ;

4) ;

5) ;

6) ;

7) ;

8) .

VBA, :

CSng(x) x Single
Val(x) x Double
CStr (x)
Str(x) ,

. (), . .

 

     
ABS(x)
SQR(x) >=0
EXP(x) (2.718282)
LOG(x) >0
SIN(x)
COS(x)
TAN(x)
ATN(x) ( π/2 +π/2)
SGN(x) x, : 1, x>0; 0, x=0; -1, x<0
RND(x) 0 1
INT(x) ,
FIX(x)

Int() Fix() . Int() , Fix() . , 4.5 Int() Fix() 4, -4.5, Int() 5, Fix() -4.

:

1. () , () .

2. , . , .

3. () , () .

4. .

:
:

VBA

Text.

A=VAL(TextBox1.Text) A TextBox1.Text
TextBox2.Text=CStr(Y) TextBox2 Y

:

,

 

 

-

1.4. . a=5, b=3, c=1 z, f, w, y :



<== | ==>
| , , VB A
:


: 2018-10-15; !; : 161 |


:

:

, ,
==> ...

785 - | 793 -


© 2015-2024 lektsii.org - -

: 0.038 .