VB.NET.
, , , , , .
,
1) VB.
2) : , , , .
3) , . .
4) .
5) .
6) . .
7) .
8) .
1) VB ( 4.2).
2) .4.2.8-1.
3) .
4) ( ) : , ( Option Strict On ). , , .. , .
5) .
6) , .
7) .
8) .
4.2.8-1
| x | y | |||
| 1) | 
| i=t
j= 
| 3,59 | 17,53 |
| 2) | 
| m=d
n= 
| 1,674 | -0,533 |
| 3) | 
| k=h
n= 
| 32,01 | -0,4917 |
| 4) | 
| i=c
j= 
| 2,123 | -1,89 |
| 5) | 
| i=b
j= 
| 8,402 | -0,22226 |
| 6) | 
| m=d
n= 
| 1,002 | -0,5321 |
| 7) | 
| m=z
n= 
| 12,003 | -5,408 |
| 8) | 
| k=d
l= 
| 1,3802 | -1,9 |
| 9) | 
| i=f
j= 
| 12,678 | 6,9 |
| 10) | 
| i=a
j= 
| 82,578 | 1,4517 |
| 11) | 
| m = d n = [d] | -4.62 | -0.32 |
| 12) | 
| i = f j = [f] | 5.305, | -0.084 |
| 13) | 
| k = h n = [h] | 0.68 | -0.848 |
| 14) | 
| i =a j = [a] | 14.2.43 | -0.2 |
| 15) | 
| k = i = [] | -1.462 | 0.577 |
| 16) | 
| i = b j = [b] | 0.501 | 1.7 |
| 17) | 
| i = d j = [d] | -0.45 | 24.3 |
| 18) | 
| i = f j = [f] | 8.8 | 5.8 |
| 19) | 
| k = h l = [h] | 0.6485 | 3.9 |
| 20) | 
| m = a n = [a] | 125.04 | 5.55 |
| 21) | 
| k = b l = [b] | 7.302 | 5.782 |
| 22) | 
| i = c j = [c] | -3.356 | 0.049 |
| 23) | 
| m = a n = [a] | 1.892 | -0.61 |
| 24) | 
| m = a n = [a] | 45.892 | 0.601 |
| k = c l = [c] | 0.54321 | ||
| 26) | 
| m =d n = [d] | 104.2.654 | |
| 27) | 
| m =f n = [f] | 29.999 | 165.091 |
| 28) | 
| k = g I = [g] | -9.20 | -5,892 |
| 29) | 
| m = z n = [z] | 4.51 | -0.25 |
| 30) | 
| k =b l = [b] | 224.2.1 |
|
|
|
1) .
2) , , , .
3) .
4) : VB, .
5) :
5.1) ;
5.2) ;
5.3) ;
5.4) ;
5.5) .
6) .
7) .
1) :
VB.NET. .
.
2) , , , :
., 1405, 13.
3) :
2.1: ; 2.2 ( Option Strict On ):
4) :
, x, y Double, k, m, n, z, p , k
Integer, m, n, z Double, p Single. m=[z] ,
, Fix(), n Int(). ,
s 1 s2 Strin g, s1=z s2=p.
:
z = (0.002 Exp(x^y)) / ((100 y)*(x + 2));
k = z; m = Fix(z).
5) :
5.1) :
. , 2.1 2.2, .4.2. , , .
TextBox , , . Label . Button .
|
|
|
, ,
.4.2.8-1.
. 4.2.8-1. 2.1 2.2
5.2) :
. 4.2.8-2 .
4.2.8-2
| Form1 | Name | Form1 | |
| Text | |||
| Label1 | Text | : | |
| ForeColor | Red | ||
| ImageAlign | MiddleCenter | ||
| Label2 | Text | ||
| ForeColor | YellowGreen | ||
| ImageAlign | MiddleCenter | ||
| Label3 | Text | = | |
| Label4 | Text | Y= | |
| Label5 | Text | ||
| Label6 | Text | z | |
| Label7 | Text | ||
| Label8 | Text | (Fix(z)) | |
| Label9 | Text | Int(z) | |
| Label10 | Text | p | |
| Label11 | Text | z+p | |
| Label12 | Text | s1+s2 | |
| TextBox1 | Name | TextBox1 | |
| TextBox2 | Name | TextBox2 | |
| TextBox3 | Name | TextBox3 | |
| TextBox4 | Name | TextBox4 | |
| TextBox5 | Name | TextBox5 | |
| TextBox6 | Name | TextBox6 | |
| TextBox7 | Name | TextBox7 | |
| TextBox8 | Name | TextBox8 | |
| TextBox9 | Name | TextBox9 | |
| Button2 | Name | Button2 | |
| Text | |||
| Button1 | Name | Button1 | |
| Text | |||
| Button1 Button2 | Font | Arial, , 12 |
5.3) :
. 4.2.8-2.
. 4.2.8-2.
5.4) :
Exp(),
Math.
, Fix() Int(), (-: ), , . , + - .
, .
( 2.1)
. 4.2.8-3.
| Imports System.Math ' Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs)_ Handles Button1.Click Dim , y, z, m, n As Double, p As Single, k As Integer Dim s1, s2 As String = TextBox1.Text y = TextBox4.2.Text z = (0.002 - Exp( ^ y)) / ((100 - y) * ( + 2)) p = z k = z m = Fix(z) n = Int(z) s1 = z s2 = p TextBox3.Text = z TextBox4.Text = k TextBox5.Text = m TextBox6.Text = n TextBox7.Text = p TextBox8.Text = z + p TextBox9.Text = s1 + s2 End Sub Private Sub Button2_Click(sender As Object, e As EventArgs) _ Handles Button4.2.Click End End Sub End Class |
. 4.2.8-3. 2.1
5.5) :
2.2 . // / Windows Forms. 2.2.
, 2.2 . Form1.vb 2.1 .
|
|
|
(. 4.2.8-4) .
. 4.2.8-4. VS
(. 4.2.8-5) .
. 4.2.8 -5. VS
