23/12/2008, 09:27
|
| | | Fecha de Ingreso: agosto-2007
Mensajes: 1.338
Antigüedad: 17 años, 3 meses Puntos: 18 | |
Respuesta: duda sobre superindices en access Pero el codigo que te he puesto te sirve para una etiueta, un cuadro de texto..., pero no para una tabla. Si siempre es el ultimo, seria asi:
Private Sub EncabezadoDelInforme_Format(Cancel As Integer, FormatCount As Integer)
Dim nCnt
With Me
.CurrentX = .Etiqueta6.Left
.FontName = "Arial"
For nCnt = 1 To Len(.Etiqueta6.Caption) - 1
.CurrentY = .Etiqueta6.Top
.FontSize = 12
Print ; Mid(.Etiqueta6.Caption, nCnt, 1);
Next
nCnt = Len(.Etiqueta6.Caption)
.CurrentY = .Etiqueta6.Top - 100 'desplazamiento arriba
.FontSize = 8
Print ; Mid(.Etiqueta6.Caption, nCnt, 1);
End With
End Sub
Un saludo |