SoloCodigo

mmmmm ya dejen de discutir por algo que no va al caso van a espantar a marius jejejejeje va a decir si por una cosita de nada discuten mejor no vuelvo no discutan por algo que no va al caso todos sabemos que en vb no podemos hacer cosas muy profundas pero se pueden hacer cosas que en otros lenguajes te llevarias 3 veces mas en lineas de codigo. eso es todo y que ahi pare ok jeje  

PD mejor hagan algo de mas provecho que discutir y ayudenme en mi post que deje en vb jejejejeje plz    

X.Cyclop Escrito el Julio 23, 2006 09:04 pm
  QUOTE (leandrog @ Julio 23, 2006 08:38 pm)
Uuuuuy bueno con este y con cualquier lenguaje puesdes hacer lo que sea... como dijo alguien por alli en un Post anterior, "El limite lo pone el programador, no el lenguaje", de verdad puedes hacer lo que quieras, siempre y cuando tengas las ganas de hacerlo y mucha creatividad 


No. Si quiere hacer cosas a bajo nivel, con Visual Basic NUNCA le saldrán. Así que el límite lo pone el lenguaje, no el programador. 

Discrepo un poco esto es un caso de quien fue primero el huevo o la gallina, se puede decir que estas hablando con un dato que es el de visual, pero si hablaras de c++? que dirias, en este caso es mas un "depende", de que depende? del lenguaje que uses y de que mas de la calidad de programador que seas

Hola Marius Bienvenido

pues bueno primero que nada si dices que no sabes nada de programación te dire, que no estaria mal empezar a buscar cosas que desarrollen logica porque la vas a necesitar, sin ella no haras nada, no te puedo decir nada mas porque te van a dar una clase de programación jejeje asi q ahi te enseñaran lo basico para poder empezar a programar, lo mejor hubiese sido que te hubiesen empezado a enseñar con c porque es un lenguaje estructurado y que te da las pautas para agarrarle a los demas lenguajes pero ni modo jejeje, ahora por lo que respecta a lo que puedes hacer con ese lenguaje, pues ahi una frase que dice que los limites los haces tu, es decir q en el lenguaje podras hacer una infinidad de cosas siempre y cuando tengas imaginacion jejeje, por ultimo algo que si nunca vas a poder hacer en vb es programa multiplataforma ya que los proyectos que desarrolles solo podran ser corridos en windows y con pc's que tengan las librerias adecuadas para correr tus proyectos  

Me refiero a que hubiese habido una serie de preguntas y si tienes tantas preguntas con verdadero digamos, tienes tanto valor y ese valor equivale  a una respuesta x ejemplo. jejejeje

jejejejeje yo creo q alguien quiere ser moderador jejejeje de un foro de matematicas   y busca apoyo jijijijiji, sin animos de ofender ni molestar eh

Que es lo que ya llevas hecho?,  porque no lo quieres todo verdad ? que es en lo que tienes dudas? o que te causa error  

http://foros.solocodigo.com/index.php?showtopic=5710

a lo que me refiero es que puedes hacer que la base de datos sea de solo lectura y oculta lo que en cierta forma te ayudaria a esconder tu base de datos, y en el momento que quieras hacer uso de ella cambies sus propiedades y al final cuando termines de usarla la vuelvas a poner en el estado inicial.


FileSystem.SetAttr rutadelabase, vbReadOnly + vbHidden 'Esto para ocultar tu base y hacerla solo lectura
FileSystem.SetAttr rutadelabase, vbNormal 'Para poderla usar

Dim x1 As String, x2 As String, cadena As String, s As Byte, m As Byte, h As Byte
Private Sub Command1_Click()
s = 0: m = 0: h = 0
x1 = "05:10:53"
x2 = "23:22:09"
s = Val(Right(x1, 2)) + Val(Right(x2, 2))
If s >= 60 Then s = s - 60: m = m + 1
m = m + Val(Mid(x1, 4, 2)) + Val(Mid(x2, 4, 2))
If m >= 60 Then m = m - 60: h = h + 1
h = h + Val(Left(x1, 2)) + Val(Left(x2, 2))
cadena = h & ":" & m & ":" & s
MsgBox cadena
End Sub

Espero sea lo q necesites  

yo hice uno para vb pero bien corrienton, espero te sirva

Public Function Nombra(ByVal num As Single, ByVal numfijo As Double) As String
num = Format(num, "00.00")
numletra = num \ 1000
If numletra > 0 And numletra < 21 Then
    letras = letras & compara(numletra) & " MIL"
    num = num - (numletra * 1000)
End If
If numletra > 20 Then
    temp = numletra
    If numletra > 20 And numletra < 30 Then
        numletra2 = Val(Right(numletra, 1))
        letras = letras & "VEINTI" & compara(numletra2) & " MIL"
    Else
        numletra2 = Val(Right(numletra, 1))
        numletra = numletra - Val(Right(numletra, 1))
        letras = letras & compara(numletra) & " Y " & compara(numletra2) & " MIL"
    End If
    numletra = temp
    num = num - (numletra * 1000)
