Back to simplicity: Floating CommandButtons
A lame little "3D" effect with a shape and a command button. makes it look like the button is floating above the form.. the contained code shows how to further that effect by moving the button..
AI
Tóm tắt bởi 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.
Mã nguồn
Option Explicit Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Command1.Left = Command1.Left + 60 Command1.Top = Command1.Top + 60 End Sub Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) Command1.Left = Command1.Left - 60 Command1.Top = Command1.Top - 60 End Sub
Bình luận gốc (3)
Được khôi phục từ Wayback Machine