1-چه جوری می تونم مثل نمونه کار هایی که تو فروم هست صفحه رو فول اسکرین کنم؟
2-توی فرم یک کمبو باکس دارم که می خوام لیست TABLE ها رو توش داشته باشم ؟
1-چه جوری می تونم مثل نمونه کار هایی که تو فروم هست صفحه رو فول اسکرین کنم؟
2-توی فرم یک کمبو باکس دارم که می خوام لیست TABLE ها رو توش داشته باشم ؟
آخرین ویرایش به وسیله sarami : سه شنبه 14 شهریور 1385 در 14:21 عصر
1-
Private Sub Form_Load()
DoCmd.Maximize
End Sub
()Private Sub Form_Open
DoCmd.Maximize
End Sub
دوست عزیز از عنوان متناسب با سئوالتون در عنوان استفاده نمائید.و هر سئوالتون رو در یه تاپیک جداگانه مطرح فرمائید.سئوال اول شما نیز قبلا پاسخ داده شده اول جستجو نموده سپس تاپیک ایجاد نمائید. باتشکر
منی که نام شراب از کتاب می شستم
زمانه کاتب دکان می فروشم کرد.
DoCmd.Maximize که بچه بازی من منظورم این بود که تمام صفحه مانیتور رو بگیره.
از شاپرک جان هم تشکر می کنم اگر می شه زودتر نمونه قرار بدن .
من گفتم دیگه چنتا تاپیک درست نکنم که کلی فضا اشغال کنه و شلوغ بشه.
شاپرک جان ممنونم . موقع باز شدن فرم یه دونه ارور میده و اگر یه table هم اضافه بشه توی لیست نمی آد. اگر ممکنه این مشکل رو توضیح بدید .
ولی من امتحان کردم درست عمل میکرد .
میشه دقیقا بگی چه Error ای ؟؟؟؟؟
با استفاده از این کد دیگر نیازی به ایجاد یک جدول جدید ندارید ضمنا در اکسس پروجکت هم جواب میده .Private Sub Combo5_GotFocus()
Combo5.RowSource = ""
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentData
For Each obj In dbs.AllTables
If Not obj.name Like "Msys*" Then
Combo5.RowSource = obj.name & ";" & Combo5.RowSource
End If
Next obj
End Sub
شهر الکترونیک چیزی که همه بهش نیاز دارن و ما ایرانیها از همه نیازمند تر و در عین حال بی تفاوت تر به آن .
من نتونستم بدون استفاده از جدول جواب بگیرم .
ولی با جدول و با استفاده از کد شما اینجوری شد :
شما باید Rowsource type رو به Value List تبدیل می کردین
شهر الکترونیک چیزی که همه بهش نیاز دارن و ما ایرانیها از همه نیازمند تر و در عین حال بی تفاوت تر به آن .
در اکسس پروجکت شما میتونین از روی SQL تمامی اسامی table و کلا اشیای بانک اطلاعاتی رو استخراج کنین برا نمونه از کد زیر میتونین اسامی جداول رو استخراج کنین.نوشته شده توسط سنبله کار
Select Name From SysObjects Where XType ='u'
منی که نام شراب از کتاب می شستم
زمانه کاتب دکان می فروشم کرد.
استخراج نام اشیاءاز قبیل جداول ،فرمها و ..... چه کاربردی برای کاربر داره ؟
استخراج نام فیلدهای یه جدول چگونه می باشد ؟
فرض کنید در یه برنامه اطلاعات یه جدول به نحوی ممکن به یه جدول دیگه ملحق میشه
اگه یه جدول دیگه داشته باشیم که اسم فیلدهاش با جدول اول فرق داره و بخواهیم معادل فیلدهای اون رو به جدول دوم ملحق کنیم، چیکار کنیم
قابل توجه Moustafa