22-06-19, 08:52 PM
PHP كود :
Private Sub Command2_Click()
MSHFlexGrid1.Rows = 1
Data1.Recordset.MoveFirst
Do Until Data1.Recordset.EOF
MSHFlexGrid1.AddItem Data1.Recordset.Fields![ZepoonName] & vbTab & Data1.Recordset.Fields![NumIsal]
Data1.Recordset.MoveNext
Loop
End Sub
انصك اخي عبدالله بترك DATA1
الادو عن طريق الكود كما المثال التالي اسهل واسرع
http://vb4arb.com/vb/showthread.php?tid=18228


