|
|
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mensajes - javierkcjm
26
« en: Lunes 27 de Abril de 2009, 22:25 »
hola amigo, seguramente tu variable la debes de haber creado como privada solo para la clase
debes crear una referencia al objeto creando una nueva instancia de la clase
por ejemplo
dim nuevaclase as new clase
ahi debes poder usar la variable con el objeto nuevaclase
nuevaclase.mivariable=2 ' en caso de ser entera la variable
saludos cordiales
JC
27
« en: Lunes 27 de Abril de 2009, 21:58 »
hola, exactamente vi un combo que muestra 2 columnas en vb6 pero como te dije un combo original la clase base combobox no puede realizar eso, es una ocx un control de usuario creado a partir de un grid y un combo, tendrias que crear un control de usuario el cual tenga una grilla y un combo y mostrar en el espacio del combobox la grilla, o en su defecto bajarte uno y agregarlo a tu proyecto , mira este link http://home.versatel.nl/PatrickO/Html/VisualBasicControls.htmbaja este ocx y agregalo como componente COM y podras usarlo saludos cordiales JC
28
« en: Lunes 27 de Abril de 2009, 19:46 »
hola amigo,
lo que creo que queires hacer es poner varios button y que cada uno represente a un cliente y dar click en uno de ellos y asi ejecutar acciones para ese cliente,
si es asi debes agregar eventos, agrega esta linea antes de el for
Dim evento As New EventHandler(AddressOf clickrb)
luego pones esta linea dentro del for despues del grupo.controlls.add()
AddHandler Radio(i).Click, evento
y luego creas una procedimiento llamado clickrb
Private Sub clickrb(ByVal sender As System.Object, ByVal e As System.EventArgs)
MsgBox(CType(sender, RadioButton).Text)
End Sub
con esto cada vez que des click en un radio button te mostrata el text que tiene
espero haberte ayudado
saludos cordiales
JC
29
« en: Lunes 27 de Abril de 2009, 19:08 »
hola amigo, que un combo muestre 2 columnas, eso estaria fuera del proposito de un combo ,
pero podrias hacerlo creando un control de usuario que tenga 2 combos y lo proogramarias para realizar lo que deseas!!!
saludos cordiales
JC
30
« en: Lunes 27 de Abril de 2009, 17:57 »
Hola amigo ,
cuando creas una clase para poder usarla en otra clase debes referenciar debes importar la referencia hacia la clase asi
imports tuproyecto.tuclase
espero poder ayudarte
saludos Cordiales
JC
31
« en: Jueves 23 de Abril de 2009, 19:38 »
Muchas gracias por tu aportacion. me a servido de gran ayuda lo q pasa es q aora me e encontrado conn un nuevo problema. yo me creo por cada item de la lista varios subitems y me creo columnas para mostrarlos. Pues al crear estos subitems siempre me aparece el una columna extra q es el numero de item empezando a numerar desde 1. este es mi trozo de codigo y me gustaria poder kitarlo o bien poder acceder al texto de los subitems del item seleccionado.
Al hacer esto:
Dim i As Integer
Dim s As String
For i = 0 To ListView1.SelectedIndices.Count - 1
s = ListView1.SelectedItems.Item(i).SubItems(1).ToString
Next
me devuelve a s ="ListViewSubItem: {linea2}"
cuando deberia darme solo linea2.
como puedo hacerlo?
Gracias y un saludo Hola amigo, que bueno que te sirivera el codigo, para resolver el inconveniente que tienes es facil en vez de usar el metodo tostring del subitem usa el text, ya que el tostring transforma el objeto subitem del listview en cadena por eso te sale todo ese cofigo s = ListView1.SelectedItems.Item(i).SubItems(1).Text ahi esto te devolvera en tu caso solo linea2, espero te ayude saludos cordiales JC
32
« en: Miércoles 22 de Abril de 2009, 16:37 »
Hola amigo,
lo que tienes que hacer es programar en el evento MouseUp del tabcontrol ahi preguntar por el tab seleccionador y liberarlo
mira este ejemplo
al igual que tu creo pestañas en tiempo de ejecucion
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
TabControl1.TabPages.Add("Hola")
TabControl1.TabPages.Add("como")
End Sub
y programo el evento del tabcontrol mouseup
Private Sub TabControl1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles TabControl1.MouseUp
If e.Button = Windows.Forms.MouseButtons.Middle Then
TabControl1.TabPages(TabControl1.SelectedIndex).Dispose()
End If
End Sub
y listo, cada vez que des click con la ruedita sobre una pestaña se cierra,ah para que esto funcione el tab q vas a eliminar debe ser el tab actual mostrado es decir que si tienes el tab1 que muestra y das click sobre el tab2 se cierra el tab1, igualmente seria bueno que preguntaras antes de eliminar un tab, ahi es cuestion tuya, espero haberte ayudado
saludos cordiales
JC
33
« en: Miércoles 22 de Abril de 2009, 16:21 »
Hola amigo,
Tienes que saber como funciona internamente el Listview , a diferencia de un combo o una lista que puedes seleccionar un itme a la vez el ListView puede seleccionar varios items , esto hace que el listview guarde en un arreglo los items seleccionados, la propiedad selectedindices guarda los indices seleccionados, la propiedad selecteditems guarda los items seleccionados, entonces con esas propiedades puedes saber cuales items seleccionates
mira este ejemplo:
en el load del formulario pones esto:
ListView1.Items.Add("Hola")
ListView1.Items.Add("como")
ListView1.Items.Add("estas")
ListView1.Items.Add("tu")
en el evento selectedIndex changed pones esto
Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListView1.SelectedIndexChanged
For i As Int16 = 0 To ListView1.SelectedIndices.Count - 1
MsgBox(ListView1.SelectedItems.Item(i).Text)
Next
End Sub
lo que esto hace es mostrarte por mensaje los items seleccionados,espero haberte ayudado a comprender un poco la complejidad de este control..
saludos cordiales
JC
34
« en: Martes 21 de Abril de 2009, 00:07 »
amigo...
cabe decir que el ejemplo que pones si se puede usar java , se puede decir que si y eno por que te digo sto, Visual j# usa la misma sintaxis del java puedes crear aplicacion y servicio en lenguaja java que corra en .net framework pero no puedes crear aplicacion ni servicio que corran el la maquina virtual de java (MVJ) ya que eso es de sun, espero haber aclarado tu duda
saludos cordiales
JC
35
« en: Lunes 20 de Abril de 2009, 23:33 »
hola amigo..
efectivamente el ide del vs se puede utilizar con lenguajes como Visual C++, C#, J#, ASP.NET y VB.NET y actualmente se esta desarrollando actualizaciones para soportar otros tipos de lenguaje, todo depende del tipo de proyecto y lenguaje que vallas a usar al cargar la pantalla de inicio del ide te ay una opcion que dice otros lenguajes ahi podras encontrar los demas lenguajes
saludos cordiales
JC
36
« en: Jueves 16 de Abril de 2009, 19:15 »
hola amigo,
no deberias complicarte tanto creando eventos para lo que quieres hacer, igual es bueno que sepas como crearlos y llamarlos ya que son muy utiles en programacion de objetos.
te recomiendo uses el evento selectionchanged del rtb aqui te pongo el ejemplo
Private Sub texto_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RichTextBox1.SelectionChanged
If (texto.SelectionLength > 0) Then
Me.copiar.Enabled = True
Me.pegar.Enabled = True
Else
Me.copiar.Enabled = False
Me.pegar.Enabled = False
End If
End Sub
saludos cordiales
JC
37
« en: Jueves 16 de Abril de 2009, 19:00 »
mmmmm pasarlo a net entiendo esto
usa el iif
iif(Column2 = 'Some Other Value',column1,0)
saludos cordiales
JC
38
« en: Jueves 16 de Abril de 2009, 16:10 »
 ahhh ok amigo, te dije de la coneccion por que me base en las lineas inlcuidas pero bueno que ya encontrastes el error!!!! te sugeriria no obviar codigo ya que en el mundo de la programacion la linea que tu crees que no da error puede ser la que te este armando toda una guerra en tu codigo..  saludos cordiales JC
