PREGUNTAS CONTESTADAS - Visual Basic.NET

 Hay un total de 338 Preguntas.<<  >> 

    Pregunta:  57698 - PASAR (FILAS) DE DATAGRIDVIEW A DATAGRIDVIEW
Autor:  Raul Bencosme
Un caluroso saludo a todos los integrantes de esta comunidad ante todo.. jej Queria ver si me pueden ayudar con un problemita que tengo pasando filas de un datagridview a otro datagrid view que esta en otro form.

Cuando le doy doble click a la fila la pasa perfectamente al otro datagrid pero, eso es solo la primera fila que paso... si intento pasar otra lo que hace es que la sustituye por la ultima fila que le doy click.

Queria saber si me pueden ayudar identificar cual es el error del codigo para que a medida que haga click en las celdas del datagridcontado que es donde estan los datos los pase al datagridfactura pero que las coloque una debajo de la otra.

aqui les dejo el codigo que uso.

Gracias por anticipado ^^

Private Sub gridcontado_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles gridcontado.CellContentClick
Dim cuantasSelecciono As Integer = gridcontado.Rows.GetRowCount(DataGridViewElementStates.Selected)
Dim aFilasSelec As DataGridViewSelectedRowCollection = gridcontado.SelectedRows
For nContador As Integer = 0 To (gridcontado.Columns.Count - 1)
Facturacion.gridfactura.Columns.Add(DirectCast(gridcontado.Columns(nContador).Clone(), DataGridViewColumn))
Next
Facturacion.gridfactura.Rows.Add(cuantasSelecciono)
Dim nIndiceFila As Integer = 0
For Each oFila As DataGridViewRow In aFilasSelec
For Each oCelda As DataGridViewCell In oFila.Cells
Facturacion.gridfactura.Rows(nIndiceFila + 1).Cells(oCelda.ColumnIndex).Value = oCelda.Value
Next
nIndiceFila += 1

Next

Facturacion.Show()
End Sub
  Respuesta:  Wanchucho
pues en el otro datagridwiew tienes q agregar una nueva fila cada vez q le envias lo del dgv q le das click.... xq sino te las va a montar sobre la 1ra fila... creo q la propiedad es dgv.rows.add....
o si no al darle click al 1er dgv declara un datarow y ese se lo envias al 2do dgv.....

Att. wanchucho

    Pregunta:  57769 - LLENAR UN COMBOBOX CON UNA BD
Autor:  Candy With Pausini
Hola Amigos!!
Tengo una dudota, no soy muy experta en este lenguaje pero lo estoy manejando, ya tengo la conexion a la base de datos, bueno eso si se, pero como hago para llenar un combo con un campo de una tabla, por ejemplo, tengo una tabla con 5 campos (escuela, carrera, duracion, localidad y estado) pero al hacer clic en el combo necesito que se llene solo el campo escuela y al hacer clic en la escuela tengo otro combo que dependiendo de la escuela seleccione la carrera y asi sucesivamente. Como conecto el primer combo a la base de datos? y como conecto los demas? Les agradeceria mucho, estoy en la escuela y necesito una ayudota jejeje MUCHAS GRACIAS de antemano ;). Atte Candy
  Respuesta:  William Fallas
Lo que tienes que hacer es capturar el evento SelectedIndexChanged del combo para saber cual item fue seleccionado, una ves que sabes cual fue el item seleccionado, entonces filtras el otro combo.

    Pregunta:  57829 - VARIABLE COMO NOMBRE DE CAMPO
Autor:  Jorge Pariona
Tengo problemas con este store procedure, cuando envio el nombre del campo por la variable WHERE @xCampo (se envia el siguiente valor en vb.net @xCampo="RUC") no ejecuta pero si cambio en el WHERE "RUC" si se ejecuta. El valor @xCampo cambia segun los campos de la tabla que se selecciona en un combobox desde VB.net

ALTER PROCEDURE [dbo].[MostrarEmpresas]
@xTipo varchar(65),
@xCampo varchar(65),
@xLike varchar(65)