End If
numletra = num \ 100
If numletra > 0 Then
    If numletra = 1 Then
        If num = 100 Then
            numletra = 100
            letras = letras & " " & compara(numletra)
            numletra = 1
        Else
            letras = letras & " CIENTO"
        End If
    Else
        If numletra = 5 Then
            letras = letras & " QUINIENTOS"
        ElseIf numletra = 9 Then
            letras = letras & " NOVECIENTOS"
        ElseIf numletra = 7 Then
            letras = letras & " SETECIENTOS"
        Else
            letras = letras & " " & compara(numletra) & "CIENTOS"
        End If
    End If
    num = num - (numletra * 100)
End If
num = Val(Left(num, 2))
numletra = num \ 1
If numletra > 0 Then
    temp = numletra
    If numletra > 0 And numletra <= 20 Then
        letras = letras & " " & compara(numletra)
    End If
    If numletra > 20 And numletra < 30 Then
        numletra2 = Val(Right(numletra, 1))
        letras = letras & " VEINTI" & compara(numletra2)
    ElseIf numletra > 29 Then
        numletra2 = Val(Right(numletra, 1))
        If numletra2 = 0 Then
            numletra = numletra - Val(Right(numletra, 1))
            letras = letras & " " & compara(numletra)
        ElseIf numletra2 = 1 Then
            numletra = numletra - Val(Right(numletra, 1))
            letras = letras & " " & compara(numletra) & " Y UN"
        Else
            numletra = numletra - Val(Right(numletra, 1))
            letras = letras & " " & compara(numletra) & " Y " & compara(numletra2)
        End If
    End If
    num = num - (numletra * 100)
End If
numfijo = Format(lbltotven, "00.00")
Nombra = letras & " PESOS " & Right(numfijo, 2) & " / 100 M.N."
End Function

Public Function compara(ByVal num As Single) As String
Select Case num
        Case 1
            compara = "UN"
        Case 2
            compara = "DOS"
        Case 3
            compara = "TRES"
        Case 4
            compara = "CUATRO"
        Case 5
            compara = "CINCO"
        Case 6
            compara = "SEIS"
        Case 7
            compara = "SIETE"
        Case 8
            compara = "OCHO"
        Case 9
            compara = "NUEVE"
        Case 10
            compara = "DIEZ"
        Case 11
            compara = "ONCE"
        Case 12
            compara = "DOCE"
        Case 13
            compara = "TRECE"
        Case 14
            compara = "CATORCE"
        Case 15
            compara = "QUINCE"
        Case 16
            compara = "DIESCISEIS"
        Case 17
            compara = "DIESCISIETE"
        Case 18
            compara = "DIECIOCHO"
        Case 19
            compara = "DIECINUEVE"
        Case 20
            compara = "VEINTE"
        Case 21
            compara = "VEINTIUNO"
        Case 22
            compara = "VEINTIDOS"
        Case 30
            compara = "TREINTA"
        Case 40
            compara = "CUARENTA"
        Case 50
            compara = "CINCUENTA"
        Case 60
            compara = "SESENTA"
        Case 70
            compara = "SETENTA"
        Case 80
            compara = "OCHENTA"
        Case 90
            compara = "NOVENTA"
        Case 100
            compara = "CIEN"
    End Select
End Function

http://yakalike.softonic.com/ie/54151

Espero que alguien mas lo instale, de mientras ya lo instale
 

mmmmm lo dudo, pero me acuerdo que el msn tenia o no se si tiene aun una aplicacion en la que podias ver lo que tu compañero de charla estaba haciendo, claro siempre y cuando aceptara.

<Modificado>

Pero porque no utilizas un programa, como por ejemplo el ultra vnc, o cualquier escritorio remoto

mmmm

X.Cyclop Escrito el Julio 21, 2006 10:11 am
  QUOTE (giomar @ Julio 21, 2006 09:54 am)
Gracias por todos sus comentarios, pueden indicarme como puedo utilizar combinaciones ASCII en un teclado de laptop. 


Busca un poco, no te vas a morir.

http://en.wikipedia.org/wiki/ASCII
http://en.wikipedia.org/wiki/Extended_ASCII 

Lo que esta solicitando giomar es el uso en una lap recurda la ausencia del teclado numerico, puedes hacerlo con Alt + Fn + el numero Ascii, o porque mejor no usas el mapa de carateres que viene en accesibilidad, o por cierto ya probaste con las combinaciones de Alt gr + la tecla donde vienen las flechas?, o shift, ultima cosa prueba en los idiomas que has cambiado con esas 2 combinaciones

Espero haber sido de utilidad