pegar formato en RTB
Publicado por ASTERIX (26 intervenciones) el 05/01/2006 21:05:13
EL CODIGO Q USO ES:
Function copiar_sel()
Clipboard.Clear
Clipboard.SetText txt_msg.SelText, vbCFRTF
End Function
Function pegar_sel()
txt_msg.SelText = Clipboard.GetText(vbCFRTF)
End Function
Function copiar_sel()
Clipboard.Clear
Clipboard.SetText txt_msg.SelText, vbCFRTF
End Function
Function pegar_sel()
txt_msg.SelText = Clipboard.GetText(vbCFRTF)
End Function
Valora esta pregunta


0