Autor
), weno de echo, ya solo me falta solucionar los errores que me da el VB cuando cancelo la operación de abrir o guardar como 
En mi editor utilizo un menú (creado con menú editor) para abrir estos controles. Digo que utilizó un menú porque con commandbuttons no me pasa, lo que me lleva a pensar que el problema puede estar en alguna propiedad. Pero la propiedad de CancelError está a false (el número de error es diferente).Los errores al cancelar las operaciones de showopen y showsave están en la misma línea (al menos eso dice el depurador...).
Al abrir...
Código:
Open CD1.FileName For Input As #1
Al guardar...
Código:
Open CD1.FileName For Output As #1
Hace poco que empecé con vb, tal vez el fallo sea obvio
Después me gustaría crear un combobox mediante el cual el tamañao de la letra de un textbox cambiase según el número de letra que se eligiera (se que se puede hacer con la propiedad .showfont de un commondialog, esto ya lo hago más por aprender qu epor otra cosa, xd). Para ello se me ocurrió utilizar la sentencia case, la cual no la conozco muy bien pero pensé que sería capaz de hacerlo
La sentencia If tampoco funcionó...Pensé que sería algo como esto:Código:
Dim i As Integer
For i = 12 To 20 'En realidad solo tengo las fuentes en los tamaños 12, 16, y 20
Next i
Select Case List
Case 12
txtbox.Font.Size = 12
Case 16
txtbox.Font.Size = 16
Case 20
txtbox.Font.Size = 20
End Select
La cosa me extraño porque mediante un menú creado con el menú editor si funcionó:
Código:
Dim i As Integer
For i = 0 To 2
Next i
Select Case Index
Case 0
txtbox.Font.Size = 10
Case 1
txtbox.Font.Size = 12
Case 2
txtbox.Font.Size = 14
End Select
Lo bueno es que mediante el menú podía crear una matriz de controles mediante la propiedad index, pero en el combobox la única forma de hacer referencia a los elementos de list (es con esta propiedad, eso CREO).
Os estaría agradecidos si me hechaseis un cable con esto
Gracias. Salu2!
En línea
+ 
= SOLUCIÓN
