Conceptos básicos de programación en Visual Basic 6.0 (Parte I)

Buenas!

Hoy les voy a comentar algunas cosas que hay que tener en cuenta a la hora de programar en Visual Basic 6.0.
Es muy importante que uno cuando escriba el código, lo pueda leer cualquiera, hasta alguien que tiene minimos conceptos de programación.

---

Un buen recurso para esto es comentar las líneas del codigo, así, no hay que andar viendo qué es lo que hace cada llamada.

Ejemplo:

'Reproduzco el sonido de clic
Call Audio.PlayMIDI("7.mid")

'Actualizo el tipo de Login
EstadoLogin = E_MODO.Dados

'Estoy usando un socket?
#If UsarWrench = 1 Then
'Si el socket está conectado, lo desconecto y limpo
If frmMain.Socket1.Connected Then
frmMain.Socket1.Disconnect
frmMain.Socket1.Cleanup
DoEvents
End If

'Le damos la ip y puerto al socket
frmMain.Socket1.HostName = CurServerIp
frmMain.Socket1.RemotePort = CurServerPort
'Conectamos
frmMain.Socket1.Connect
#Else
'Si el winsock no está cerrado y preparado, lo cierro.
If frmMain.Winsock1.State <> sckClosed Then
frmMain.Winsock1.Close
DoEvents
End If
'Conectamos el winsock
frmMain.Winsock1.Connect CurServerIp, CurServerPort
#End If

Así cualquiera, con el código completo, y de una mirada rápida, puede saber qué es lo que se hace en cada línea.

---

Otro buen punto, es la indentación, que es tabular el código, diviendolo por estructuras. Se me complica dar un ejemplo acá porque el blog me saca los espacios que sobran, pero les dejo un screen:

Ver Imagen

Acá queda explicito el uso de este recurso.

---

Hay muchos mas :p, por ejemplo:
El uso explícito de modificadores de acceso para evitar inconvenientes y accidentes. ¿Qué es ésto?, lo que va a adelante de todo lo que declares, que dictaminan desde que lugar del código vamos a tener permiso para usarlo. Son los "Public" y "Private".

---

También, es importante, en los parámetros de una función o rutina, que siempre se ponga delante de la variable "ByVal" o "ByRef".
Ahora, ¿qué diferencia hay?

ByVal: Al llamar la rutina, se envía el valor de la variable y se hace una copia de la misma. Al modificar esta variable, NO se modifica la variable origen.

ByRef: Al llamar la rutina, se manda sólo la dirección en la memoria donde está alojada la variable a utilizar. Que es un valor en Hexadecimal, Long de 4 bytes. Al modificar esta variable, se modifica la variable origen.

---

Bueno, espero no haberlos cansado :P y que les haya servido, en estos días subo la segunda parte.

Saludos!

Habilitar uso de temas (msstyles) en Service Pack 3

Hoy, después de haber instalado el parche de Service Pack 3, me di cuenta que había perdido el tema que tenía puesto.
Me puse a investigar, y conseguí un programa que parchea el archivo uxthemes.dll que nos permite usar cualquier tema de escritorio.
Se los dejo, porque es útil y no encontre información acerca de éste tema en internet en español.

Bueno, vamos a la parte práctica :P

Bajamos este programita lindo jaja: LINK

y lo ejecutamos, hacemos clic en "Patch"
reiniciamos la pc
y te descargas algun tema que te guste, y le das doble clic
te aparece en la lista
le das aceptar a la ventana que se nos abre
y ya estamos disfrutando del tema elegido :)



saludosss

Y asi soy yo...

Voy a dejar un código en VB6, para los que les interese mi persona.
Si no te interesa mi persona, podés copiar el código e irte.


Así me siento yo, creo que ésta es mi manera de actuar en la vida. Piensenlo, y si tienen ganas, me cuentan :). Les pido que se tomen la molestia de ver más allá del mensaje.


Mensaje a desencriptar: "DqqktaYjjV_Sd_SY[_K\!,(.1
"
Para los poco atentos, el codigo va sin comillas....

''
' Desencripta un mensaje
'
' @param codigo Mensaje a desencriptar
Private Function DesencriptarMensaje(ByRef codigo As String) As String
'******************************************
'Author: NicoNZ
'Last modified: 06/02/2008
'
'******************************************
Dim i As Long

For i = 1 To Len(codigo)
DesencriptarMensaje = DesencriptarMensaje & Chr$(Val(Asc(Mid(codigo, i, 1)) + i))
Next i
End Function

''
' Encripta un mensaje
'
' @param codigo Mensaje a encriptar
Private Function EncriptarMensaje(ByRef mensaje As String) As String
'******************************************
'Author: NicoNZ
'Last modified: 06/02/2008
'
'******************************************
Dim i As Long

For i = 1 To Len(mensaje)
EncriptarMensaje = EncriptarMensaje & Chr$(Val(Asc(Mid(mensaje, i, 1)) - i))
Next i
End Function

Bueno...

No sirve para ésto el blog, capaz más adelante me copo con algún tema de programación, pero no se... Veré...


