.


:




:

































 

 

 

 


. Visual Basic




Visual Basic

  .. 1. ⅅ  
  .. 2. ⅅ  
  .. 3. SELECT CASE......  
  .. 4. ...  
  .. 5. ...  
  .. 6. 셅.  
  .. 7. ⅅ  
  .. 8. ⅅ  
  .. 9. 󅅅  
  .. 10. 녅  
  .. 11. 酅.  
  ..12. 腅...  
  .. 13. 腅.  
  .. 14. ..  

 

1

˲Ͳ Ѳ

1.

.

2.

2.1. .

2.2. , .

. Visual Basic

1. Visual Basic. ϳ Visual Basic ' - , . Standardd exe.

2. Visual Basic:

) ;

) ;

) ;

) (Properties);

) .

3. , "Hello world".

. - .

' ( Caption) Command1. "Hello world". Caption. , , ' , "Hello world". Command1 . Print, .

Private Sub Command1_Click()

Print "hello world"

End Sub

, Start, - [ F5 ]. Stop Visual Basic.

4. . . . , '.

Private Sub Command1_Click()

Command1.Caption = "visual basic"

End Sub

Private Sub Command1_Click()

Command1.Move 120, 250

End Sub

.

VB

 

Integer ֳ
Long Integer
Single
Double precision
String
Boolean
Date
Variant
Currency

 

. Command1 . , 1.

, Static .

Private Sub Command1_Click()

Static a As Integer

Dim b As Integer

a = a + 1

b = b + 1

Print a

Print b

End Sub

: ϳ .

Private Sub Command1_Click()

Dim a As Integer

a = Val(Text1.Text)

a1 = a \ 100

Print " ="; a1

a2 = (a - a1 * 100) \ 10

Print " = "; a2

a3 = a Mod 10

Print " = "; a3

s = a1 + a2 + a3

Print " = "; s

End Sub

 

VB.

 

ij
Abs(n) n
Atn(n) n
Cos(n) n
Exp(n) n
Rnd(n) 0 1  
Sin(n)   n
Sqr(n) n
Str(n)
Tan(n) n
Val(n)
Log(n) . Log(n)/Log(10)

 

.

1. VB?

2. ᒺ ?

3. ?

.

1. : Label. , Label .

2. , .

3.

s(t) = at + bt2 - ct3/3,

s(t) - ; t - .

.

4. , S, A.

5. , .

6. =1

.

7. =2

.

8.

.

9. , , .

10. .

11. t, h, g, V0.

 


2





:


: 2016-07-29; !; : 338 |


:

:

, .
==> ...

1762 - | 1585 -


© 2015-2024 lektsii.org - -

: 0.016 .