Mensajes

Wenas gracias por las respuestas.

cuantos modulos de ram tienes??? si tienes dos deja solo uno y ponlop rimero en una ranura luego en otra, tienes tarjeta de video???

otra cosa revisa que el dicipador este bien fijo a la mobo y el micro bien fijo al zocalo...

Nop la placa es integrada, no uso tarjeta grafica, al parecer segun me comentaron unos compañeros pueda que sea la Fuente que no le esta pasando energia como deberia de ser, pero todavia no lo pruebo con otra fuente voy a intentar luego comento como me va.

Gracias de todas formas. Salu2.

Hola, buenos dias, tengo un problema con una pc, les cuento, cada vez que orendo la pc, no pasa las señal al monitor no respond el monitor, pero el CPU normal pareciera que funcionace de lo mas normal y lo dejo asi no mas unos minutos y resien pasa la señal monitor y recien puedo iniciar sesion como sin nada, la verdad no se cual pueda ser el problema.

PD: probe el HDD, y la memoria RAM en otra pc y esta de lo mas normal, creen ustedes que pueda ser la placa?, otra cosa al tenerlo un rato la pc encendida se pone una luz roja alli no mas sin parpadear, cuando resien le pasa señal al monitor resien enpiesa a parpadear la lucesita...

Espero me ayuden en este problemita. Salu2

Uhmm se esta maliando el foro, de Visual 6, miren bien arribita esta el sub-foro de .Net

[imposible]

Impresionante!!!!  Leandro, parece ser que para ti no exite la palabra imposible 

probastes con el Format, weno seria asi:

Código (vb) [Seleccionar] Expandir

Text1.Text = Format(Text1.Text,"#######.00")

Checate esto Man: http://www.recursosvisualbasic.com.ar/htm/tutoriales/tutorial-basico5.htm

[": P"]

wenas wenas tengo un problemilla con las apis del MSN, estaba probando este pedaso de code:

Código (vb) [Seleccionar] Expandir

Option Explicit

Public WithEvents MSN As Messenger

Private Sub Command1_Click()
 
   MSN.OptionsPages 0, MOPT_GENERAL_PAGE
   SendKeys (Text1.Text & "{ENTER}")

End Sub

Private Sub Form_Load()

   Set MSN = New Messenger

End Sub

lo que hace es cambiar de nick al msn ok, hasta alli todo bien, el problema es cuando trato de ponerle iconos al nick pero no con todos tengo problema por ejemplo si ingreso esta combinacion ": P" normal me funka pero si ingreso esta combinación ": )" alli me lanza un error, luego si ingreso "(H)" solo me muestra la H, eh no se si algunos de estudes el porque de este error???

Salu2....

wenas yo tengo el win 7 de 32 bits y instale el VB sin problemas pero luego kise actualizar el VB al ServiPack 6 pero me lanza error no me deja instalarlo el ServiPack no se si a alguien le ah pasado eso???? 

xD si tenia pensado hacer asi, pero queria saber si hay de otra forma de todas maneras gracias por tu respuesta...

Slu2...

[Console.Clear]

wenas como estan, eh estoy empesando a ver visual basic, pero por ahora estoy viendo en modo consola y weno stava asiendo unos ejemplos para poder ver algunas cosillas y me tope con un problema es sobre Console.Clear, tengo entendido que para limpiar la pantalla ok, pero al utilizar el Console.Clear, me limpia lo que queda de arriba y solo me deja lo que hay debajo de Consolo.Clear y no es lo que deseo weno lo que queria hacer era esto.



como veran por cada operacion que realizo, ¿pregunta si desea probar con otra operacion si al darle Si entonces que me limpie la operacion realizada anteriormente y que el cursor se posicione en donde Seleccione Opcion: stava viendo la ayuda pero no logro hacerlo si alguien me puede orientar seria de gran ayuda...

Código (vb) [Seleccionar] Expandir

