.usingSystem;usingusingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Linq;usingSystem.Text;usingnamespace灵敏度分析尝试publicpartialclassForm1 :FormpublicForm1()InitializeComponent();publicbool jiansuo(double x, double y)bool cunzai =false ; ;for(inti = 0; i y.Length; i+)if(yi = x)cunzai =true;returncunzai;publicdoubleqiumax(List array)double max=-9999;for(inti = 0; i max)max = arrayi;returnmax;publicdoubleqiumin(List array)double min = 9999;for(inti = 0; i array.Count; i+)if(arrayi 0)r();intm, n;m =int.Parse(textBox1production.Text);/m=3n =int.Parse(textBox2resource.Text);/n=3for( inti = 1; i = m + n; i+)dataGridView5.Columns.Add( , C+ i.ToString();for( inti = 1; i = m + n; i+)dataGridView4.Columns.Add( ,X+ i.ToString();dataGridView4.Rows.Add(n + 1);dataGridView3.Columns.Add( , C);dataGridView1.Columns.Add( ,Cb );dataGridView1.Columns.Add( ,Xb( 下标 ) );dataGridView1.Columns.Add( ,B-1b );dataGridView1.Rows.Add(n);dataGridView2.Columns.Add( ,C );dataGridView2.Rows.Add(1);.privatevoidsplitContainer3_SplitterMoved(objectsender,SplitterEventArgse)privatevoidsplitContainer6_Panel2_Paint(objectsender,PaintEventArgse)privatevoidbutton1 产品 _Click( objectsender,EventArgse)double Xb =new double dataGridView1.Rows.Count;/ 用于存放 Xb的下标；for(inti = 0; i dataGridView1.Rows.Count; i+)if(dataGridView1.Rowsi.Cells1.Value !=null)Xbi =double .Parse(dataGridView1.Rowsi.Cells1.Value.ToString();double , A =/A 矩阵存放后面的for( intj+)if(dataGridView4.Rowsi.Cellsj.Value !=null)Ai, j =double .Parse(dataGridView4.Rowsi.Cellsj.Value.ToString();intpro=0;if(textBox3输入产品 .Text!= )pro =int .Parse(textBox3输入产品 .Text);if(pro int .Parse(textBox1production.Text)+int .Parse(textBox2resource .Text)MessageBox .Show( 输入的数据必须大于 0小于产品总数 +资源数 !, 请重新输入！ );elseif(jiansuo(pro, Xb).List zuo =new List();List you =new List();doublezuomax = 0, youmin = 0;for( intj = 0; j Xb.Length; j+)if (pro = Xbj)/pro 是基变量，且第 i 列是非基变量for ( int i = 0;i 0)shang=AA.GetLength(0)- 1,i / Aj, i;zuo.Add(Math .Round(shang,2);/ 非基变量的检验数除以 Cj （j 就是 pro ）对应的变量 Xj 那一行if (Aj, i 0)zuomax = qiumax(zuo);if(you.Count 0)youmin = qiumin(you);if(zuo.Count = 0 & you.Count = 0)textBox1产品结果 .Text = ;if(zuo.Count 0 & you.Count = 0)textBox1产品结果 .Text =产品+ pro + 的变化量 = + Convert .ToString(zuomax);if(zuo.Count = 0 & you.Count 0)textBox1产品结果 .Text = 产品 + pro + 的变化量 0 & you.Count 0)textBox1产品结果 .Text = 产品 + pro + 的变化.范围为 +Convert .ToString(zuomax) + 到 +Convert .ToString(youmin);if(jiansuo(pro, Xb)=false)inthangbiao=dataGridView4.Rows .Count-1;if(dataGridView4.Rowshangbiao.Cellspro-1.Value !=null)doublejieguo =-( double .P