作者fumizuki (小獅子)
看板Visual_Basic
標題Re: [VB6 ] Resize...?
時間Wed Jul 6 06:37:27 2005
※ 引述《Harrychou (Patlabor)》之銘言：
: 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之後就有問題..)
加一個全域變數
在 form_activate() 給值為 1
resize 檢查值為 1 才更新對角線
--
VB 程式設計 倉木麻衣 PTT 星爺板 行列輸入法
======================================================
Visual_Basic MaiKuraki Stephen Array
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.58.156.43