Ajuste de texto de control de etiqueta en VB

Categoría: Computadora/Red gt; Programación gt; Otros lenguajes de programación

Descripción del problema:

Cómo hacer el control de etiquetas en VB El texto está ajustado.

Estoy llamando a un registro en la tabla desde la base de datos, pero se desconoce la longitud, por lo que cuando excede una cierta longitud, los siguientes no se pueden ver. ser de cierta longitud cambio de línea, por favor dé un consejo, ¡¡¡gracias!!!

Análisis:

Halo, la respuesta del vicepresidente ~~````Es mejor ir. home~~`````

La etiqueta se puede ajustar en línea. Establezca la propiedad AutoSize de la etiqueta en Verdadero y luego divida la cadena de registro de la base de datos Str1 en longitudes especificadas. Para el control Etiqueta, puede usar. el carácter de salto de línea Vbcrlf~~~``

El código es el siguiente:

Str1 = "TryTryString Estos son datos de prueba" 'Str1 es un registro de la base de datos

Dim BlockStrLen As Integer

BlockStrLen = 2 'La longitud del bloque de caracteres, aquí establecida en 2

Label1.Caption = ""

Hacer mientras Len(Str1) gt; BlockStrLen

Título1.Caption amp; Str1) - BlockStrLen)

Bucle

Label1.Caption = Label1.Caption amp Str1

¡El programa anterior pasó bajo XP+VB6.0! !