¡Gracias por leer!



NOTA PARA LOS BOLUDINES: YA SÉ QUE LA ENCRIPTACIÓN ES UNA CAGADA, PERO ES UNA FORMA QUE YO SIENTO DE REPRODUCIR COMO ME SIENTO.

La valoracion de las cosas en la vida

Que pedaso de poronga, siempre pasa igual.
Les voy a tirar una frase que en la que va a estar basado mi descargo/reflexión.

VALORAR LO QUE TENEMOS ANTES DE DEJAR DE TENERLO

La verdad, que uno que cuando vive la vida, no se da cuenta de las cosas que tiene hasta que deja de tenerlas. Pueden ser cosas, personas, objetos, amores, todo, todo, todo. Y uno cuando tiene sus cosas, se dan cuenta de que valen, muchisimo. Pero nunca es lo justo. Por lo menos a mi, siempre me pasa que cuando pierdo algo, se me va todo a la mierda, pensar que no lo aproveché de la mejor manera. Y eso me enferma la cabeza.

Les voy a dar un ejemplo pelotudo para poder darse cuenta mas o menos de las cosas:

Vivimos la vida tranquilamente en nuestras casas y que pasa, un dia se corta el agua. Bue, no importa diriamos. Pero que pasa, JUSTO, no tenemos esa camisa que tanto nos gusta limpia, o tenemos muy poca ropa limpia, o se cae un vaso de agua o se ensucian los cubiertos y no los podemos lavar. Despues de haber comido milanesas (que obviamente estaban hechas en el freezer porque no teniamos agua como para ensuciar vajilla ni mesada) , se mancha la mesa con ketchup y, ¿que podemos hacer si no tenemos agua? no se, chuparlo. No podes tomar mate, no podes tomar infusiones, no podes lavarte las manos, no podes enjuagarte la cara, no podes lavarte los dientes, no podes bañarte :s, etc, etc, etc. Y asi deben pasar 30 cosas mas que no se me ocurren ahora. Pero, como veremos, el agua es taaaaan importante en nuestras vidas, ahora, ¿la valoramos como se debe?, es comun dejar mal abiertas las canillas, que el pagar $30 x mes sea una molestia por algo que rompe las bolas pagar, y demases.

A partir de este ejemplo, muy sensillo, es como se dan las cosas.
Que se te corte el agua no pasa nada, pero que se valla un ser querido; que tu novia te mande a la mierda porque no la supiste tratar; que se muera tu perro, que te olvidabas de darle de comer y cada vez que le tenias que dar puteabas, y que luego sientas un vacio incomparable, que no tenes esa compañia infaltable.

La verdad es increible, y el ser humano es así, yo creo que es un problema que tenemos todos.
También se podria ver como que esta sensación que sentimos, sea una mera mezcla de dolor. Y no lo se.

Es complicado, no sé. Como todas las cosas de la vida. Espero que te/les haya servido...




NOTA: NO, NO ME PELIE CON MI NOVIA XD

MIX DE VIDEINES

HOY LES DEJO 3 VIDEINES JUGOSOSSS


NOCHE DE REENCUENTRO:



EL CHISTE DE HARRY POTTER:



CUANDO ESTES ACA BY FEGA73:

MIX DE VIDEOS

jajajaa hoy fue un dia de mil videos jaj

no puedo hacer los comentarios rescatados xq son muchos videos y tengo q estudiar jaja


pero weno no importa aca estannn


q tanto los esperabannn



firmen el flog cheee



comenten que les parecieron los videosss




FESTEJITO A LOS DE 5º



BOLUDEANDO POR EL BARRIO - PARTE 1



BOLUDEANDO POR EL BARRIO - CONOCIMOS A MESSI



BOLUDEANDO POR EL BARRIO - VISITANDO A MANU

BoludeaLa - Sociologia

Seeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee

