هل يمكننى أنشاء زر أمر برمجياّ

اخي الكريم

اقرا الكود بعد انتهاء المعالج الذي ذكرته فهذا هو برمجيا

ولتدخل على الكودات اضغط alt +f11

fhgj,tdr

أخى الكريم

لم أقصد أنشاء زر عن طريق العالج

أقصد مثلا

عندى نموذج فى قاعدة البيانات به زر أمر لايوجد به أى أكواد

المطلوب :

عند النقر على الزر ينشاء زر أمر أخر برمجيا فى نفس الفورم

أو

ينشئ حق نص غير منضم فى نفس الفورم

وهل يمكن حذفة مرة أخرى من خلال كود أخر

كمثال أنشاء نموذج برمجيا

ولكم جزيل الشكر

iهذا الكود

يمكنك من تكوين نموذج و مربع نص و مربع تسمية و زر

Dim frm As Form
    Dim ctlLabel As Control, ctlText As Control
    Dim intDataX As Integer, intDataY As Integer
    Dim intLabelX As Integer, intLabelY As Integer

    ' Create new form with Orders table as its record source.
    Set frm = CreateForm
    frm.RecordSource = "Orders"
    ' Set positioning values for new controls.
    intLabelX = 100
    intLabelY = 100
    intDataX = 1000
    intDataY = 100
    ' Create unbound default-size text box in detail section.
    Set ctlText = CreateControl(frm.Name, acTextBox, , "", "", _
        intDataX, intDataY)
    ' Create child label control for text box.
    Set ctlLabel = CreateControl(frm.Name, acLabel, , _
         ctlText.Name, "NewLabel", intLabelX, intLabelY)
        ' Create default-size CommandButton in detail section.
    Set ctlText = CreateControl(frm.Name, acCommandButton, , "", "", intDataX, intDataY + 400)

    ' Restore form.
    DoCmd.Restore

بارك الله فيك أخى ولك ولكل أصدقائى وأخواتى فى المنتدى جزيل الشكر

فعلاّ هو دة اللى كنت أقصدة من سؤالى