A continuación tenemos un ejemplo que nos permitirá filtrar los elementos del combobox que se encuentra en el ReportViewer.
Los ítems Excel y Word pasaremos a ocultar y solo mostraremos PDF.
Código Fuente
Paso 1: Importar dependencias
Imports System.Reflection
Paso 2: Programamos el Load del ReportViewer.
Private Sub ReportViewer1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ReportViewer1.Load
Try
For Each elemento As Microsoft.Reporting.WinForms.RenderingExtension In ReportViewer1.LocalReport.ListRenderingExtensions
'ponemos la condición para evitar que se muestre la exportación a Excel y a Word
If elemento.Name = "Excel" Or elemento.Name = "WORD" Then
'traemos la información del campo con sus respectivos flags
Dim infCampo As FieldInfo = elemento.[GetType]().GetField("m_isVisible", BindingFlags.Instance Or BindingFlags.NonPublic)
'colocamos el valor de false a la extension
infCampo.SetValue(elemento, False)
End If
Next
Catch ex As Exception
MessageBox.Show(ex.Message, "vb.net", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub
How to play spades online - TITONNAR
ResponderEliminarHow to titanium exhaust tips play spades online titanium rainbow quartz In a standard 52-card deck, a microtouch solo titanium player plays is titanium a metal a standard 52-card titanium tv apk deck of playing cards. They can also