تعديل كود لنموذج شفاف

[بلال اليامين]

السلام عليكم 

اريدتعديل كود لنموذج شفاف

اريد وضع في الكود رقم الشفافية 

وعند وضع الرقم لم يتغيير عند الحفظ

Private Sub Form_Open(Cancel As Integer)
    
    If (LightboxForm.OpenInRemoteDesktop) Then
        Cancel = True
        Exit Sub
    End If
    
    Set LightboxForm.Form = Me
End Sub

[بلال اليامين]

السلام عليكم 

اريدتعديل كود لنموذج شفاف

اريد وضع في الكود رقم الشفافية 

وعند وضع الرقم لم يتغيير عند الحفظ

Private Sub Form_Open(Cancel As Integer)
    
    If (LightboxForm.OpenInRemoteDesktop) Then
        Cancel = True
        Exit Sub
    End If
    
    Set LightboxForm.Form = Me
End Sub

[بلال اليامين]

السلام عليكم 

اريدتعديل كود لنموذج شفاف

اريد وضع في الكود رقم الشفافية 

وعند وضع الرقم لم يتغيير عند الحفظ