หน้าแรก › 2002ASP › Gradient Form Background (4 lines of code)
Advertisement
2002ASP Miscellaneous #2829

Gradient Form Background (4 lines of code)

Daniel Davies
★★★★★
4.8 · ดาวน์โหลด: 2,341

gradient your forms background

AI

สรุปโดย AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

ซอร์สโค้ด
original-source 
Private Sub Command1_Click()
Dim Amount
Form1.AutoRedraw = True
Amount = (255 / ScaleHeight)
For i = 0 To Form1.ScaleHeight
  Form1.Line (0, i)-(ScaleWidth, i), _
  RGB(0, 0, Amount * i)
Next i
End Sub
ความคิดเห็นดั้งเดิม (3)
กู้คืนจาก Wayback Machine