
Meka balanna
http://vb.net-informations.com/crystal-report/vb.net_crystal_report_parameter_string.htm
Use Google to find answers to Programming related questions
https://www.google.lk/search?q=vb.n...sugexp=chrome,mod=18&sourceid=chrome&ie=UTF-8

Dim txtValue As String=TextBox1.Text
Dim myReport As New CrystalReport1
myReport .SetParameterValue("mytextBoxValue", txtValue )
You have to use a parameter fields of Crystal report for this....
1.Open Field Explorer window in Crystal report.
2.Go to Parameter Fields.
3.Right click on Parameter Fields-------->Click on New..
4.In the pop-up window give a Name for your parameter and give its Data Type.say its Name is mytextBoxValue and Data Type is String.
5.A parameter field[mytextBoxValue ] will be added under Parameter Fields...Drag this field to your report and place where you want to show your textbox value.
6.Now in the code behind file write the following code to pass your TextBox value to this Crystal report parameter field.
http://bytes.com/topic/net/answers/741945-vb-net-app-send-value-crystal-reportCode:Dim txtValue As String=TextBox1.Text Dim myReport As New CrystalReport1 myReport .SetParameterValue("mytextBoxValue", txtValue )





Here you go machang
'Start Here
Dim RptForm As CrystalDecisions.CrystalReports.Engine.ReportDocument
Dim T As CrystalDecisions.CrystalReports.Engine.TextObject
RptForm = rpt '(rpt is your Report object)
T = RptForm.ReportDefinition.Sections(0).ReportObjects("textboxname")
T.Text = txtdate.Text
'End
rpt.SetDataSource(dev.Tables[0])
crystalReportViewer1.DisplayGroupTree = false
crystalReportViewer1.ReportSource = rpt
![]()

Invalid index. (Exception from HRESULT: 0x8002000B (DISP_E_BADINDEX))
![]()
Dim txtValue As String=TextBox1.Text
Dim myReport As New CrystalReport1
myReport .SetParameterValue([B][SIZE="4"][COLOR="Red"]0[/COLOR][/SIZE][/B], txtValue )
