PDA

View Full Version : کمبوباکس در vsflex8



gohari244
جمعه 23 فروردین 1398, 00:25 صبح
سلام خدمت دوستان من هرکاری میکنم نمی تونم یک ستون از جدولم به بانک وصل کنم به طوری که حالت لیست کشویی داشته باشه در واقع می خوام یک ستون کمبو باکس کنم و مقادیرش هم از جدول بانک بخونه ولی فقط یکیشون میاره لطفا کمک کنید

gohari244
چهارشنبه 11 اردیبهشت 1398, 08:16 صبح
واقعا موندم چرا یکی جواب نمیده به هر حال خودم پیداش کردم میزارم شاید به درد کسی خورد

On Error Resume Next
If Adotd.Recordset.RecordCount > 0 Then
Adotd.Recordset.MoveFirst
For i6 = 1 To Adotd.Recordset.RecordCount
VS1.ColComboList(41) = VS1.ColComboList(41) & Adotd.Recordset.Fields!id & "- " & Adotd.Recordset.Fields!Name & "|"
Adotd.Recordset.MoveNext
Next i6
End If