39
« en: Miércoles 15 de Abril de 2009, 23:08 »
hola, guiandome por tu codigo haces esto sin obviar ninguna linea critica Dim comando As New OleDb.OleDbCommand
comando.Connection = oConexion
comando.CommandText = actUpdate
comando.ExecuteNonQuery()
oDataSet.Clear()
oDataAdapter.Fill(dt)
MessageBox.Show("Actualizado") tu sql esta bien la falla es que no abres la coneccion antes del executenonquery oConexion.open() comando.ExecuteNonQuery() a diferencia del metodo fill del adaptador no necesita explicitamente abrir la coneccion ya que si esta abierta la usa si no la abre espero ayudarte saludos Cordiales JC
40
« en: Miércoles 15 de Abril de 2009, 22:56 »
hola, por lo que veo tienes problemas de sintaxis Dim str1 As String = "UPDATE VBDotNetShippers " & "SET CompanyName='" & TextBox2.Text & "', " & "Phone='" & TextBox3.Text & "' WHERE ShipperID=" & TextBox1.Text as esto Dim str1 As String = "UPDATE VBDotNetShippers set CompanyName='" & TextBox2.Text & "', Phone='" & TextBox3.Text & "' WHERE ShipperID=" & TextBox1.Text & "'" saludos cordiales JC
41
« en: Lunes 13 de Abril de 2009, 19:25 »
mmm amigo trata de reinstalar el crystal , puede ser problema de diseño ya que el codigo q usas para llamar y crearlo por lo que dices esta bien
saludos cordiales
JC
42
« en: Lunes 13 de Abril de 2009, 19:22 »
amigo,
la intencion de un foro de programacion es discutir problemas relacionados con programacion, por lo que veo es que no tienes problemas mas que no intentas hacer tu mismo el login del formulario , como decia mi abuelo es preferible enseñarte a pescar que darte el pescado,
asi que mi recomendacion es que tu mismo trates de crear el codigo no es mucho aunque no creas lo unico seria crear el procedimiento y llamarlo desde el vb
saludos cordiales
JC
43
« en: Lunes 13 de Abril de 2009, 19:13 »
ya probastes quitando la ultima linea de tu funcion,,!!!!! dvtabla=nothing
saludos cordiales
44
« en: Lunes 13 de Abril de 2009, 18:30 »
lo sacas de esta manera
System.Threading.Thread.CurrentThread.CurrentCulture.NumberFormat.CurrencyDecimalSeparator
ahi sacas el separador decimal de tu configuracion regioanl y si moneas(buscas) en las demas funciones esta el resto de informacion que necesitas
saludos cordiales
JC
45
« en: Lunes 13 de Abril de 2009, 18:23 »
en vb 2005 seria percido a vb 6
tomo como referencia que la coneccion es a sql
Private Function GenerarNumero() As String
Dim cone As New sqlconecction(my.settings.coneccion)
DIm comando as new sqlcommand(cone,"Select max(right(NroFactura,9)) from tblFacturas")
Dim max as int
cone.open
max=comando.ExecuteScalar
cone.close
GenerarNumero = "N-" & Format(max + 1, "000000000")
End Function
46
« en: Lunes 6 de Abril de 2009, 17:42 »
el problema es por que el SelectedValue es una columna no un dato cuando tienes un datasource
la solucion seria q coloques
dim cdepto as string=CStr(Me.cmbDocOrdPag.SelectedValue["NombreDeLaColumna"])
saludos
javier Cedeño
47
« en: Lunes 6 de Abril de 2009, 17:29 »
gracias por tu respuesta, pero si ago eso la carpeta esta abierta y el usuario podria borrar archivos, lo que resolvi fue realizar un web service en el servidor que se encarge de subir el archivo
gracias por tu respuesta
saludos cordiales
48
« en: Lunes 23 de Marzo de 2009, 21:17 »
Amigos Buenas tardes,
tengo un problema, estoy haciendo una aplicacion en vb .net esta consiste en buscar un archivo cualqueira y copiarlo en un servidor ... la cuestion es q mi servidor es un server 2003 obviamente necesita iniciar sesion , la cuestion es como hacer que mi aplicacion inicie sesion y permita copiar el archivo ya que cuando uso el File.Copy o el Network.UploadFile me arroja error!!!????
saludos
|
|
|
Mostrar Mensajes
