7
һ
:
: - Visual Basic for Application,
. , , .
( ) .
:
, ;
, , .
( , ).
. , , .
Visual Basic For Next, :
For = To Step
Next
, . , - .
For Next, , Next. . , , Next. , . , .
Step , 1 . , , :
For I = A To B Step C
( )
Next I
I ; A ; B ; C .
<B, >0 ( ); >B, <0 ( ). =1, Step For , For I = A To B.
|
|
Visual Basic :
Sub prog() | |
Dim a, b, S As Integer , a, b, S Integer | ( 1) |
InputBox | ( ). |
CInt | Integer |
CSng | Single |
For To Step Next | |
MsgBox | ( ). |
CStr | String |
End Sub |
1. S 1 n 1.
2. n. n 1*2*3*4**n; , 5! = 1*2*3*4*5.
3. S=1 + 1/2 + 1/3 +1/4 + 1/5 +...............+1/n.
4. 0 n..
5. 1 n
1. Visual Basic for Application.
2. -.
3. , .
4. .
Visual Basic
. MS Excel, MS Excel .
1, .
Visual Basic:
MS Excel / 1 / / .
Visual Basic: RUN F5
-
Visual Basic for Application
1. S 1 n 1,
( n ).
: S=1+2+3+4+....+n
:
S =0
For I = 1 To nStep 1
S=S+I
Next I