Salve a tutti,
ho inserito un datareport e alla pressione di un pulsante mi richiamo il datareport nel quale ho inserito dei textbox associati a datafield precisi.
Il risultato è LArghezza del datareport maggiore di quella del foglio.
Come mai?

Il codice è questo. Ho sbagliato qualcosa?
GRAZIE.

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
cn.CursorLocation = adUseClient
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" & inseripaz.Label26.Caption & "';Mode=ReadWrite;Persist Security Info=False"
cn.Open ConnectionString
If rs.State = adStateOpen Then rs.Close
rs.CursorLocation = adUseNone
rs.CursorType = adOpenStatic
rs.Source = "select * from inseriprod where codice='" & Text1.Text & "'"
rs.Source = "select * from tab_prestazioni where codicecl='" & Text1.Text & "'"
rs.Open , cn
Set DataReport1.DataSource = rs
DataReport1.Show