www.wfdy.net > vB绘制图像

vB绘制图像

这种绘图问题来找我嘛……(分好寒酸。。) 传说中的GDI+隆重出场-… GDI+是最快的。可以超过VB任何绘图语句 1.建立一个模块,复制下面代码: Option Explicit Public Type GdiplusStartupInput GdiplusVersion As Long DebugEventCallback As Lon...

1、先定义坐标系,即XY轴。 2、根据具体需要,调用内部函数,或自定义函数,绘制函数图像。 3、代码供参考: Me.AutoRedraw = True Me.Width = 8000: Me.Height = 6000 Me.Scale (-10, 2)-(10, -2) Line (0, -2)-(0, 2) Line (-20, 0)-(20, 0) F...

Private Const pi = 3.14159 Private a Private Sub Form_Load() Me.AutoRedraw = True '首先清除me内的图形 Me.Cls 'Scale方法设定用户坐标系,坐标原点在me中心 Me.ScaleMode = 0 Me.ScaleMode = 3 Me.Scale (-10, 10)-(10, -10) '设置绘线宽...

数学中常用的就是描点法;通过X计算出Y,输出该点,然后点与点之间可以连接直线;VB可以在Form或者PictureBox里绘制点和直线;命令格式如下: 1,绘制点; 对象名.Pset (x,y) 2,绘制直线; 对象名.Line (x1,y1) - (x2,y2) 说明:(x,y)、(x1,y1)...

可以!以下代码在PictureBox中画出1个矩形和一个圆 Option ExplicitPrivate Sub Command1_Click() '画一个矩形 Picture1.Line (10, 10)-(100, 60), vbRed, BEnd SubPrivate Sub Command2_Click() '画一个圆:圆心在(80, 50),半径为50 Picture1....

第一步,新建一个工程,新建一个Form1,在上面添加一个picture控件和一个command控件,然后选中此控件,右击"复制",在窗体空白处右击"粘贴",在弹出的对话框中选择"是",创建了一个Command控件数组,复制,使窗体上总共出现7个Command控件,然后复制代码: ...

Image控件有stretch属性,是自动拉伸图片,适应控件大校 Picture控件有AutoSize属性,是自动适应图片大校 如果是其它的控件,没有自然属性的话,只能手动编程。 窗体改变大小时候触发Resize事件,如果要图片框和窗体大小一样,则需要在窗体的Res...

Option Explicit '变量要先定义后使用 'FunY(X) 函数,给定 X 计算 FunY(X) 的值 Private Function FunY(X#) As Double Dim Y# '计算 y = x - 0.09340062 * sin(x) FunY = X - 0.09340062 * Sin(X) End Function Private Sub 画线() '绘制方程的...

Private Sub Command1_Click() a = Text1.Text b = Text2.Text c = Text3.Text Dim x As Double, y As Double Picture1.ScaleMode = 3 Picture1.Scale (-150, 150)-(150, -150) Picture1.CurrentX = 1 Picture1.CurrentY = -1 For x = -140 To 1...

1.通过自定义坐标系, 自定义的园半径. 画圆. 2. 根据图形分成4组. 每组都有点集合和颜色.通过标注的角度值把各个点的坐标计算出来. 3. 分别连线即可.

网站地图

All rights reserved Powered by www.wfdy.net

copyright ©right 2010-2021。
www.wfdy.net内容来自网络,如有侵犯请联系客服。zhit325@qq.com