Ver Mensaje Individual
  #7 (permalink)  
Antiguo 23/12/2008, 09:27
Avatar de Taribo007
Taribo007
 
Fecha de Ingreso: agosto-2007
Mensajes: 1.338
Antigüedad: 16 años, 8 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