是用(-b+-spr(b^-4ac))/2a算的吧那就这样：dimresultassingleresult=spr(b^-4ac)ifresult=0thenprint"x1=x2="&-b/2aelseifint(result)=resultthenprint"x1="&(-b-spr(b^-4ac))/2aprint"x2="&(-b+spr(b^4ac))/2a'结果直接输出elseprint"x1="&"("&-b&"+"&result&"^(0.5))/"&2aprint"x2="&"("&-b&"-"&result&"^(0.5))/"&2a'^(0.5)表示根号endif我初中刚毕业，VB也很菜，以上方法没试验过，不知道行不行当然，"^(0.5)"可以换作根号字符会好一点，道理一样的但是我不知道怎么打上去。。。就是这样了吧，给点分啊
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024