PDA

View Full Version : سوال: نمایش برخی اطلاعات دیتا بیس روی یک لیبل



nima_8m
جمعه 07 تیر 1392, 12:33 عصر
سلام

من یه فرم دارم که میخوام گزیده ای از اطلاعاتم رو روی لیبلهای در فرم نمایش دهم

مثلا فقط شماره دانشجوی تعدادی خاص چطوری میتونم این کار رو انجام بدم

دیتابیس من اکسس هستش

کدهای اتصال به دیتابیس:

con = New OleDbConnection("provider=microsoft.jet.oledb.4.0 ; data source=" & Application.StartupPath() & "\db.mdb")
con.Open()
Dim da As New OleDbDataAdapter("select * from t1 order by id asc ", con)
Dim ds As New DataSet
Dim ds_sek As New DataSet

M.eHam
جمعه 07 تیر 1392, 13:22 عصر
از دیتا گرید استفاده نمیکنی ؟

nima_8m
جمعه 07 تیر 1392, 13:43 عصر
خیـــــــر این فرم روی نمایشگر میره و میخوام روی لیبل نمایش بدم

nima_8m
شنبه 08 تیر 1392, 18:15 عصر
کسی نیست ما رو راهنمایی کنه؟!

nima_8m
دوشنبه 10 تیر 1392, 11:43 صبح
مدیر محترم ....

tstsst
دوشنبه 10 تیر 1392, 15:35 عصر
سلام

از دیتاریدر استفاده کن

Dim con As New OleDbConnection("provider=microsoft.jet.oledb.4.0 ; data source=" & Application.StartupPath() & "\db.mdb")
con.Open()
Dim da As New OleDbCommand("select * from t1 order by id asc ", con)
Dim dr As OleDbDataReader = da.ExecuteReader
While dr.Read
MsgBox(dr(0))
'یا
MsgBox(dr("C1"))
End While

nima_8m
دوشنبه 10 تیر 1392, 23:48 عصر
مرسی

ولی روی یه لیبل چظوری نمایشش بدم
من کلاً 20 تا کالا دارم که تو یه صفحه نمایش به صورت انتخابی میخوام 10 تاش رو نمایش بدم و به محض اینکه قیمت به روز شد رو تابلو هم به روز بشه
بازم مرسی از راهنماییت

nima_8m
سه شنبه 08 مرداد 1392, 22:21 عصر
کسی میتونه کمک کنه
چطوری میشه اطلاعات رو روی لیبل نمایش داد

systam
سه شنبه 08 مرداد 1392, 22:35 عصر
سلام به نظر من بیا
یا از حلقه استفاده کن
یا از تایمر
یک شرط براش بزار مثلا شماره دانشجوهایی که با 10 شروع میشن رو نمایش بده

nima_8m
چهارشنبه 09 مرداد 1392, 11:58 صبح
داخل دیتابیس من کلاً 20 تا رکورد هست که آی دی داره ،نام ، قیمت خرید و قیمت فروش حالا توی یه نمایشگر من میخوام فقط 10 تا انتخابی (تاکید میکنم انتخابی) رو نمایش بدم به این صورت

نام-خربد-فروش حالا بع توضیحاتی که دادم چطور میتونم این کار رو انجام بدم

از راهنماییتون متشکرم

systam
پنج شنبه 10 مرداد 1392, 20:48 عصر
سلام

نام-خربد-فروش حالا بع توضیحاتی که دادم چطور میتونم این کار رو انجام بدم
داداشی اول به من بگو کار با بانک ها رو بلدی یا نه
نمیدونم برنامه برای چه کاری داره نوشته میشه
بر اساس چه چیزی میخوای اطلاعات رو نمایش بدی


یا علی

mehran6764
پنج شنبه 10 مرداد 1392, 21:54 عصر
من نمی دونم سوال شما رو درست متوجه شدم یا نه
ولی اگر منظوراتون اینکه فرضا" ممکنه بار اول شما میخواین شماره دانشجویی و قیمت فروش و ... رو برای نمایش انتخاب کنین
و بار دوم فقط قیمت فروش و قیمت خرید و .... در این صورت یه روش می تونه این باشه که زمان اجرا Label های لازم رو بسازین
فکر کنم اگر بیشتر توضیح بدین دوستان کمک بیشنری کنن

nima_8m
یک شنبه 13 مرداد 1392, 23:20 عصر
مرسی از جوابتون

ببینید یه برنامه سادست بانک من اکسس هستش بالا توضیح دادم
این برنامه قیمت 10 نوع کالا رو نگه میداره و هر روز این قیمت به روز میشه مثل سکه
یه نمایشگر هست که باید این قیمتا رو نشون بده ولی نیاز نیست که هر 10 تا رو نمایش بدیم 6 تا از اینا ضروری هستش الان با دیتاگرید دارم این کار رو میکنم ولی جالب نیست چون همه کالاها هستن
حالا سوالم اینه چطور یه فرم طراحی کنم که هر کالای رو که خواستم توی یه تکس باکس نمایش بدم
متشکرم

antionline
دوشنبه 14 مرداد 1392, 12:00 عصر
سلام
من از یه کلک استفاده می کنم. البته دیتا بیسی ک من کار می کنم sql هستش. کاری که می کنم اینه که یه دیتا گرید به فرمم اضافه می کنم اما جایی قرار میدم که کاربر نبینه و بعد اطلاعات رو وارد اون می کنم و بعد به ترتیب هر جایی که بخوام انتقالش میدم
اینم کد فراخانیش

Dim g As New DataTable
f.Fill(g)
DataGridView1.DataSource = g
txtid.Text = DataGridView1.CurrentRow.Cells(0).Value.ToString
txtname.Text = DataGridView1.CurrentRow.Cells(1).Value.ToString
txtjense.Text = DataGridView1.CurrentRow.Cells(2).Value.ToString
توی پرانتز داخل cell شماره ستون رو وارد کن. یادت باشه ستونها از 0 شروع میشن
موفق باشی

nima_8m
پنج شنبه 24 مرداد 1392, 22:49 عصر
سلام
من از یه کلک استفاده می کنم. البته دیتا بیسی ک من کار می کنم sql هستش. کاری که می کنم اینه که یه دیتا گرید به فرمم اضافه می کنم اما جایی قرار میدم که کاربر نبینه و بعد اطلاعات رو وارد اون می کنم و بعد به ترتیب هر جایی که بخوام انتقالش میدم
اینم کد فراخانیش

Dim g As New DataTable
f.Fill(g)
DataGridView1.DataSource = g
txtid.Text = DataGridView1.CurrentRow.Cells(0).Value.ToString
txtname.Text = DataGridView1.CurrentRow.Cells(1).Value.ToString
txtjense.Text = DataGridView1.CurrentRow.Cells(2).Value.ToString
توی پرانتز داخل cell شماره ستون رو وارد کن. یادت باشه ستونها از 0 شروع میشن
موفق باشی

از لطف شما سپاسگذارم
این کد فقط سطر جاری رو نشون میده بقیه سطرها رو چطور نمایش بدم من همه سطرها رو میخوام

systam
جمعه 25 مرداد 1392, 10:25 صبح
سلام
نیما خودت فرم رو طراحی کن حالا هر چی ببنیم که چطوری درست میکنی
برنامه رو ضمیمه کن ببنیم چیکار کردی
بهتر میشه نظر داد


یا علی

nima_8m
جمعه 25 مرداد 1392, 17:14 عصر
فرم رو طراحی کردم برنامه رو برا مشتری نصب کردم داره کار میکنه ولی با دیتا گرید که خیلی جالب نیست

میخواستم یه فرم طراحی کنم که راحتر بتونم اطلاعات رو نمایش بدم

mohammaduir
دوشنبه 01 مهر 1392, 20:48 عصر
Try
Dim FNamePerson As String = String.Empty
Dim LNamePerson As String = String.Empty
Dim FaNamePerson As String = String.Empty
Dim TellPerson As String = String.Empty
Dim AddressPerson As String = String.Empty

For Each SelectedRow As DataGridViewRow In Me.GridViewPersons.SelectedRows
FNamePerson = SelectedRow.Cells(1).Value
LNamePerson = SelectedRow.Cells(2).Value
FaNamePerson = SelectedRow.Cells(3).Value
TellPerson = SelectedRow.Cells(5).Value
AddressPerson = SelectedRow.Cells(6).Value
Next

FNameP.Text = FNamePerson
LNameP.Text = LNamePerson
FaNameP.Text = FaNamePerson
TellP.Text = TellPerson
AddressP.Text = AddressPerson

Catch ex As SqlClient.SqlException
MessageBox.Show(ex.Message.ToString)
End Try