文件名称:VB在窗体上显示坐标系.rar
文件大小:2KB
文件格式:RAR
更新时间:2022-07-30 03:08:31
VB源码-其它源码
VB在窗体上显示坐标系, Private Sub Command1_Click() Cls '清除窗体 Form1.ForeColor = RGB(255, 0, 0) '设置颜色 Form1.FontBold = True '加粗 Line (0, 0)-(3000, 0) '水平方向画直线 Line (0, 0)-(0, 2500) '垂直方向上画直线 CurrentX = 0 '设置坐标 CurrentY = 0 Print "原点" '在新坐标位置上输出 CurrentX = 2800 '设置新坐标 CurrentY = 100 Print "X轴正向" '在坐标位置上输出 CurrentX = 100 '设置新坐标 CurrentY = 2400 Print "Y轴正向" '在新坐标位置上输出 End Sub
【文件预览】:
srcfans.com
----coordinate()
--------Form1.frm(1KB)
--------MSSCCPRJ.SCC(332B)
--------E299.vbw(50B)
--------E299.vbp(617B)