dereceden

VISUAL BASIC / 2. Derece Denklem Çözümü Private Sub Command1_Click(Index As Integer) Dim a, b, c, delta, kok1, kok2, ozeldurum, koklerarasindakibaginti As Double a = Val(Text1.Text) b = Val(Text2.Text) c = Val(Text3.Text) delta = Val(Text4.Text) Select Case Index Case 0 delta = (b * b) -...