Entradas

Método de Newton-Raphson con Visual Basic

Imagen
Que tal programadores hoy les presento  un tema de ingeniería propio de mi libro, que aun tengo en redacción. Texto tomado de wikipedia El método de Newton-Raphson es un método abierto, en el sentido de que no está garantizada su convergencia global. La única manera de alcanzar la convergencia es seleccionar un valor inicial lo suficientemente cercano a la raíz buscada. Así, se ha de comenzar la iteración con un valor razonablemente cercano al cero (denominado punto de arranque o valor supuesto). La relativa cercanía del punto inicial a la raíz depende mucho de la naturaleza de la propia función; si ésta presenta múltiples puntos de inflexión o pendientes grandes en el entorno de la raíz, entonces las probabilidades de que el algoritmo diverja aumentan, lo cual exige seleccionar un valor puesto cercano a la raíz. Una vez que se ha hecho esto, el método linealiza la función por la recta  tangente  en ese valor supuesto. La abscisa en el origen de dicha recta será,...

Listar días no laborables(domingos) en Datagridview

Imagen
Un saludo y un post más para los seguidores de mis publicaciones. En esta vez  me toco desarrollar  un algoritmo  que necesitaba personalmente y como su nombre lo dice tenia que listar, no solo la cantidad de dias no laborables de una fecha próxima , sino también buscar la manera que me mostrara la fecha en la que acertaba el día. Siendo así el algoritmo que les presento, busca los días domingos partiendo de la fecha actual  hasta una fecha posterior. Esto nos ocurre cuando queremos saber que fecha cae tal domingo y evitarnos recurrir al calendario y hacerlo manualmente. Les expongo el código: Public Class Form1     Dim n_dias As Integer     Dim captura_fecha(500) As String     Public Function DiasNo_Laborables(ByVal fechaProxima As Date)         Try             Dim dias_no_laborables As Integer = 0             Dim FechaActual As Date = N...

Promediar cada 2 filas en Datagridview

Imagen
Un saludo programadores, en este post les presento este tema que algunos casos, requerimos que un promedio de un columna salga en particular de dos filas consiguientes. naturalmente obtener el promedio  de una columna n  o de un  grupo de filas es sencillo, pero un poco mas difícil es, en este caso de una serie de valores en una columna dada, obtengamos promedio  de cada 2 valores. Gráficamente de esta manera, Creo que quedo mas que entendido, entonces presento el código completo: Public Class Form1     Dim cantidad As Integer     Dim valor As Double     Dim subtotal As Double     Private Sub Btnsumar_Click(sender As Object, e As EventArgs) Handles Btnsumar.Click         Try             cantidad = Val(InputBox("Ingresar cantidad Nº"))             valor = Val(InputBox("Ingresar valor"))         ...

DotNetBar- Cambiar y conservar tema en nuestra aplicacion

Imagen
 Hola amigos programadores, este tema se refiere a mejorar la apariencia de nuestra aplicacion  con la suite de controles ya conocida a nivel mundial Devcomponents dotnetbar, para tal efecto les he preparado un vídeo que demuestra como hacerlo fácil y sencillo. Ya saben, cualquier pregunta y/o comentario a mi correo, espero se suscriban a mi canal. Nos vemos en otra publicación.

ReportViewer con base de datos Access

Imagen
Hoy nos encontramos en un nuevo post, esta vez vamos a realizar un reporte(Report Viewer) para  un ejemplo en particular, cuya idea general surgió de   Jaime Escobar un seguidor de mis publicaciones, Bueno se trata del ingreso de datos personales de un individuo y que ahora lo vamos a presentar listo para la impresión: NOTA: Para que el componente ReporViewer  aparezca en tu barra de objetos(controles)  debes usar Net Framework 3.5 en tu proyecto. La captura del programa es esta: El código: Imports System.IO Imports Microsoft.Reporting.WinForms Public Class Form1     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click         Try             cmd.CommandType = CommandType.Text             cmd.Connection = conn             conectarse()             sql = "INSERT I...

Crear y conectar base de datos SQLServer Compact 4.0

Imagen
Tengan un saludo amigos programadores, en este post veremos como crear una base de datos SqlServer Compact 4. Como uds saben que a diferencia de SQLServer 2014 las BD Compact  como su nombre lo indica son compactas y son usadas para realizar aplicaciones tanto para dispositivos móviles como para aplicaciones de escritorio parcialmente conectadas, no necesitan servidor y se ejecutan únicamente desde una dirección especifica determinada por el usuario. SQLServer Compact 4 nos ofrece: Desarrollo de aplicaciones SQLServer Compact 4 con  WebMatrix y Visual Studio 2010-2013 Mejoras de la API Nueva sintaxis de Transact-SQL Mejoras para los sitios Web y las aplicaciones ASP.NET Mas confiable, segura y fácilmente implementable. RECURSOS NECESARIOS PARA TRABAJAR SqlServer Compact 4.0 http://www.microsoft.com/en-us/download/details.aspx?id=17876 SqlServer Compact/SqlLite Toolbox for VS https://visualstudiogallery.msdn.microsoft.com/0e313dfd-be80-4afb-b5e9-6e74d369f7a1/...

Copiar contenido de la papelera en celdas del Datagridview

Imagen
Hola programadores, al igual como habia hecho hace algun tiempo el  Copiar Contenido de Datagridview al portapapeles ----> http://jossm03.blogspot.com/2012/06/copiar-contenido-datagridview-al.html  Ahora hago todo lo contrario es decir  copiar de celdas ya sean de Access o Excel y pegarlas en  la Datagridview. Ademas al ejemplo le incluyo algunas funciones o trucos básicos del DatagridView para contar filas,numerar filas fijas, menú popup(menu con clik derecho), etc. Mi captura en modo diseño Imports System.Text.RegularExpressions Public Class Form1     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click         '  migrid.Rows.Add(numfilas.Value)         Try             migrid.Rows.Add(200)   ' agrego 200 filas         Catch ex As Exception             MsgBox(ex.ToString())...