volvio BoludeaLa esta seria SUPER MEGA CENSURADA :(

jaja pero es una fiesta asi q no me resisto a seguir posteando :A


jajaja una fiesta... hoy le hice un agregado, "frases rescatadas", mas abajo van a ver lo que es.

los invito a ver el video y reirse un poco, estabamos con nuestra profe de medidas menores y we, estabamos aburridos y rindio videin ^^



(K)



Link: http://www.youtube.com/v/5sHa-ST9IyI


frases rescatadas:

"si vamos a la fabella?" lea
"mi tio es pirata del asfalto" lea
"segun como se mire todo depende.... ja ja ja" fega
"profe, el viernes un trabesti le quiso pegar a fega" lea
"es verdad" nico
"hay que dormir siesta" nico
"psk, yo que vos me pego un tiro" lea
"una buena sidra para venir a rendir" tin
"que te crees que me llevo materias gratis?" fega
"podemos cobrarle el te a los abuelos para el viaje de egresados?" (los abuelos son de geriatrico) fega
"chamuyuemos una vieja con plata" tin
"si los viejos se mueren todos dps boludo" nico
"no, yo me cague hace rato" tin
"BOLUDA, OJALA QUE TE CORTEN UNA PIERNA Y TE QUEDES INTERNADA" LEA
"se murio boludo" lea
":)" lea
"lea estas vivo?" fega
"-Cuanto es 35 menos 9?
-23. ah no 25.que pelotudo que sos eh. todo queres llevar a eso?" nico
"nico, me voy a morir" lea
"si vas dejar un testamento, un par de dientes al polo que tenes de mas" FEGA JAJAJAJ
"que hijo de puta" nico
"mati no se va a copiar una vez en la vida boludo miralo sakjsdajksdajksda" fega




Y LA YAPA JJAJAJAJAJA NOSE COMO LLEGO ESTO A MI CEL:



Link: http://es.youtube.com/watch?v=tbchN3WpcHc




si te gusto esto, firmame el flog!! http://www.fotolog.com/nico_se

THE YETI MAN

THE YETI VINO AL COLEGIO:


FOTO FOTO FOTO FOTO!

jajaaa



Camara: YO

Test de Cooper

JAJjajajA MUy AL pedoooo xD




prometo que voy a poner algo interesante uno de estos dias :P

Tinchis Come - La saga completa

Les dejo la saga entera de esta serie de boludeces que se mandaron Tinchis y Fega.
Como me hacen cagar de la risa estos 2, es tremendo.

Cap 1:

Link

Cap 2:

Link

Cap 3:

Link

Cap 4:

Link

Cap 5:

Link

Cap 6:

Link

Cap 7:

Link

Cap 8:

Link

La politica, hoy en día para un adolescente de 16 años

Hoy, ya casi con el total de las mesas escrutadas, se ve notoriamente la victoria de CLIGSHTINA (según su marido :) jeje). Según tengo entendido, esta mujer, pertenece al partido "Alianza Frente para la Victoria" que tiene una gran inclinación al peronismo.

Hace un mes, mas o menos, esta señora, se hacía comparar con Eva Duarte (una de las mujeres de Peron), algo, que en mi opinión, me parece desagradable y poco auténtico de una persona. Romper tanto los huevos con que es "Evita" y personificarse en algo que ella solo toma la forma popular, pero quién sabe si ésta persona tiene las mismas convicciones, las mismas metas, la misma forma de pensar, como si juntar todas éstas características en dos personas diferentes, de diferentes épocas y con distintas necesidades, sea tan fácil de coincidir, pero bueno, nunca falta el "chori y la gaseosa" (donde se dejan influir una buena masa de votantes). Si vamos al caso, y nos remontamos a la época de la primer presidencia de Peron, se puede ver, que éstas dos mujeres coinciden en una cosa: hacen TODO por los votos, lo imposible para carle bien a la gente (decir que es EVA DUARTE :S). Y la verdad que es algo que me molesta, y mucho porque la gente se deja llevar por éstas cosas, no toda la gente, pero creo que muchas personas que vivieron la etapa de Peron, que son del "proletariado" y que no tienen una buena formación escolar, se dejan influenciar por esto, y obviamente así: votándola. Otra cosa que se puede apreciar, que la prensa también esta incluida es que como ella es EVA, ¿su esposo quién será? sisi, nuestro amigo Nestor, por un ratito, para jugar a los Power Rangers, toma el papel de el mismo Peron, que ayudaba a los necesitados, le daba trabajo a los mas pobres, etc etc. No estoy muy metido en el tema de la política, y no mucho mas en la gestión de Kirchner, pero por lo que sé es bastante diferente con Peron, que según lo que yo leí de él y su gestión, el tomate no valía $7/$8/$9 el kilo ni la carne salía 15$ el kilo. Tampoco leí que modificaba los índices del INDEC. Me parece que Kirchner se lo tomó demasiado enserio el tema de la industria nacional, tanto que llego al extremo de no poder parar la suba de precios, y fomento tanto la exportación que nosotros masticamos carne-chicle y en toda América se deleitan con nuestros manjares. pero bueno, ¿realmente es EVA PERON y nuestro actual presidente (y no por mucho más) el mismísimo Peron?

No sé. No soy un político, no soy alguien que se dedique a eso, soy solo un adolescente que desde la clase media, presenta su punto de vista. :)

Espero no haber ofendido a ningún amigo peronista :p.

Den su opinión, por favor.

PD: suerte estos 4 años ;).-

NicoNZ.-

Iniciando una nueva etapa

Y si, así parece...

No se porque se me dió por abrir un blog... Creo que tengo ideas para compartir, no se si son racionales o no, pero quiero darlas a la luz, quiero que todos me conozcan un poco más.

Mi gran temor es que nadie lo lea, pero creo que con que 1 persona lo lea, ya cumple su función...

La verdad no se si sirvo mucho para el tema filosófico, y no es el de más agrado, pero a veces esta bueno pensar un poco las cosas más allá y poder relajarse...

Espero que me ayude a crecer un poco mas en mi vida, y bue.. Ya basta de discursos, ahora hay que empezar a pensar, y desde ahí que me den sus opiniones o simplemente lo piensen ustedes para sus propias vidas...

Sin más que decir, me retiro hasta la próxima.

Saludos,

NicoNZ.-
FOTOLOG