摘要：Private Sub m_BillTransfer_LoadBillEnd(ByVal ShowType As Long) 'TODO: 请在此处添加代码响应事件 LoadBillEnd With m_BillTransfer.BillForm.tlbTool.Buttons .Add .Coun 阅读全文

摘要：金蝶KIS旗舰版7.0开发自动生成采购申请时，使用m_BillTransfer.SetGridText 循环插入数据时第一行数据能插入成功后，一直提示下标越界问题。 需要使用m_BillTransfer.BillForm.insertrow，代码如下 Do While Not rs.EOF Call 阅读全文

摘要：金蝶KIS旗舰版7.0开发使用ADODB.Recordset.open读取SQL server返回数据集时，RecordCount的值一直是-1，open参数CursorType和LockType试了一遍都不行，最后使用 Do While Not rs.EOF .......... rs.MoveN 阅读全文