AS
BEGIN
IF @xTipo = 'Comenzar por'
BEGIN
SELECT EMPRESA.ID_EMPRESA , EMPRESA.RUC , EMPRESA.RAZON_SOCIAL , EMPRESA.DIRECCION , DISTRITO.DESCRIPCION , EMPRESA.CONTACTO , EMPRESA.TELEFONO
FROM EMPRESA INNER JOIN Distrito ON EMPRESA.Id_Distrito=Distrito.Id_Distrito

WHERE @xCampo
LIKE @xLike+'%'
END
  Respuesta:  abel montalvo
Hola espero y entiendas...esta es la idea solo modificala o ajustala a tus necesidades


DECLARE @FormName NVARCHAR(50)='FrmFindTransa'
DECLARE @ColumnName NVARCHAR(50)='FormName'
DECLARE @query nvarchar(MAX)='SELECT FormName FROM dbo.TForms where '+@ColumnName+' like ''%'+@FormName+'%'''
EXEC sp_executesql @query

    Pregunta:  58108 - MOSTRAR UN FORMULARIO DENTRO DE UN PANEL
Autor:  Alberto Cigales
Como puedo mostrar un formulario hijo dentro de un panel que se encuentra dentro del formulario padre.
Tengo un MDI padre y dentro de el tengo un splitcontainer que inicialmente contiene 2 control panel en el panel1 presento un menu y en el panel2 quiero mostrar el formulario hijo, como le puedo hacer ya que lo muestro en forma normal pero aparece atras del splitcontainer y no se ve, este es mi codigo

If modWindows.fCtr_Art Is Nothing OrElse modWindows.fCtr_Art.IsDisposed Then
modWindows.fCtr_Art = New frmInv_Ctrl_Articulos
modWindows.fCtr_Art.MdiParent = Me
modWindows.fCtr_Art.Show()
Else
modWindows.fCtr_Art.BringToFront()
End If

pero no se muestra, como le hago para mostrarlo dentro del panel2

Gracias
  Respuesta:  Iván
Añade esta linea y pon los nombres de tus objetos.
oformulario.Parent = SplitContainer1.Panel2

Esto te lo mostrará donde pides.

Saludos!

    Pregunta:  58147 - ELIMINAR ARCHIVO ANTES DE BORRARLO EN VISUAL BASIC .NET
Autor:  LUIS SANCHEZ
Estimados amigos,

Soy un programador novel en Visual Basic .NET (Visual Studio 2005).

Necesito eliminar un archivo Excel que he creado (para crearlo he usado la versión gratuita de GemBoxSoftware punto com); pero resulta que si el archivo en cuestión está abierto en Excel en ese preciso momento no me deja eliminarlo.

¿Cómo puedo eliminar dicho archivo antes de borrarlo?

Cualquier ayudita será muy bienvenida.

Mil gracias.
  Respuesta:  Leandro Martorell
puedes directamente "matar" el proceso con el comando taskkill

en PC local:
TASKKILL /F /IM Excel.exe

en pc Remota:

TASKKILL /S sistema /F /IM Excel.exe (reemplaza sistema por el nombre de la pc remota o coloca directamente la IP de la PC)

    Pregunta:  58226 - COMO ENLAZAR 3 COMBOBOX CON DATOS RELACIONADOS DE BD VB2005
Autor:  Jesus Bautista Rodriguez
Hola a todos
estoy empezando a aprender visual basic 2005, y estoy tratando de hacer una aplicaion
donde necesito relacionar 3 ComboBox con datos relacionadosa de una base de datos de sql server express 2005, he buscado informacion pero solo encuentro para elnlazar 2 combobox. La tablas estan relacionadas de esta forma:

Es de venta de articulos:

Tabla Articulo:
ArticuloID - llave primaria
Nom_Articulo
Imagen

Tabla Marcas:
MarcaID - llave primaria
Nom_Marca
ArticuloID - Relacion

Tabla Modelos:
ModeloID - llave primaria
Nom_Modelo
Precio
MarcaID - Relacion

