Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - Edu

#941
Me faltan mas cosas pero voy dejando aca, desp voy modificando este post:

Código (vb) [Seleccionar]

Option Explicit

Function uCaseCorrect(txt As String) As String

Dim sFrase As String, sText As String
Dim pos As Long, i As Long, k As Long
Dim signo(4) As String
signo(0) = "¡": signo(2) = "."
signo(1) = "¿": signo(3) = "!": signo(4) = "?"

sText = UCase$(Left$(txt, 1))
sFrase = sText & Mid$(txt, 2)
uCaseCorrect = sFrase

For i = 0 To 4
If InStr(1, sFrase, signo(i)) <> 0 Then
k = 1
Do
pos = InStr(k, sFrase, signo(i))
While Mid$(sFrase, pos + 1, 1) = " "
pos = pos + 1
Wend
sText = UCase$(Mid$(sFrase, pos + 1, 1)) & Mid$(sFrase, pos + 2)
sFrase = Left$(sFrase, pos) & sText
k = k + 1
Loop While InStr(k, sFrase, signo(i)) <> 0
End If
Next i

uCaseCorrect = sFrase

End Function

Private Sub Form_Load()

Debug.Print uCaseCorrect("¡hola! ¿como andas? espero que bien che!!!   Que pases bien entonces. chau. bye!")

End Sub


Salida:

Citar
¡Hola! ¿Como andas? Espero que bien che!!!   Que pases bien entonces. Chau. Bye!
#942
Ja grcaias, aunque el debug.print no me aparece, me faltara agregar una referencia.. y no se cual es
#943
Bueno yo dejo la mia, como siempre 0 profesional xD pero bue.. talvez es la forma mas facil y eso es bueno no se.

EDITADOOO: Me dedico a otra cosa mejor mientras.. xD
#944
Pero Frog, en el coso q pasaste es porq dice un Nombre xD, voy a ver si puedo hacer este reto aunquesea xD
#945
Ni idea si anda porq es la primera vez q hago un reto y no supe como probarlo sin perder tanto tiempo xD
Solo lo traduci a C# para no dejarte solo xD

Código (csharp) [Seleccionar]

List<string> ListDir(string StrPath)
        {
            DirectoryInfo dir = new DirectoryInfo(StrPath);
            List<string> list = new List<string>();
            foreach (DirectoryInfo subdir in dir.GetDirectories())
            {
                list.Add(subdir.FullName);
           
            }
            return list;
        }
#946
Usa archivos .ini para guardar tu informacion, todos los programas hacen eso, o sino modifican el registro
#947
Bueno estoy haciendo un Notepad q contendra Plugins para asi agregarle opciones buenas cuando quiera, y me han ayudado muchisimo pero tengo un error q no se de donde sera, lo q quiero es si alguien puede verlo tranquilamente y aunque no encuentre el error q me aconseje, o q me corriga otras cosas, o talvez me da otras ideas no se..
Espero q esten muy aburridos para q me ayuden xD

Aca les dejo: http://www.megaupload.com/?d=N49ZQY4E

Desde ya Gracias!
#948
Vengan a Uruguay, q no pasa nada de eso y si pasa nadie se da cuenta xD jajaj
#949
Cuantas pc son? 100, 200? xD con q se puedan controlar mirando q hace cada uno listo, aca en el colegio si te ven reiniciando la pc (para descongelar la pc por ejemplo como dicen) te dicen de todo xD, la idea no es un programa sino poner un cartel bien grande q diga "Aca vienen a estudiar, no se bajen nada de internet y no entren a lugares de chat online, el q no cumpla eso sera expulsado y no podra entrar mas" Simple y efectivo ;)
#950
Hay programas para particionar creo q seria mejor q busques esos programas