VB里DateReport的问题

'首先运行VB，选择“工程＿引用”命令，引用 Microsoft ActiveX Data Objects 2.5 Library '添加一个报表控件DataReport，按要求布置好RptTextBox，日期DTPicker1\ DTPicker2，打印按钮，双击command1按钮添加代码：Private Sub Command1_Click()Dim cn As ADODB.Connection Dim rs ...

excel有txt文本文件的自动转换功能，先用datereport导出txt文件，然后在excel中打开，这时会跳出一个对话框，询问txt中数据分隔方法，把逗号和tab复选框前面的钩打上，点完成就完成了转换

我刚做了一个数据库，打印就是用的DataReportview，但是需要有数据源！而且一般都是查询结果按照条件填到DataReportview当中去的。

参数的名称，数据类型设置为字符串类型。在vb6.0中写入代码，如下：report.ParameterByName(”Parameter3“).Value =format(Date, ”yyyy-mm-dd“)。即可完成。请点击输入图片描述

rs2和coon好像都定义在某个子程序内部，是局部变量。

Private Sub GenerateReport(sqlstr As String, rpTitle As String)Dim app As New Word.Application Dim doc As Word.Document Dim sel As Word.Selection Dim tbl As Word.Table Dim RD As Recordset Dim i, j ...

, vbYesNo) = vbYes Then lPHand = Val(ListView1.SelectedItem.SubItems(1)) lPHand = OpenProcess(1&, True, lPHand) '获取进程句柄 TMBack = TerminateProcess(lPHand, 0&) '关闭进程 If TMBack <> 0 Then MsgBox "进程[" & ListView1.SelectedItem.Text & "]已经被终止!" Else MsgBox "进程...

Date (日期类型) dte dteNow Currency (货币计算与定点计算类型) cur curRevenue Object (对象类型) obj objCurrent Variant (变体类型) vnt vntCheckSum 描述变量和过程名变量或过程名的主体应该使用大小写混合形式,并且应该足够长以描述它的作用。而且,函数名应该以一个动词起首,如 InitNameArray 或 CloseDialog...

控件类型 前缀 例子 3D Panel pnl pnlGroup ADO Data ado adoBiblio Animated button ani aniMailBox Check box chk chkReadOnly Combo box, drop-down list box cbo cboEnglish Command button cmd cmdExit Common dialog dlg dlgFileOpen Communications com comFax Control （当特定类型未知时，...

select * from z_business_report_first where saledate='"&formatdatetime(now(),vbshortdate)&"'selsect * from z_business_report_first where daledate='"&formatdatetime(dateadd('d',-1,now()),vbshortdate)&"'