易截截图软件、单文件、免安装、纯绿色、仅160KB

咨询个VB控件问题，谢谢！ - VB / 控件

我想用VB画一个类似这样的地图（很多不规则图案）
每个图案是独立的（每个图案响应if事件后会变成指定的颜色）
我想咨询下，像这个应该用什么控件来画这地图，谢谢！
没有现成的控件，自己实现吧，不难。
首先实现鼠标绘图，保存时只保存每一个区的边界的坐标数组值（为减少坐标值，同一斜率只取起始和终止点）。
至于块变色，就更简单了，在绘制时使用PathToRegion转换路径为区域形成区域数数组，然后遍历区域数组，使用PtInRegion判断鼠标是否选择了某个区域，最后使用FillRgn改变区域颜色即可。

不定义边界直接处理也可以：
预先准备一张没有名称和城市的图片（白底黑边），从内部一点开始进行封闭区域的着色，这是基本的图形学算法。
偶的思路：
将每块单独生成一个gif图，然后用AniGIF控件代替每块。
也可从鼠标指针处开始执行种子填充算法
帮顶了
Mark
mapx
帮顶。。。。。
用flash呗，还能和vb通信。

太复杂了```
学习！！！！！！！！！
引用
我想用VB画一个类似这样的地图（很多不规则图案）
每个图案是独立的（每个图案响应if事件后会变成指定的颜色）
我想咨询下，像这个应该用什么控件来画这地图，谢谢！


分给错了，应该给1楼的江南春
这个月得点分好难，这20分可能就事关一个名次^o^
引用
引用楼主 myxiqi 的回复:
我想用VB画一个类似这样的地图（很多不规则图案）
每个图案是独立的（每个图案响应if事件后会变成指定的颜色）
我想咨询下，像这个应该用什么控件来画这地图，谢谢！




相关问答：

【急求】VB中使用WScript调用外部命令 - VB / 基础类

在下是vb的新手，想写段程序，在vb中，使用wscript调用一些外部的命令，但是程序执行一直有错误，请各位高手帮忙解答下，谢谢。
代码如下：
VB code:

Private Function getFile_CMD(filename, filepath) As Bo ......

vb的类中使用自定义类型数据的问题 - VB / 基础类


我在类中有一个函数
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......

vb - VB / 基础类

我想把word另存为xml之后，用vb读取这个xml的内容，请问如何实现？
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......

vb读取用word转换成的xml里的数据 - VB / 基础类

Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
  Put #1, , MyRecord ' 读入所有字符到变量中 ......

vb生成EXE - VB / 基础类

form1中有text1-8， 和command1 
text8中为程序代码（生成窗体为form2（已做好））
单击command1后将text2中的代码生成EXE到d:\ 并且text1-7分别对应
产品名 公司名 合法版权 合法商标 文件描述 注释 标题 ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号