论坛 › Mathematica论坛 › mathematica里面有没有文本框啊

quqixun 发表于 2012-3-7 20:13

mathematica里面有没有文本框啊

就是像vc，vs里得textbox那样的，可以自由输入文本的东西

陈殿邦 发表于 2012-3-8 13:22

请问下面这个程序什么地方有问题，谢谢！！！发不了贴，借用一下，{:soso_e112:}
BeamElement :=
  Module[{},
   y = E1*I1/(L^3)*{{12, 6*L, -12, 6*L}, {6*L, 4*L*L, -6*L,
       2*L*L}, {-12, -6*L, 12, -6*L}, {6*L, 2*L*L, -6*L, 4*L*L}}; y];
BeamAssemble:=Module[{f},
f={p1,p2};
  for[j=1,j<=2,j++,for[k=1,k<=2,k++,
    GlobalK[],2f[]]]+=m[];
    GlobalK[]-1,2f[]]]+=m[];
    GlobalK[],2f[]-1]]+=m[];
    GlobalK[]-1,2f[]-1]]+=m[];]];
  GlobalK]
k1 = BeamElement;
k2 = BeamElement;
Print["k1=", k1];
Print["k2=", k2];
GlobalK = 0 IdentityMatrix;
BeamAssemble;
Print["GlobalK=", MatrixForm];
BeamAssemble;
Print["GlobalK=", MatrixForm];

quqixun 发表于 2012-3-8 20:15

陈殿邦 发表于 2012-3-8 13:22 static/image/common/back.gif
请问下面这个程序什么地方有问题，谢谢！！！发不了贴，借用一下，
BeamElement  ...

BeamElement,应该都有下划线吧

查看完整版本: mathematica里面有没有文本框啊