Imports CrystalDecisions.CrystalReports.Engine Public Class Form1 '.... Private Sub btnInforme_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles btnInforme.Click Dim oInforme As New rptOrders() Dim oCampoInforme As TextObject Dim oDatosInforme As SummaryInfo ' modificar títulos de columnas del informe (campos de texto) oCampoInforme = oInforme.ReportDefinition.ReportObjects.Item("Text1") oCampoInforme.Text = "Pedido" oCampoInforme = oInforme.ReportDefinition.ReportObjects.Item("Text2") oCampoInforme.Text = "Cliente" oCampoInforme…

Cuando un método recibe argumentos que pueden ser Nullable incluimos el ? en el tipo del parametro. private void RecalcularDatosPagoComisionesEntidades(int? fase, int? plan, string cod_subage) Para su evaluación utilizamos: (item.T_PBC ?? 1); si item.T_PBC no es nullable devuelve el valor, en el caso contrario 1

Al crear una instancia de TransactionScope mediante la instrucción new, el administrador de transacciones determina en qué transacción va a participar. Una vez determinada, el ámbito siempre participa en esa transacción. La decisión se basa en dos factores: si está presente una transacción de ambiente y el valor del parámetro TransactionScopeOption del constructor. La transacción…

Metiendola en un Namespace y enlazando con librerias si fuese necesario. Una clase tiene sus atributos,  su contrusctores (uno por defecto New()) y las propertys de acceso y modificacion. Public Class PKSiniestro Private _Id As Integer Private _IdSolicitud As Integer Public Sub New() Me._Id = 0 Me._IdSolicitud = 0 End Sub Public Sub New(ByVal Id…