if dw_1.rowcount() = 0 then return //--数据窗口里没有数据就直接返回，不响应操作 dw_1.saveas() //--弹出将数据窗口的数据保存成文件的提示窗口 这样就行了，当数据窗口有内容时，点那个按钮，就出现保存的提示窗口，可以选择保存的位置、文件类型、文件名称。如果用户只能保存为...

pb控制，需要将eole改为 MyOLE=Create OLEObject ConnectErr=MyOLE.ConnectToNewObject ("excel.Application") 这个是必须的，名字为myole //打开指定的XLS文件激活workbooks MyOLE.application.workbooks.Open (FilePath) //对XLS文件进行了改动以后，在关闭该文件时是否需要向用户提出警告。 MyOLE.Applicat...

如果只是保存数据使用saveas()函数即可，如果要保存格式，找一个叫dw2xls的pbl库，直接调用方法就行了。

创建　Excel对象　 eole=CREATEOBJECT(′Excel.application′)添加新工作簿 　eole.Workbooks.add 打开指定工作簿　eole.Workbooks.Open(″c:/temp/ll.xls″)计算excel文件已经有几个sheet了　i=eole.Workbooks.Sheets.count

功能 ：将数据窗口数据导出EXCEL文件，并将EXCEL文件默认英文标题替换成中文。参数：datawindow datawin，为用户要导出数据窗口的数据窗口控件名 返回值：integer 1，success；-1，error 流程描述：先用saveasAscii()倒出为excel文件，再替换表头为中文名 ...

你导出的函数中身份证号的前面加个半角的 ' 符号 试试

你有这样的想法非常好。我在这告诉你，那是可行的！你可以用Excel中“宏”中有功能，建立与其他软件连接，你可以按提示去操作，我想你一定会做出来的。当然还有其他方法 参考资料：常识

global function integer f_pbtoexcel (datawindow adw);integer li_rtn,ii,li_asc string ls_name,ls_pathname boolean lb_exist if adw.RowCount()<1 then MessageBox("提示信息","请先检索数据再导出至Excel!")return -1//error end if ls_pathname='导出文件'li_rtn=GetFileSaveName("保存...

如果你用的是PB9以下的版本，可以直接到网上找找一个叫DW2XLS的PBL源程序，这个是做的最好的PB的导出EXCEL的程序了。好多软件公司都直接使用这个PBL来做EXCEL方面的导入导出。而且支持所见即所得的原样导出。还有，也可以自己先使用SAVEAS函数，导出的时候选XLS，把数据导出来。然后再使用修改EXCEL内容的...

nteger dwcontrol.SaveAs ( { string filename, saveastype saveastype, boolean colheading { , encoding encoding } } )比如dw_1.saveas('data.xls',Excel!,true)就是把dw_1的数据导出到data.xls文件里，true是保留数据字段名 3、至于打印就直接用print()就行了 你用一个for循环不就行了...