Module Module1

    Sub Main()
        Dim Num1 As Integer, Num2 As Integer
        Dim Opcion As Integer, Resultado As Double

        Console.ForegroundColor = ConsoleColor.Red : System.Console.WriteLine("")
        System.Console.WriteLine("          Operaciones de Matematicas Básicas")
        System.Console.WriteLine("          ==================================")

        System.Console.WriteLine("") : System.Console.WriteLine("") : Console.ResetColor()

        Console.ForegroundColor = ConsoleColor.Green
        System.Console.WriteLine("   [1] Suma")
        System.Console.WriteLine("   [2] Resta")
        System.Console.WriteLine("   [3] Multiplicación")
        System.Console.WriteLine("   [4] División")
        System.Console.WriteLine("   [5] Potencia")
        System.Console.WriteLine("   [6] Salir")
        Console.ResetColor() : System.Console.WriteLine("") : System.Console.WriteLine("")

        System.Console.Write("                              Seleccione Opción: ") : Console.ForegroundColor = ConsoleColor.Green : Opcion = Console.ReadLine : Console.ResetColor()

        System.Console.WriteLine("") : System.Console.WriteLine("")

        Select Case Opcion
            Case 1
                System.Console.WriteLine("   ++++++++++++++++++++++++++++++++++++++++++++++++")
                System.Console.WriteLine("   | Operación de Suma                            |")
                System.Console.WriteLine("   ++++++++++++++++++++++++++++++++++++++++++++++++")
                System.Console.WriteLine("")

                System.Console.Write("   Sumando 1: ") : Num1 = Console.ReadLine
                System.Console.Write("   Sumando 2: ") : Num2 = Console.ReadLine
                System.Console.WriteLine("")

                Resultado = Val(Num1 + Num2)

                System.Console.Write("   La suma es      :" & Str(Resultado))

            Case 2
                System.Console.WriteLine("   ++++++++++++++++++++++++++++++++++++++++++++++++")
                System.Console.WriteLine("   | Operación de Resta                           |")
                System.Console.WriteLine("   ++++++++++++++++++++++++++++++++++++++++++++++++")
                System.Console.WriteLine("")

                System.Console.Write("   Ingrese Minuendo  : ") : Num1 = Console.ReadLine
                System.Console.Write("   Ingrese Sustraendo: ") : Num2 = Console.ReadLine
                System.Console.WriteLine("")

                Resultado = Val(Num1 - Num2)

                System.Console.Write("   La diferencia es  :" & Str(Resultado))

            Case 3
                System.Console.WriteLine("   ++++++++++++++++++++++++++++++++++++++++++++++++")
                System.Console.WriteLine("   | Operación de Multiplicación                  |")
                System.Console.WriteLine("   ++++++++++++++++++++++++++++++++++++++++++++++++")
                System.Console.WriteLine("")

                System.Console.Write("   Ingrese Multiplicando : ") : Num1 = Console.ReadLine
                System.Console.Write("   Ingrese Multiplicador : ") : Num2 = Console.ReadLine
                System.Console.WriteLine("")

                Resultado = Val(Num1 * Num2)

                System.Console.Write("   El Producto es        :" & Str(Resultado))

            Case 4
                System.Console.WriteLine("   ++++++++++++++++++++++++++++++++++++++++++++++++")
                System.Console.WriteLine("   | Operación de División                        |")
                System.Console.WriteLine("   ++++++++++++++++++++++++++++++++++++++++++++++++")
                System.Console.WriteLine("")

                System.Console.Write("   Ingrese Dividendo: ") : Num1 = Console.ReadLine
                System.Console.Write("   Ingrese Divisor  : ") : Num2 = Console.ReadLine
                System.Console.WriteLine("")

                Resultado = Val(Num1 / Num2)

                System.Console.Write("   El Cociente es   :" & Str(Resultado))

            Case 5
                System.Console.WriteLine("   ++++++++++++++++++++++++++++++++++++++++++++++++")
                System.Console.WriteLine("   | Operación de Potencia                        |")
                System.Console.WriteLine("   ++++++++++++++++++++++++++++++++++++++++++++++++")
                System.Console.WriteLine("")

                System.Console.Write("   Ingrese Base          : ") : Num1 = Console.ReadLine
                System.Console.Write("   Ingrese Exponente  : ") : Num2 = Console.ReadLine
                System.Console.WriteLine("")

                Resultado = Val(Num1 ^ Num2)

                System.Console.Write("   La Potencia es   :" & Str(Resultado))

            Case 6
                If MsgBox("Esta seguro que desea sali??", MsgBoxStyle.Question + vbYesNo, "Operaciones Matematicas") = 6 Then
                    End
                End If
            Case Else
                MsgBox("El número ingresado esta fuera del rango", MsgBoxStyle.Critical, "Operaciones Aritmeticas")

        End Select

        System.Console.ReadLine()
    End Sub

End Module

wenas necesito desplazarme por el DataCombo al presionar los botones que remarque abajo y a la vez se deslize lo que hay en el combo osea que me seleccione los item que hay en el DataCombo....



Para los botones utilize este codigo.

Código (vb) [Seleccionar] Expandir

Private Sub CmdMov_Click(Index As Integer)
    Select Case Index
        Case 0
            RSTIdentifi.MoveFirst
            MsgBox "Principio de la Lista", vbCritical, "Reparaciones"
        Case 1
            RSTIdentifi.MovePrevious
            If RSTIdentifi.BOF Then
                RSTIdentifi.MoveFirst
            End If
        Case 2
            RSTIdentifi.MoveNext
            If RSTIdentifi.EOF Then
                RSTIdentifi.MoveLast
            End If
        Case 3
            RSTIdentifi.MoveLast
            MsgBox "Final de la Lista", vbCritical, "Reparaciones"
    End Select
End Sub

Espero su ayuda Salu2..