16-11-20, 09:00 PM
بسم الله الرحمن الرحيم
السلام عليكم أخواني الأعضاء
أريد كود لتغيير خاصية Style للCommandButton في زمن التنفيذ وهذا مثل لما أريد تنفيذة ولم أستطع إكمالة بسبب عدم قدرتي عل تغيير هذه الخاصية
Option Explicit
Private WithEvents Com1 As VB.CommandButton
Private Sub Com1_Click()
Unload Me
End Sub
Private Sub Form_Load()
Set Com1 = Controls.Add("VB.CommandButton", "Command1", Me)
Com1.Move 300, 400, 1575, 375
Com1.Caption = "Exit"
'Com1.Style = 1
Com1.BackColor = 65280
Com1.Visible = True
End Sub
Private WithEvents Com1 As VB.CommandButton
Private Sub Com1_Click()
Unload Me
End Sub
Private Sub Form_Load()
Set Com1 = Controls.Add("VB.CommandButton", "Command1", Me)
Com1.Move 300, 400, 1575, 375
Com1.Caption = "Exit"
'Com1.Style = 1
Com1.BackColor = 65280
Com1.Visible = True
End Sub
أرجوا منكم مساعدتي على هذا الطلب ولكم جزيل الشكر
وجزاكم الله ألف خير
ALHUMIDI Soft