GUARDAR NUEVO TAMAÑO Y NUEVO ESTILO DE FUENTE DE UN TEXTBOX
Tengo un problema,se me ha pedido q en 1 aplicación hago algo muy similar a la funcion de word de cambiar el tamaño de la letra y el estilo,o sea cursiva,negrita etc y bueno no me resulto complicado realizar esa accion,el problema vino al guardar ese texto con diferentes tamaños/estilos, q al guardarlo pues me los guarda con la fuente y el estilo pre-determinado y desearia que se pudiera mostrar los registros tal y como los guardo
actualmente tengo algo asi:
tamaño = tam10.Caption
Texto18.SelFontSize = tamaño
y lo mismo para los otros tamaños, y al guardar lo tengo como:
Ejecuta_Comando ("Insert into tablaprincipal1(Id,Tipoconsulta,Palabraclave,Resolucion,Fecha)values(" & Texto0 & ",'" & Combo7 & "','" & Texto5 & "','" & TEXTO18.TEXT & "', #" & CDate(Texto11) & "#)")
Y LA VEERDAD ES Q NO HAYO LA FORMA DE PODER GUARDAR ADECUADAMENTE LOS CAMPOS,SI ME PODRIAS AYUDAR,SI ME CONTESTAIS AL CORREO MEJOR Q MEJOR
GRACIAS
actualmente tengo algo asi:
tamaño = tam10.Caption
Texto18.SelFontSize = tamaño
y lo mismo para los otros tamaños, y al guardar lo tengo como:
Ejecuta_Comando ("Insert into tablaprincipal1(Id,Tipoconsulta,Palabraclave,Resolucion,Fecha)values(" & Texto0 & ",'" & Combo7 & "','" & Texto5 & "','" & TEXTO18.TEXT & "', #" & CDate(Texto11) & "#)")
Y LA VEERDAD ES Q NO HAYO LA FORMA DE PODER GUARDAR ADECUADAMENTE LOS CAMPOS,SI ME PODRIAS AYUDAR,SI ME CONTESTAIS AL CORREO MEJOR Q MEJOR
GRACIAS
