PDA

View Full Version : درج اطلاعات جداول اس کیو ال در کمبوباکس به زبان vb.net



misagh1370
دوشنبه 03 تیر 1392, 16:59 عصر
با سلام
من میخواهم اطلاعات جدولم را در هنگام لود شدن فرم در کمبو نمایش دهم برای این کار از چه کدی استفاده کنم
ترحیحا به زبان وی بی دات نت تحت ویندوز باشد.دوستان خیلی عجله دارم لطفا راهنمایی کنید
سپاس فراوان

shahryari
دوشنبه 03 تیر 1392, 17:21 عصر
سلام
Public Connection_string As String = "server=server;database=Tell_book;trusted_connectio n=yes;"
Dim con As SqlConnection
Dim dt As SqlDataAdapter
Dim ds As DataSet

Function Fill_combo() As DataTable
con = New SqlConnection(Connection_string)
dt = New SqlDataAdapter("SELECT * FROM Table1", con)
Dim d As New DataTable
dt.Fill(d)
Return d
End Function

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ComboBox1.DataSource = Fill_combo()
ComboBox1.DisplayMember = Fill_combo.Columns("L_name").ToString
End Sub
موفق باشید

misagh1370
سه شنبه 04 تیر 1392, 18:49 عصر
shahryariاز راهنماییتون کمال تشکر را دارم خیلی خیلی سپاس گذارم:تشویق: