.


:




:

































 

 

 

 





 

:

19

 

3-151- ______________ () . . ( ..)
     
... ______________ () .. ( ..)

 

 

2016

:

1. 3

1.1. 3

1.2. 3

2. 4

2.1. 4

2.2. 8

3. 12

4. 16

5. 16

6. ()17

6.1. 17

6.2. 18

 

 

, , , , , ().

, , (goto jump), . , "-".

, , . , , , , , , . , , , , , , .

, , .

 

Visual Basic 6.0. .

 

: . Visual Basic 6.0 ().

Visual Basic 6.0 : ( If) ( Select Case).

If , .

, .

:

, (Example > 0).

(Check = True).

.

, , .

If: .

If , . : , , If. , , .

 

If < > Then < 1> End If

 

. 1

1 If.

 

If , , , . Else. , !

 

If < > Then

< 1>

Else

< 2>

End If

. 2

2 If.

 

, , If - . If.

 

If < 1> Then

< 1>

Else

If < 2> Then

< 2>

Else

< 3>

End If

End If

. 3

3 If.

. Select Case. . Case .

:

.

.

(1, 3, 5, 7, 9).

(1 To 9).

(Is > 0).

 

 

Select Case <>

Case < 1>

< 1>

...

Case < N>

< N>

Case Else

<>

End Select

. 4

4 Select Case.

 





:


: 2017-03-12; !; : 558 |


:

:

, , .
==> ...

1768 - | 1668 -


© 2015-2024 lektsii.org - -

: 0.016 .