vb crystalreport - .NET技术 / VB.NET
Private Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click
MouseWait()
Dim ClearTempTabelSQL As String
'If Not IsDate(mtxtDate.Text) Then
' Call MouseDefault()
' Exit Sub
'End If
Dim ReportDoc As New CrystalDecisions.CrystalReports.Engine.ReportDocument
Call ReportDoc.Load(gRptPath & "56f.rpt")
ReportDoc.RecordSelectionFormula = "{TempTax56b.TempKey} = '" & RP2(TempKey) & "'"
ReportDoc.SetParameterValue("TaxYear", Mid(mtxtDate.Text, 7, 4))
ClearTempTabelSQL = "DELETE from TempTax56b WHERE TempKey = '" & RP(TempKey) & "'"
Dim F As New Reports.frmReportViewer(ReportDoc, GL("@DSL1108"), ClearTempTabelSQL)
F.Show()
MouseDefault()
End Sub
End Class
通过一个按钮调用crystalreport
但是 里面那个Call ReportDoc.Load(gRptPath & "56f.rpt")
grptpath是路径 但是怎么知道路径是上面？
是什么
打错
顶呀 大家
代码里似乎没有gRptPath 这个变量的定义。
可以用 application.startuppath，表示你的程序所在的目录（winform程序可用）。
比rpt文件�
相关问答：
vb是不是很牛啊 怎么那么多的病毒都是vb做的啊 c#行不行？
c#在XP运行不了，除非让别人先装上.net.
VB相对于C,C++,ASM等等，局限性大多了。
别再说什么语言不如什么语言的话了，只有你不会用或用着不顺手的� ......
帮我改改 我总觉得有问题
Type ID
number As Single
score As Integer
name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
i = 0
&nbs ......
第一次接触CrystalReport
急寻找Vb.net Access 通过查询出的数据输出到CrystalReport的例子.
有的朋友麻烦发来学习.多谢!
跟你的要求差不多，参考一下：
http://topic.csdn.net/u/20090823/21/87af02d3-f4ca-480 ......
VB怎样获得鼠标处的超级连接呢？
在WebBrowser控件中有这样一个事件:StatusTextChange(index As Integer, ByVal Text As String)
它的Text参数正是鼠标处的超级连接,但问题是如果我的浏览器正� ......
报这个错:
compile Error
sub or function not defined
和我引用这个库函数有关系吗？
Private Declare Function GetPrivateProfileString Lib "kernel32" Alias _
"GetPrivatePr ......
