众所周知，一元二次方程的求根公式，即Vietatheorem韦达定理，都很熟悉水貔藻疽，即x=(-b±_/b2-4ac)/2a。在此，详细阐述下如何在ACCESS中设计一个韦达定理求根公式的数据库。
工具/原料
ACCESS中Vietatheorem韦达定理求根公式数据库设计
x=(-b±_/b2-4ac)/2a
delta=b2-4ac，不得小于0
delta保留了根号
sqrt=Round(sqr(delta),0)
DoUntilcou*cou>delta
ForEachctlInMe.Controls
SelectCaseTypeName(ctl)
方法/步骤
1、如下是韦达定理求根公式的ACCESS主窗体视图，a,b,c三个基本参数自定义输入，结果为x1,x2，以及Calculate计算与Reset重置两个按钮图标；
2、对于求根公式，想必都清楚一个注意点，即delta=b闸拊福律2-4ac，不得小于0。假如令a=1,b=1,c=吭稿荔徊1，则delta=b2-4ac=1*1-4*1*1=-3，小于0了，点击Calculate按钮图标，弹出错误信息提示框“Pleasebenotifieddeltaisless thanzero!”，终止计算，重新输入参数；
3、令a=1,b=6,c=1，则delta=b2-4ac=6*6-4*1*1=补朱锚卦32，大于0了，是可以计算根值鹚兢尖睁的。点击Calculate按钮图标，结果为x1=(-6+4_/2)/2*1,x2=(-6-4_/2)/2*1，注意这里的值，并没有直接使用ACCESS的求平方根函数sqr得出无理数的几位小数值，而是保留了根号，与手工计算一致，这是通过VBA代码编程实现的；
4、再令a=2,b=8,c=2，则delta=b2-4ac=8*8-4*2*2=48，大于0了，垠捎吨稍同样是可以计算根值的。点击Ca造婷用痃lculate按钮图标，结果为x1=(-6+4_/2)/2*1,x2=(-6-4_/2)/2*1，保留了根号；
5、相应VBA代码1st如下；
6、相应VBA代码2nd如下；
7、相应VBA代码3rd如下；
