vb编写一个程序,根据输入的系数求一元二次方程ax2+bx+c=0的根,要求考虑实根、虚根等情况,
如果系数使得方程没有实数根,则弹出一个只有确定按钮的消息框,提示“方程没有实根”,如果有实根则也通过消息框显示.单击“退出”则结束工程.
人气:405 ℃ 时间:2019-09-06 07:53:28
解答
Public Class Form1Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickDim a, b, c, dt, s, s1, s2 As Stringa = Val(TextBox1.Text)b = Val(TextBox2....
推荐
猜你喜欢
- 一个两位数,把它的数字对调所成的两位数之和一定是11的倍数.为什么?如:12+21=33
- 一个数只有两个因数,且这个数的2倍在25和30之间,这个数( ).
- My mother ___ every day and she's very healthy.这个天什么,为什么?
- 欧洲粒子物理研究中心(CERN)为什么要研制大型强子对撞机?
- 翻译句子If a person has a faint line,he or she is more of a thinker than a doer.
- A、B、C三种物质各15g,它们相互化合时,只生成30g新物质D,若再增加10gC,A与C正好完全反应,则
- 弱智型电的问题.
- 5mm的茶色玻璃一个平方有多重?