И коммуникаций республики узбекистан

МИНИСТЕРСТВО ПО РАЗВИТИЮ ИНФОРМАЦИОННЫХ ТЕХНОЛОГИЙ

И КОММУНИКАЦИЙ РЕСПУБЛИКИ УЗБЕКИСТАН

ТАШКЕНТСКИЙ УНИВЕРСИТЕТ ИНФОРМАЦИОННЫХ

ТЕХНОЛОГИЙ ИМЕНИ АЛ-ХОРАЗМИЙ

Программирование 2

Выполнил:Машарипов Камрон
Проверила:ДинараНаримановна
Группа:206-L3

Public Class Form1

7. 
   
8. 
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
   
9. 
   Dim a As Integer
   
10. 
    Dim b As Integer
    
11. 
    Dim difference As Integer
    
12. 
    
13. 
    a = Val(TextBox1.Text)
    
14. 
    b = Val(TextBox2.Text)
    
15. 
    
16. 
    ' compute the difference between variable a and variable b
    
17. 
    difference = (a - b)
    
18. 
    
19. 
    TextBox3.Text = difference
    
20. 
    End Sub
    
21. 
    
22. 
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    
23. 
    TextBox1.Text = ""
    
24. 
    TextBox2.Text = ""
    
25. 
    TextBox3.Text = ""
    
26. 
    TextBox1.Focus()
    
27. 
    End Sub
    
28. 
    
29. 
    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
    
30. 
    End
    
31. 
    End Sub
    
32. 
    End Class
    
33. 
    
34. 
    VISUAL STUDIODA ISHLASHI :
    
35. 
    
36. 
    
    
37. 
    
    
38.