Lo que yo intento hacer es que cuando seleccione un Articulo en el primer combo, me aparescan sus respectivas marcas en el segundo combo; entonces de las Marcas que aparescan, al seccionar una me aparescan sus respectivos Modelos en el tercer combo.
He podido relacionar Articulos y Marcas pero no con Modelos.

Para los 2 combos lo he echo en un ambiente desconectado(DataSet) y agregando los datos de la tabla al combo(item) de Articulos por filas(Row) , creo un DataRelation y obtengo las Marcas con un GetChilden.
Pero no import la forma.

Les agradesco de antemano la ayuda que puedan dar. Gracias
  Respuesta:  abel montalvo
Supongamos que tienes tres combos

Public Class Form1

Dim DT1 As DataTable = New DataTable("DT1")
Dim DT2 As DataTable = New DataTable("DT2")
Dim DT3 As DataTable = New DataTable("DT3")
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

DT1.Columns.Add(New DataColumn("Tabla1_ID", GetType(System.String)))
DT1.Columns.Add(New DataColumn("Tabla1_Valor", GetType(System.String)))
DT1.Columns.Add(New DataColumn("Tabla1_Valor2", GetType(System.String)))
DT1.Rows.Add("1", "valor1", "valor2")
DT1.Rows.Add("2", "valor3", "valor4")

DT2.Columns.Add(New DataColumn("Tabla2_ID", GetType(System.String)))
DT2.Columns.Add(New DataColumn("Tabla1_ID", GetType(System.String)))
DT2.Columns.Add(New DataColumn("Tabla2_Valor", GetType(System.String)))
DT2.Rows.Add("3", "1", "valor5")
DT2.Rows.Add("4", "1", "valor6")
DT2.Rows.Add("5", "2", "valor7")

DT3.Columns.Add(New DataColumn("Tabla3_ID", GetType(System.String)))
DT3.Columns.Add(New DataColumn("Tabla2_ID", GetType(System.String)))
DT3.Columns.Add(New DataColumn("Tabla3_Valor", GetType(System.String)))
DT3.Rows.Add("6", "3", "valor8")
DT3.Rows.Add("7", "3", "valor9")
DT3.Rows.Add("8", "3", "valor10")
DT3.Rows.Add("9", "4", "valor11")


ComboBox1.DataSource = DT1
ComboBox1.DisplayMember = "Tabla1_Valor"
ComboBox1.ValueMember = "Tabla1_ID"
End Sub

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
Dim DT As DataTable = DT2.Clone
For Each elemento In DT2.Select("Tabla1_ID = '" + ComboBox1.SelectedValue.ToString + "'")
DT.ImportRow(elemento)
Next
ComboBox2.DataSource = DT
ComboBox2.DisplayMember = "Tabla2_Valor"
ComboBox2.ValueMember = "Tabla2_ID"
End Sub

Private Sub ComboBox2_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox2.SelectedIndexChanged
Dim DT As DataTable = DT3.Clone
For Each elemento In DT3.Select("Tabla2_ID = '" + ComboBox2.SelectedValue.ToString + "'")
DT.ImportRow(elemento)
Next
ComboBox3.DataSource = DT
ComboBox3.DisplayMember = "Tabla3_Valor"
ComboBox3.ValueMember = "Tabla3_ID"
End Sub
End Class

    Pregunta:  58244 - EJECUTAR UN .EXE SIN TENER VISUAL BASIC INSTALADO
Autor:  Sandra
Hola! tengo un proyecto en visual studio 2005, y cuando lo paso a otro ordenador que no tengo instalado el visual studio 05 no puedo ejecutar el .exe.

He leido que teniendo instalado el compact Framework de microsoft se podian ejecutar los .exe, pero ya lo he hecho y sigo sin poder ejecutarlo, si alguien pudiera ayudarme, se lo agradeceria muchisimo.

Por favor, si sabes como hacerlo dimelo.

Gracias
  Respuesta:  Topper_Hardly
El compact no te vale, tiene que ser el framework 2.0 o superior..

    Pregunta:  58292 - CAMBIAR EL COLOR DE LAS COLUMNAS DE UN DATAGRID
