错误:“无效的过程调用或参数”是什么意思?

解决方案 »

  1.   

    呵呵,不考大家想象力。
    那你看这两段代码有什么问题吗?
    这是对的一段:
    Private Sub Command2_Click()         '打印输出
    prtfg1.横向打印 = True '是否横向打印?
    prtfg1.默认纸张 = 9  '设置默认纸张  9为A4
    prtfg1.设置标题 = "设备维修配件统计报表" '设置报表标题
    prtfg1.设置副标题 = ""
    prtfg1.设置表格名 = "" & Trim(Format((DTPicker1.Value), "yyyy-mm-dd")) & " 的统计报表"
    prtfg1.设置表左脚 = ""
    prtfg1.设置表右脚 = "打印时间:" & Trim(Format(Now, "yyyy-mm-dd")) & ""
    prtfg1.上边距 = 5   '设置边距,单位毫米
    prtfg1.下边距 = 5
    prtfg1.左边距 = 5
    prtfg1.右边距 = 5
    prtfg1.打印 MSFlexGrid1
    End Sub
    这是错的一段:
    Private Sub Command1_Click()
    prtfg1.横向打印 = True '是否横向打印?
    prtfg1.默认纸张 = 9  '设置默认纸张  9为A4
    prtfg1.设置标题 = "设备维修配件明细查询报表" '设置报表标题
    prtfg1.设置副标题 = ""
    prtfg1.设置表格名 = "配件名称为 " & Trim(tvw.SelectedItem.Parent.Text) & "规格型号为 " & Trim(tvw.SelectedItem.Text) & "的设备配件进出库情况报表"
    prtfg1.设置表左脚 = ""
    prtfg1.设置表右脚 = "打印时间:" & Trim(Format(Now, "yyyy-mm-dd")) & ""
    prtfg1.上边距 = 5   '设置边距,单位毫米
    prtfg1.下边距 = 5
    prtfg1.左边距 = 5
    prtfg1.右边距 = 5
    prtfg1.打印 MSFlexGrid1
    End Sub
      

  2.   

    我真的很疑惑:控件在一处可用,这说明不是控件的问题;而我单步调试了,在end sub 那儿才出现bug,这说明也不是代码的错误。而且单击了报错信息框的"确定"按钮后,控件还是能运行一点。
        天哪,难道这是我的错!  :(