判断一元二次方程  ax-bx＋c＝0是否有解  如无解则输出无解  两解相同输出两解相同  否则输出两解不通

你就判断b^2-4ac的值就可以了，如果大于0，有两个解，如果等于0有唯一解，小于0则无解

不懂啊，为什么是b^2-4ac？能不能给编一下？谢谢了

这是一元一次方程，还是一元二次方程？
看LZ的意思是后者，初中数学有讲，翻翻书吧。
前者不用我说了吧。

Private Sub Command1_Click()
a = Val(text1)
b = Val(text2)
c = Val(text3)
If b ^ 2 - 4 * a * c > 0 Then
   .....
ElseIf b ^ 2 - 4 * a * c = 0 Then
   ......
Else
   .......
End If
End Sub

楼主ax-bx＋c＝0这是一元一次方程吧。