vb做折线图
工具/原料
VB6.0及以上
方法/步骤
2、问题：怎么利用VB6.0制作函数图像，请高手帮忙解决一下问题水貔藻疽，万分感谢！！！！浏览次数：44次悬赏分：0|离问题结束袖紫囫挡还有9天10小时|提问者：小媛爱爱|检举问题补充：在vb中，可以再窗体或PicTureBox上（其他不知道）绘图，可以通过修改DrawWidth控制宽度。比如Line，需要定位两个点的坐标，用法是Line(第一个点的X坐标,第一个点的Y坐标)-(第二个点的X坐标,第二个点的Y坐标)，便可以在窗体上画一条线。（纯手写原创：仰望_星空_愁思就是我），还有pset（画点），用法是pset(点的X坐标,点的Y坐标)，还有Circle，知道里搜“vbCircle”。等等等等…………反正，只要用上这些函数，再加以控制，就可以画出图了。（我快累趴了）追问你看看这个题目能否用vb帮忙编写一下啊，杆件在拉伸与压缩变形下的强度及刚度计算再次补充问题：输入:1.几何尺寸输入（杆件长度）坐标（0，L）或（0，L1,L2,….）2.截面参数输入（形状，大小，如为阶梯状杆件，则给出各截面面积A1,A2,….）3.材料常数输入（E,γ,[σ]）4,载荷输入（集中力Fi大小及位置、方向）输出：1轴力图2交合结果（强度条件满足与否）我的回答：分思路和代码两步说：思路[就是伪代码]：读取数据[不知道你的数据来源和方式]--画点连线[坐标点，点色，大小；折线，线色，粗细]代码：不知道数据来源、多少组数据、数据大小范围、不知道是静态的还是动态的图表？无法写代码。能不能把“不确定表达式的多个函数”给你看下。........张志晨：您的问题==我的课题......愿携手共进..........我的回答2：假设要绘制轴力图： 需要知道有几个点在图上：这些点的X值决定拆线的横向间距，决定X轴单位长。这些点的Y值最大多少最小多少，决定Y轴的单位长。 你不知道VB编写，正如我不明白你的专业原理一样。 你给我点坐标，我就能画同图象。但我不会取得点！！再次补充问题： 我设计的力学求解器和计算器差不多，当用户任意输入数值进行加法运算时，如何利用数组去储存用户的数值，然后当单击计算时，系统会再次调用数组进行计算，最后得出结果。所以如何用一个文本框和一个按钮去实现呢？？？最好有代码。非常感谢你帮我解答这么多，再次的感谢！！！完事以后会把我的所有分追加给你！！！谢谢我的回答3：文本框中输入值对地：用英语逗号隔开，如 25,40；表示x=25，y=40。两点按钮（不如回车省事），这个点与上一个点的直线便上屏了。as3代码：importflash.display.Graphics;varlinesize:Number=1;//线粗varstartY:Number=300-0;box.graphics.lineStyle(linesize,0xff0000);box.graphics.moveTo(0,startY);inNum_txt.addEventListener(KeyboardEvent.KEY_DOWN,run);functionrun(e){if(e.keyCode==13){varn=[];n=inNum_txt.text.split(",");inNum_txt.text="";box.graphics.lineTo(Number(n[0]),300-Number(n[1]));}}上面是用flash做的。网友追问： 高手不好意思，我没学过C语言，只学了vb，请高手用vb给小的写一下代码可以吗？再就是我想在文本框输入多个数据，比如输入以后单击一个按钮后再输入一个，再单击按钮再输入一个.........我想把从文本框中输入的多个数据存到一个数组中，再用一个按钮去调用数组画线，现在积分一百多，不管结果如何都会加给高手！！！请问高手能否给个qq号，可以方便以后联系。我是一个学生以后有需帮助的，尽管开口！！！我的回答：代码很简单了。我通过QQ给你。效果图：
3、奉献代码：PrivateSubCommand1_Click()Dimp'定义数组p=Split(Text1.Text,",")'把文本框里的字符转换为数组DimlengAsIntegerleng=UBound(p)'数组长度Dimi,x,xx,y,yy'画线的起目点坐标Fori=0Toleng-3Step2'leng-3 是保证数组不越界，另外本应减去2，'就是说最后一个点是封闭的，不能再画下去了。'减去3是为避免出现输入奇数个数据的错误，'比如9个数，第9个数只是点x的值，没有y值，略去'两个点画一条线段，所以要step2；x=p(i)xx=p(i+1)y=p(i+2)yy=p(i+3)Picture1.Line(x,xx)-(y,yy)'画线NextEndSub