|
1311
|
Programación / Programación Visual Basic / Aquí mi primera aplicación, medianamente seria ^^
|
en: 10 Noviembre 2006, 21:46 pm
|
Descarga Aquí[/b][/size] Bueno, la pongo para que la veais, y me digais que tengo mal y a ser posible como solucionarlo para una nueva versión. Ya se que no es gran cosa, pero como he dicho es mi primera aplicación seria. Contiene: Calculadora Mediadora (para hacer la media, no sabia que nombre ponerle ^^) Por ciento (para calcular el por ciento de algo) Grados (para ver los grados de las escalas Centigrados, Fahrenheit y Kelvin) Proximamente, pondré más cosas y mejores. El color predominante de la aplicación es el verde-negro y un poco de blanco (por lo botones). Desde ya os puedo decir algo que tengo mal y es que la barra de los grados la tengo invertida y no se como cambiarlo. Bueno gracias
|
|
|
1314
|
Media / Multimedia / Re: problema nero vision
|
en: 10 Noviembre 2006, 15:06 pm
|
Nada, me he reinstalado los codecs y sigo igual... 01001101 01100001 01101100 01100100 01101001 01110100 01101111 01110011 00100000 01100001 01101100 01100101 01101101 01100001 01101110 01100101 01110011.... que podrá ser?
|
|
|
1315
|
Media / Multimedia / Re: problema nero vision
|
en: 10 Noviembre 2006, 14:50 pm
|
Es un avi, en DivX, normal y corriente, de casi 700 MB (como una pelicula mas o menos normal) y que más... pues pone que es un clip de video. Lo que mas me ha extrañado y j0d1d0 es que no me dice, error por esto..., sino, me da una afirmación. Bueno, aquí pongo la foto: Bueno, voy a probar reinstalando todos los codecs, auque no tengo mucha esperanza. A la pregunta de que si se me puede ver y oir bien, respondo que sí, y perfectamente. Gracias, Saludos
|
|
|
1316
|
Media / Multimedia / problema nero vision
|
en: 10 Noviembre 2006, 08:11 am
|
No me deja añadir peliculas, no se porque, porque si meto un vidoe de 2 min y medio, a la hora de meterlo antes de grabar, si que me deja, pero peliculas no.
¿Por que puede ser?
Gracias
|
|
|
1317
|
Programación / Programación Visual Basic / Re: Barritas de colores RGB para cambiar el color del nombre y fondo de un label
|
en: 9 Noviembre 2006, 22:48 pm
|
Venga, alfin descubrí, con muchas vueltas sacarlo yo solo ^^. Aquí todo el código: Option Explicit Public Brojo, Bverde, Bazul As Integer Public Frojo, Fverde, Fazul As Integer
Private Sub Salir_Click() End End Sub
Private Sub Form_Load() Brojo = 0 Bverde = 0 Bazul = 0 Frojo = 255 Fverde = 255 Fazul = 255 Label1.BackColor = RGB(Brojo, Bverde, Bazul) Label1.ForeColor = RGB(Frojo, Fverde, Fazul) End Sub
Private Sub Barra1_Change(Index As Integer) If OptColor(0).Value = True Then Label1.BackColor = RGB(Barra1(0).Value, Barra1(1).Value, Barra1(2).Value) Dim i As Integer For i = 0 To 2 Text(i).Text = Barra1(i).Value Next i Else Label1.ForeColor = RGB(Barra1(0).Value, Barra1(1).Value, Barra1(2).Value) For i = 0 To 2 Text(i).Text = Barra1(i).Value Next i End If End Sub
Private Sub OptColor_Click(Index As Integer) If Index = 0 Then Frojo = Barra1(0).Value Fverde = Barra1(1).Value Fazul = Barra1(2).Value Barra1(0).Value = Brojo Barra1(1).Value = Bverde Barra1(2).Value = Bazul Else Brojo = Barra1(0).Value Bverde = Barra1(1).Value Bazul = Barra1(2).Value Barra1(0).Value = Frojo Barra1(1).Value = Fverde Barra1(2).Value = Fazul End If End Sub
|
|
|
1318
|
Programación / Programación Visual Basic / Re: Barritas de colores RGB para cambiar el color del nombre y fondo de un label
|
en: 9 Noviembre 2006, 21:32 pm
|
Si, en parte tenia eso el problema, que no ponia bien el nombre de los objetos, pero no por un descuido mio, si no por que tenia que crear una matriz de nosequé, para poder poner el mismo nombre a varias cosas, ya me entienden.
Ahora me falla una cosa, que no se que quiere decir,
Cuando le doy a iniciar, para ver el proyecto que he creado, me dice:
Error de compilación, procedimiento Sub o Función, no definido.
Y se me pone en amarillo esto:
Private Sub OptColor_Click(Index As Integer)
¿Que me puede fallar?
Gracias, saludos
|
|
|
|
|
|
|