作者hubin (阿宾  NN)
看板Visual_Basic
标题[VB2005]绘图问题
时间Sun Jun 10 15:41:02 2007
Visual Basic2005绘图方面
以下是我在绘制西洋棋黑白相邻的方格程式码
Dim g As System.Drawing.Graphics
Dim p As New Pen(Color.Black)
Dim i As Integer
Dim j As Integer
g = Me.CreateGraphics()
g.Clear(Color.White)
'画直线和横线
For i = 0 To 8
g.DrawLine(p, 0, i * 50, 400, i * 50)
g.DrawLine(p, i * 50, 0, i * 50, 400)
Next
'画一、三、五、七列黑色方框
For j = 0 To 3
For i = 0 To 3
g.FillRectangle(Brushes.Black, (2 * i + 1) * 50, 2 * j * 50, 50, 50)
Next
Next
'画二、四、六、八列黑色方框
For j = 0 To 3
For i = 0 To 3
g.FillRectangle(Brushes.Black, 2 * j * 50, (2 * i + 1) * 50, 50, 50)
Next
Next
是可以画出来没问题
可是执行之後，我把表单缩小之後再打开，却发现画的都不见了
或者是我移动表单，让萤幕覆盖过它，被切掉的也是都不见了
这是VB2005在绘图上的缺点吗？有没有改进的方法
我现在的想法是用photoshop绘制一样一样的
然後当成背景图贴到form表单的背景
这样应该就不会被切掉(还没试)
那VB2005绘图那个有办法让它不要消失吗？？
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.228.196.141