vb解二次函数代码问题!代码如下Private Sub Command1_Click()Dim a As Single,b As Single,c As SingleDim n As Single,m As Singlea = Val(Text1.Text)b = Val(Text2.Text)c = Val(Text3.Text)If b ^ 2 - 4 * a * c < 0 ThenLabel3.Caption = "无解"Els

来源:学生作业帮助网 编辑:作业帮 时间:2024/07/20 09:44:19
xSAOA+vkKiԘăIGlYtҴxlEj-mADbƠE#Z!gӓZ6M677oexG5~Þ^Yo|nKr<)~Cjζ3En@ZҦs2"z Μ 쳘$&2m<*GUP‡2h܇fA;(L@C4s5>"ق987x +/)A$pn X"C|s$>!_jd\̢a~C^&PSP-,%/|3!<2.G(-tf`jvd,(햯jlR~K?WDqA4Vɏ1m= |>[C3 yFu߰VbīUH )*q-Vb2oׁW^w2;^啕~tpuX`IOPnbuLݪh"X}X__{ ~Z,%NO: