VB6围棋：窗体画线和画圆的应用

xjnzhidao

于 2015-08-30 16:11:48 发布

阅读量2.3k

点赞数

分类专栏： vb 6.0 文章标签： vb6.0 围棋-五子棋

本文链接：https://blog.csdn.net/xjnzhidao/article/details/48105761

版权

该博客介绍了如何使用VB6.0进行窗体的动态重绘，特别讲解了在拉伸窗体时，如何保持围棋棋盘和棋子的稳定显示，确保图形的实时更新。

摘要由CSDN通过智能技术生成

Option Explicit
Dim qipan(1 To 19, 1 To 19) As Integer '棋盘数组，0：无 1：黑子 2：白子

Private Sub Form_Load()
Me.AutoRedraw = True
End Sub

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)

Static c