有关spread控件,我用recordset对象怎么显示到spread上?

解决方案 »

  1.   

    我这样:
        Dim Cn As New ADODB.Connection
        Dim Re As New ADODB.Recordset
        Cn.Open "Provider=SQLOLEDB.1;Password=123;Persist Security Info=True;User ID=sa;Initial Catalog=ProjectModel2;Data Source=ZENGJUN"
        Re.Open "SELECT * FROM tabPerson", Cn    fpSpread1.Row = -1
        fpSpread1.Col = 1
        fpSpread1.DataField = "n_person_no"
        fpSpread1.Col = 2
        fpSpread1.DataField = "v_person_name"
        fpSpread1.Col = 3
        fpSpread1.DataField = "v_sex"
        fpSpread1.Col = 4
        fpSpread1.DataField = "v_dept_name"
        fpSpread1.Col = 5
        fpSpread1.DataField = "v_card_no"
        
        Set fpSpread1.DataSource = Re
        
        fpSpread1.MaxRows = 100    fpSpread1.Refresh但是不行!