Autor:  angeles Mendez
hola alguien me puede ayudar
estoy trabajando con un data grid que me muestra los datos que tengo en una base de datos(SQL) y necesito que cuando cargue la informacion en el grid las columnas cambien de color de acuerdo al numero que tengan en la primera columna ejemplo:
valoracion unidades fecha
2 256 10/12/05
3 845 10/12/05

y el color lo ponga conforme el numero
si es 2=rojo
si es 3=azul

ya lo intento haciendo con clases pero aun asi no funciona

si alguien me puede ayudar se lo agradeceria
  Respuesta:  gon zalo
Hola, aqui te adjunto un codigo que muestra como hacerlo:
Private Sub DataGridView1_CellFormatting(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellFormattingEventArgs) Handles DataGridView1.CellFormatting

If grdTRA.Columns(e.ColumnIndex).Name = "NOMBRE_DE_COLUMNA" Then
If e.Value IsNot Nothing Then
If e.Value.ToString = "1" Then e.CellStyle.BackColor = Color.Red
If e.Value.ToString = "2" Then e.CellStyle.BackColor = Color.Blue
If e.Value.ToString = "3" Then
e.CellStyle.BackColor = Color.Green
e.CellStyle.ForeColor = Color.White
End If
End If
End If
End Sub

saludos

    Pregunta:  58327 - COMO SABER LA RUTA DE LOS TEMPORALES?
Autor:  ariel daedae
Hola a todos. Quria saber si alguien me puede decir como obtener la ruta de la carpeta temporales del explorador que estoy usando (obvio que por codigo) ya que estoy haciendo una aplicacion web que es para complementar a otra que ya tiene la seguridad integrada y lo unico que necesito saber es si ya esta logueado. y lo puedo hacer leyendo una cookie que la aplicacion guarda, pero como se puede usar en distintos navegadores o los usuarios pueden haber cambiado la ruta predeterminada, quiero chequearla desde codigo.
Gracias
  Respuesta:  Leonardo Alfaro A.
Saludos.

En Vb.net, intenta con :

Response.Write(Environment.GetFolderPath(Environment.SpecialFolder.InternetCache))

    Pregunta:  58367 - COMO PONER PUNTO EN VEZ DE COMA
Autor:  Elíxam Carrero
Buenas, llevo unos dias mirando en las P/R y no consigo resolver un problema, para empezar es mi 1 vez que toko VB2005, estoy haciendo una calculadora pero en tema de decimales cuando uso var me funciona usando el punto, el problema es que el resultado se muestra en una label y en esta sale 12,09 en vez de 12.09, leyendo descubri que es por culpa de la region, he probado lo que vi pero no consigo na.. esta es la funcion :
Label25.Text = Val(Label26.Text) * Val(TextBox13.Text)
el problema eske la solucion despues se suma en otra función, provee con CDec pero al borrar el numero el programa petaba.
mi duda es que tengo ke poner para que salga 0.00 en vez de 0,00 sin tocar la region y donde se ha de colocar :Label que sale el resultado o en el TextBox donde se hace la funcion.

os doy las gracias por adelantado por tomaros la molestia de leer esto.
  Respuesta:  Elíxam Carrero
weno me costo lo mio pero lo encontre seria asin:

Imports System.Globalization

Private Sub TextBox1_TextChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Dim oldDecimalSeparator As String = Application.CurrentCulture.NumberFormat.NumberDecimalSeparator

If Not oldDecimalSeparator = "." Then
Dim forceDotCulture As CultureInfo
forceDotCulture = Application.CurrentCulture.Clone()
forceDotCulture.NumberFormat.NumberDecimalSeparator = "."
forceDotCulture.NumberFormat.NumberGroupSeparator = ","
Application.CurrentCulture = forceDotCulture
End If
Label17.Text = Val(Label18.Text) * Val(TextBox1.Text)
End Sub

|<  <<  23 24 25 26 27 28 29 30 31 32 33  >>  >|