الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

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

بدأه أسير الزكريات في 27 مارس 2011 · 4 رد · 675 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم

أساتذة المنتدى وأخواتى الكرام

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

كمثال عندى فورم عند الفتح ينشئ زر أمر وليكن خروج برمجيا

أو أنشاء مربع نص غير منضم واتحكم فى حجم ألأرتفاع والعرض

أنا يمكننى أنشائهم من خلال المعالج ولكنى اريدهم برمجياّ

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

#2

اخي الكريم

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

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

fhgj,tdr

#3

أخى الكريم

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

أقصد مثلا

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

المطلوب :

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

أو

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

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

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

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

#4

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

مدونتى:-

احترف الأكسس مع أبو يوسف

متغيب حاليا لانشغالى الشديد

#5

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

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

مواضيع مشابهة