VB如何在PictureBox批量画点/矩形(指定坐标),并可放大缩小 15
VB6.0如何在PictureBox或其他控件指定坐标画点/矩形,并可放大缩小,如图片显示:为有一软件开启某一文本文档,文档包含xy坐标和另一个指定元素的数值(如:30,...
VB6.0如何在PictureBox或其他控件指定坐标画点/矩形,并可放大缩小,如图片显示:为有一软件开启某一文本文档,文档包含xy坐标和另一个指定元素的数值(如:30,40,1:30,40为坐标,1为对应的颜色),显示效果如图片显示,我就是想实现这样的功能~而且数据量有点大~大概50W行的数据,坐标分布X:-400~400;Y:-400~400。。。恳求高手指点!不甚感激!如有相关案例感谢分享至邮箱xwy183568686@163.com
展开
1个回答
展开全部
Dim A, S As String
Dim FreeNum As Integer
FreeNum = FreeFile
open "D:/date.txt" for input as #FreeNum
Do Until eof(FreeNum)
Line Input #FreeNum, A
解释
Loop
Close FreeNum
在上面的 解释 部分用字符串截取函数截取相应的数据放到字符串中,再用val函数转化为数字型的赋值给变量,再直接写picture.circle或其他方法。
上面的代码不能直接用,需要修改之后才能使用。
望采纳。
更多追问追答
追问
关键在于怎么画图……读取文档那没问题
追答
比如说你获取到一个字符串:“565,445,5,6,”
再获取每个逗号的位置的值,
再用mid函数截取字符串。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询