[VB6 ] Resize...?
Private Sub Form_Click()
Line (0, 0)-(ScaleWidth, ScaleHeight)
Line (0, ScaleHeight)-(ScaleWidth, 0)
End Sub
Private Sub Form_DblClick()
Cls
End Sub
Private Sub Form_Resize()
Cls
Line (0, 0)-(ScaleWidth, ScaleHeight)
Line (0, ScaleHeight)-(ScaleWidth, 0)
End Sub
原題目要的是在form中畫對角線,在resize之後換成新form大小的對角線
結果這樣寫的話一開始就跑出對角線,請問能在一開始時保持空白嗎?
(resize那段去掉就是,不過resize之後就有問題..)
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.115.84.252
討論串 (同標題文章)
以下文章回應了本文:
完整討論串 (本文為第 1 之 2 篇):
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章