Dim Val As String = RibbonTabs("生产报表").Groups("产量月报表-日报表").Items("工序").Items("StringToFind").TextForms("产量月报表").show()DataTables("产量月报表").loadFilter = "工序= '" & Val & "'"DataTables("产量月报表").load
以上代码运行不了,具体是哪里出了问题。