ايران ويج

نسخه‌ی کامل: حل مشكل
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
با سلام و عرض تشكر من چند سوال دارم كه ميخوام خيلي زود به جواب برسم البته با عرض شرمندگي سوال اول:
ميخوام درون يك فرم عرض اون رو به 12 تغيير بدم.
2 ) در فرم جاري ميخوام عرض تمام اشيا رو به 4 cmتغيير بدم.
3)در بانك اطلاعات جاري 2 فرم به نام هاي form1وform2وجود دارد رنگ زمينه form2را دقيقا به رنگ form1انتخاب كنيد.
با تشكر و سپاس فروان خواهش ميكنم سريع جواب بديد. ممنون ميشم.
يه سوال فني.
اينا كه گفتيدو توي ويبي ميخوايد با اكسس؟
نقل قول: با تشكر از شما درون اكسس
شرمنده.من اكسس بلت نيستم.
سلام.
تمام کدهايي که ميدم بايد بعد از کليک راست روي فرم (در حالت طراحي) و انتخاب Properties و بعد از اون از کمبوباکس بالا قسمت Form در تب Event قسمت OnLoad نوشته شود.
جواب سوال يک:
کد:
Me.Width = xxx
xxx: اندازه مورد نظر هست که البته برحسب سانتي متر نمي باشد.

جواب سوال دو:
کد:
Dim i As Integer
    For i = 0 To (Me.Controls.Count - 1)
        Me.Controls(i).Width = xxx
    Next
xxx: همون چيزايي که بالا گفتم.

جواب سوال سه:
کد:
Form_Form2.Detail.BackColor = Form_Form1.Detail.BackColor

موفق باشي.