کمک در زمینه VB.Net

[amirferdowsi]

سلام به تمامی دوستان
ببخشید من چند تا سوال درمورد VB.Net داشتم :

1- چه طوری میشه رنگ پس زمینه یک کنترل رو در زمانی که انتخاب میشه عوض کرد یعنی وقتی که با ماوس کلیک شده یا با کلید Tab اشاره گر به اون کنترل برسه ؟

2- چه طوری میشه ID آخرین رکورد از یک جدول بانک SQL رو پیدا کرد ؟

3- چه طوری میشه که امکان جابجا شدن یک فرم رو غیر فعال کرد به طوری که فرم در جای خودش ثابت بماند و امکان جابجا شدن رو نداشته باشد ؟

پیشاپیش از راهنمایی و زحمات شما تشکر می کنم .

[Mo.Kash]

سلام
یه سر بزن به سایت تبیان
اونجا یه e-book آموزش #C (البته که VB نیست) ولی چیزایی که میخوای بدونی تو همه زبان ها مشترکه.
این کتاب واقعا حرف نداره، 950 صفحه داره (10مگ) و به طرز شگفت انگیزی کامله

[eyes_shut_number1]

در مورد سوال سومت این که بهترین راه اینه که کادر دورش رو ورداری
توی properties فرم هست!
Properties/FormBorderStyle/None
سوال اولت توی رویداد gotFocus بنویس
txt1.forecolor="red"
یا هر چیز دیکرو بخوای عوض کنی

[babak23]

سلام به تمامی دوستان
ببخشید من چند تا سوال درمورد VB.Net داشتم :

1- چه طوری میشه رنگ پس زمینه یک کنترل رو در زمانی که انتخاب میشه عوض کرد یعنی وقتی که با ماوس کلیک شده یا با کلید Tab اشاره گر به اون کنترل برسه ؟


3- چه طوری میشه که امکان جابجا شدن یک فرم رو غیر فعال کرد به طوری که فرم در جای خودش ثابت بماند و امکان جابجا شدن رو نداشته باشد ؟

پیشاپیش از راهنمایی و زحمات شما تشکر می کنم .

تو رویداد کلیک موس کد مربوط به تعقیر رنگ پس زمینه کنترل را تعقیر بده

2 http://barnamenevis.org/forum/showthread.php?t=77891&highlight=%D9%81%D8%B1%D9%85

[amirsajjadi]

جواب سوال اول : تو رویداد LostFocus و GotFocus کد مربوط به تغییر رنگ پس زمینه کنترل رو بنویس
جواب سوال سوم :
من هر چی توی ویژوال بیسیک دات نت دنبال گشتم گزینه ای که فرم رو ثابت کنه پیدا نکردم ولی با استفاده از توابع API این کارو انجام دادم

Private DeclareFunction DeleteMenu Lib"user32" (ByVal hMenu As Integer, ByVal nPosition As Integer, ByVal wFlags As Integer) As Integer
Private Declare Function GetSystemMenu Lib"user32" (ByVal hwnd As Integer, ByVal bRevert As Integer) As Integer
Private Const MF_BYPOSITION = &H400&

Private Sub Removable(ByVal frm As Form, ByVal disable_move As Boolean)
Dim hMenu As Integer
hMenu = GetSystemMenu(Me.Handle.ToInt32, False)
If disable_move Then DeleteMenu(hMenu, 1, MF_BYPOSITION)
End Sub

[morteza_261]

در مورد سوال 2 میتونی از این کد استفاده کنی...


SELECT MAX (Id) FROM TblStudentInfo

فقط به جای (Id)اسم فیلدی که ایدی ها رو توش قرار میدی بزار و اسم جدول رو عوض کن

[morteza_261]

در مورد سوال سومت این که بهترین راه اینه که کادر دورش رو ورداری
توی properties فرم هست!


Properties-->FormBorderStyle-->None

[eyes_shut_number1]

البته morteza جان اگه دقت میکردی من توی پست 3 گفته بودم.

[amirferdowsi]

از راهنمایی تمامی شما ممنونم:تشویق:



در مورد سوال سومت این که بهترین راه اینه که کادر دورش رو ورداری
توی properties فرم هست!
Properties/FormBorderStyle/None


دوست عزیز آیا راهی هست که با وجود قسمت Title Bar امکان جابجایی غیر فعال بشه ؟

[ghafoori]

از راهنمایی تمامی شما ممنونم:تشویق:



دوست عزیز آیا راهی هست که با وجود قسمت Title Bar امکان جابجایی غیر فعال بشه ؟

به این لینک مراجعه کنید
http://barnamenevis.org/forum/showthread.php?t=52161&highlight=%D8%AB%D8%A7%D8%A8%D8%AA+%D9%81%D8%B1%D9 %85

[amirferdowsi]

من هر چی توی ویژوال بیسیک دات نت دنبال گشتم گزینه ای که فرم رو ثابت کنه پیدا نکردم ولی با استفاده از توابع API این کارو انجام دادم

کد:
Private DeclareFunction DeleteMenu Lib"user32" (ByVal hMenu As Integer, ByVal nPosition As Integer, ByVal wFlags As Integer) As IntegerPrivate Declare Function GetSystemMenu Lib"user32" (ByVal hwnd As Integer, ByVal bRevert As Integer) As IntegerPrivate Const MF_BYPOSITION = &H400& Private Sub Removable(ByVal frm As Form, ByVal disable_move As Boolean)Dim hMenu As IntegerhMenu = GetSystemMenu(Me.Handle.ToInt32, False)If disable_move Then DeleteMenu(hMenu, 1, MF_BYPOSITION)End Sub

آقای سجادی عزیز این User32 چیه و از کجا می تونم پیداش کنم ؟

[zarrin_306]

برای اولی یه نمونه پایین هست
اما دومی

me.bindingcontext(dsnortwind,"customers").position=dsnortwind.customers.count - 1

[amirsajjadi]

با سلام خدمت دوست خوبم
این user32 رو خود ویندوز داره و احتیاجی نیست اونو از جایی دانلود کنی

[amirferdowsi]

آقای سجادی من این کد رو در ابتدای برنامم قرار دادم اما هنوز میشه فرم رو جابجا کرد ! :ناراحت:
لطفاً در مورد استفاده از کد بالا راهنمایی فرمائید .

[amirsajjadi]

ببین این کدها رو دقیقا بالای برنامه بعد از PublicClass Form قرار میدی سپس توی روال Form_Load به این صورت تابع رو صدا میزنی


Removable(Me, True)

[اسماعیل(واز)]

جواب2:در دستور sgl از این کد استفاده کن:select id from table order by desc
جواب 3:در propertis form:border style چند گزینه داره یکی از اونا باعث غیر فعال شدن می شه
اگه جواب سوم هم می خوای نتیجه ی این دو جواب به من بگو تا جواب سوم بهت بگم

[amirferdowsi]

آقای سجادی عزیز از راهنماییتون ممنونم مشکلم حل شد .

:تشویق: :لبخندساده:



نوشته شده توسط اسماعیل(واز)

جواب 3:در propertis form:border style چند گزینه داره یکی از اونا باعث غیر فعال شدن می شه


دوست عزیز با اینکار Title Bar مخفی میشه . من میخواستم با وجود Title Bar این کار را انجام بدم که آقای سجادی راهنماییم کردند .
از شما هم به خاطر راهنماییتون ممنونم .:لبخندساده: