PDA

View Full Version : پاک نشدن کمبوباکس بعد از لود



milad.biroonvand
چهارشنبه 05 فروردین 1394, 23:53 عصر
سلام
من توی رویداد فرم لود از کد زیر برای بایند کمبوباکس استفاده می کنم
combobox1.DisplayMember = "onvan"
combobox1.ValueMember = "code"
combobox1.DataSource = ds.Tables("tbl1")


و از کد زیر برای پاک کردن مقدار
text
استفاده می کنم اما نمیشه

textbox1.Text = ""


جالب اینجاس وقتی کد
textbox1.Text = ""
رو توی یک دکمه مینویسیم جواب میده ولی وقتی توی لود مینویسم جواب نمیده

lastmory
شنبه 08 فروردین 1394, 08:56 صبح
با سلام
شاید توی پر کردن کمبو خطا داری و به اون خط نمیرسه

gilsoft
شنبه 08 فروردین 1394, 13:49 عصر
سلام دوست عزیز

از کد زیر استفاده کن:
Private Sub Form1_Shown(sender As Object, e As System.EventArgs) Handles Me.Shown
ComboBox1.Text = ""
'
' or
'
ComboBox1.Items.Clear()
End Sub

موفق باشید .....

milad.biroonvand
شنبه 08 فروردین 1394, 14:20 عصر
سلام دوست عزیز

از کد زیر استفاده کن:
Private Sub Form1_Shown(sender As Object, e As System.EventArgs) Handles Me.Shown
ComboBox1.Text = ""
'
' or
'
ComboBox1.Items.Clear()
End Sub

موفق باشید .....

این کد جواب نمیده.

Hossis
پنج شنبه 13 فروردین 1394, 23:22 عصر
سوال واضح نیست
بالاخره می خواهید کامبو باکس، آیتم هاش پاک بشه یا متنش؟ یا متن یک کنترل دیگه (تکست باکس) پاک بشه؟

milad.biroonvand
جمعه 04 اردیبهشت 1394, 14:34 عصر
ببنید من متوجه شدم مشکل از کجا پیش میاد من به این صورت انجام دادم.
من دو یک کنترل تب بر روی صفحه اوردم بر روی تب اول یک کمبوباکس و بر روی تب دوم یک کمبوباکس دیگه و اونها را با دستور زیر بایند کردم.
ComboBox2.DataSource = lstclas
ComboBox2.DisplayMember = "fname"
ComboBox2.ValueMember = "code"


حالا در رویداد فرم لود کد زیر برای اینکه در هنگام حالت اولیه فرم کمبوها پاک شوند رو نوشتم
ComboBox1.Text = ""
ComboBox2.Text = ""
ولی
کمبوباکس روی تب اول پاک میشه ولی کمبوباکس دوم پاک نمیشه؟
چطور باید اینکار رو انجام بده سورس رو هم گذاشتم ببینید.

محمد آشتیانی
جمعه 04 اردیبهشت 1394, 15:11 عصر
سلام
توی رویداد Form Load به جای

ComboBox1.Text = ""
ComboBox2.Text = ""


به اینصورت بنویس

ComboBox1.SelectedIndex = -1
ComboBox2.SelectedIndex = -1



ضمنا به جای اون همه کدی که نوشتید برای لود کردن دیتا در کمبوباکس ها میتونید با استفاده از دیکشنری ، به اینصورت بنویسید

Private Sub Load1()
Dim dic As New Dictionary(Of Integer, String)
dic.Add(1, "Hasan")
dic.Add(2, "Reza")
dic.Add(3, "Karim")
dic.Add(4, "Neda")


ComboBox1.DisplayMember = "Value"
ComboBox1.ValueMember = "Key"
ComboBox1.DataSource = New BindingSource(dic, Nothing)
End Sub



موفق باشید.

milad.biroonvand
جمعه 04 اردیبهشت 1394, 15:12 عصر
بسیار عالی بود