1 >
защитило Sub ручки Me.Load Page_Load (прислужника ByVal как предмет, ByVal e как System.EventArgs) Если не Page.IsPostBack после этого a = ложно 'Img1.ImageUrl = «изображения/triangle4.png» Встреча («abool») = a mySin = новое ClassSin Label1.Text = «бортово x =» & mysin.hyp & «m» Label2.Text = «тэта =» & mysin.angle & «deg» Label3.Text = «находят длину стороны Y.» Label4.Text = «(вокруг ответа» & vbCr & «1 десятичного места в m)» Закончитесь если 'HyperLink1.Text = «. (больше)» 'HyperLink1.NavigateUrl = «yr7.aspx» Class= " ясное " > конца Sub