Una pregunta sobre programación vb

Cuadro de diálogo público. .

CommonDialog

El control CommonDialog proporciona un conjunto de cuadros de diálogo de operación estándar para operaciones como abrir y guardar archivos, configurar opciones de impresión y seleccionar colores y fuentes. La ayuda también se puede mostrar ejecutando el control del motor de ayuda de Windows.

1. Agregue el control CommonDialog

El control CommonDialog es un control ActiveX. Generalmente, después de iniciar VB, no hay ningún control de cuadro de diálogo común en la caja de herramientas. Para usar el control del cuadro de diálogo, primero debe agregar el control del cuadro de diálogo común en la caja de herramientas. Los pasos son los siguientes:

1) "Proyecto"----->"Partes":

2) Seleccione la pestaña "Control" en el cuadro de diálogo "Partes" y seleccione "Microsoft common Dialog control 6.0" en el cuadro de lista de controles.

3) Haga clic en "Aceptar" y el cuadro de diálogo común se agregará a la caja de herramientas, como se muestra en la siguiente figura:

2. Seis cuadros de diálogo estándar proporcionados por el control CommonDialog

1.

Incluyendo cuadros de diálogo "Abrir" y "Guardar como".

2. Utilice el cuadro de diálogo "Color"

3 Utilice el cuadro de diálogo "Fuente"

4. p>

5. Utilice el cuadro de diálogo "Ayuda"

El cuadro de diálogo que muestra el método

ShowOpen muestra el cuadro de diálogo "Abrir"

ShowSave muestra el cuadro de diálogo "Guardar como"

ShowColor Muestra el cuadro de diálogo "Color"

ShowFont Muestra el cuadro de diálogo "Fuente"

ShowPrinter Muestra el " Cuadro de diálogo "Imprimir" o "Opciones de impresión"

ShowHelp llama al motor de ayuda de Windows

Se presentarán por separado a continuación.

3. Mostrar el cuadro de diálogo del archivo

Los cuadros de diálogo "Abrir" y "Guardar como" se pueden mostrar utilizando los métodos ShowOpen y ShowSave del control CommonDialog.

Ambos cuadros de diálogo se pueden utilizar para especificar la unidad, el directorio, la extensión del archivo y el nombre del archivo. Una conversación Guardar como es similar a una conversación abierta, excepto que la conversación tiene un título diferente.

(1). Pasos para mostrar los cuadros de diálogo "Abrir" y "Guardar como":

1. Cree un control CommonDialog en el formulario:

2. Seleccione el control CommonDialog en el formulario y haga clic derecho:

3 Seleccione "Propiedades" y aparecerá la "Página de propiedades":

Entre ellas:

1). Título del cuadro de diálogo: Es el título de los cuadros de diálogo "Abrir" y "Guardar como".

2) Nombre del archivo (FileName): el nombre del archivo seleccionado por el usuario en los cuadros de diálogo "Abrir" y "Guardar como".

3), Filtro: se utiliza para determinar el tipo de archivos que se muestran en el cuadro de lista de archivos. El valor del atributo puede ser un conjunto de elementos o varios conjuntos de elementos separados por símbolos "|" que representan diferentes tipos de archivos.

4), ruta de inicialización (InitDir): retorno inicial o directorio de archivos establecido. Se utiliza para especificar el directorio inicial para el cuadro de diálogo Abrir o Guardar como. Si no se especifica esta propiedad, se utiliza el directorio actual.

(2) Ejemplos

1. La interfaz se muestra a continuación:

2. Configuración de atributos:

Se puede encontrar en Página "Propiedades", o puede configurarla en la ventana de código.

Establecer en la "Página de propiedades":

Establecer en la ventana de código:

Opción explícita

Subcomando privado1_Click()

En caso de error, Ir a kk

CommonDialog1.ShowOpen

Imagen1.Picture = LoadPicture(CommonDialog1.FileName)

kk:

End Sub

Sub privado Form_Load()

CommonDialog1.FileName = "*.bmp"

CommonDialog1.Filter = "Imágenes (*.bmp) )|*.bmp|Todos los archivos (*.*)|*.*"

CommonDialog1.InitDir = "d:\tu"

End Sub

3. Efecto de ejecución:

Ejemplo 2. Abra y guarde el archivo de texto.

1. Diseño de interfaz:

2 Código:

Opción explícita

Subcomando privado1_Click()

Dim str1 como cadena

En caso de error, Ir a kk

CD1.Filter = "(*.txt)|*.txt|(*.*)|*.*"

CD1.InitDir = "c:\windows"

CD1.FileName = "*.txt"

CD1.ShowOpen

Text1. Text = ""

Abrir CD1.FileName para la entrada como #1

Hacer mientras no sea EOF(1)

Entrada de línea #1, str1

Text1.Text = Text1.Text & str1 & Chr(13) & Chr(10)

Bucle

Cerrar #1

kk:

End Sub

Private Sub Command2_Click()

En caso de error, Ir a kk

CD1.FileName = "Untitled.txt"

CD1.FileName = "Untitled.txt"

p>

CD1.DefaultExt = "Txt"

CD1.Filter = "(*.txt)|*.txt|(*.*)|*.*"

CD1.ShowSave

Abrir CD1.FileName para salida como #1

Imprimir #1, Texto1.Text

Cerrar #1

kk:

End Sub

3. Efecto de ejecución:

4. Cuadro de diálogo de color

Utilizando ShowColor del método de control CommonDialog. muestra el cuadro de diálogo Color. El cuadro de diálogo Color le permite seleccionar un color de una paleta de colores o generar y seleccionar un color personalizado.

Para utilizar el cuadro de diálogo "Color", primero establezca las propiedades relacionadas con el cuadro de diálogo de color en el control CommonDialog. Luego use el método ShowColor para mostrar el cuadro de diálogo y use la propiedad Color para recuperar el color seleccionado.

Por ejemplo, establezca el color de primer plano para el siguiente cuadro de texto.

Código:

Subcomando privado1_Click()

CommonDialog1.ShowColor

Text1.ForeColor = CommonDialog1.Color

End Sub

Efecto de ejecución:

5. Cuadro de diálogo de fuente

1 Propiedades del cuadro de diálogo de fuente:

Usar CommonDialog. El método ShowFont del control muestra el cuadro de diálogo Fuente. El cuadro de diálogo Fuente se utiliza para seleccionar una fuente especificando la fuente, el tamaño, el color y el estilo.

Si desea utilizar el cuadro de diálogo "Fuente", primero establezca las propiedades relacionadas con el cuadro de diálogo Fuente en el control CommonDialog. Luego use el método ShowFont para mostrar el cuadro de diálogo. Una vez realizada una selección en el cuadro de diálogo Fuente, las siguientes propiedades contienen información sobre la selección:

Propiedad determina

Color El color seleccionado. Para utilizar esta propiedad, primero debe establecer la propiedad Flags en cdlCFEFfects.

FontBold Si se selecciona negrita.

FontItalic Si se selecciona cursiva.

FontStrikethru Si se selecciona tachado. Para utilizar esta propiedad, primero debe establecer la propiedad Flags en cdlCFEFfects.

FontUnderline Si se selecciona el subrayado. Para utilizar esta propiedad, primero debe establecer la propiedad Flags en cdlCFEFfects.

FontName El nombre de la fuente seleccionada.

FontSize El tamaño de la fuente seleccionada.

Propiedad Flags:

Devuelve o establece las opciones del cuadro de diálogo "Fuente".

Sintaxis

objeto.Flags [= valor]

La sintaxis del atributo Flags tiene las siguientes partes:

Descripción de la parte

object Expresión de objeto cuyo valor se "aplica" al objeto de la lista.

valor Como se describe en "Configuración de valores", una constante o valor que especifica una opción para el cuadro de diálogo Fuente.

Establecer valor

La configuración del valor es:

Descripción del valor constante

cdlCFANSIOnly &H400 Especifica que el cuadro de diálogo solo permite la selección de fuentes de juegos de caracteres de Windows. Si se establece esta bandera, no se pueden seleccionar fuentes de solo símbolos.

cdlCFApply &H200 Habilita el botón "Aplicar" en el cuadro de diálogo.

cdlCFBoth &H3 Hace que un cuadro de diálogo enumere las fuentes de impresora y pantalla disponibles. El atributo hDC identifica la descripción del dispositivo asociado con la impresora.

cdlCFEFfects &H100 Especifica que el cuadro de diálogo permite efectos de tachado, subrayado y color.

cdlCFFixedPitchOnly &H4000 Especifica que el cuadro de diálogo solo puede seleccionar fuentes de paso fijo.

cdlCFForceFontExist &H10000 Especifica que si el usuario intenta seleccionar una fuente o estilo que no existe, se muestra un cuadro de mensaje de error.

cdlCFHelpButton &H4 hace que el cuadro de diálogo muestre el botón de ayuda.

cdlCF Ejemplo mitSize &H2000 Especifica que el cuadro de diálogo solo puede seleccionar un tamaño de fuente dentro del rango especificado por las propiedades Min y Max.

cdlCFNoFaceSel &H80000 No se ha seleccionado ningún nombre de fuente.

cdlCFNoSimulations &H1000 Esto especifica que el cuadro de diálogo no permite la simulación de fuentes de la interfaz de dispositivo gráfico (GDI).

cdlCFNoSizeSel &H200000 No se ha seleccionado ningún tamaño de fuente.

cdlCFNoStyleSel &H100000 Ningún estilo seleccionado.

cdlCFNoVectorFonts &H800 Esto especifica que el cuadro de diálogo no permite la selección de fuentes vectoriales.

cdlCFPrinterFonts &H2 Hace que el cuadro de diálogo enumere solo las fuentes admitidas por la impresora especificada por el atributo hDC.

cdlCFScalableOnly &H20000 Esto especifica que el cuadro de diálogo solo permite la selección de fuentes escalables.

cdlCFScreenFonts &H1 hace que el cuadro de diálogo enumere solo las fuentes de pantalla admitidas por el sistema.

cdlCFTTOnly &H40000 Esto especifica que el cuadro de diálogo solo permite la selección de fuentes TrueType.

cdlCFWYSIWYG &H8000 Esto especifica que el cuadro de diálogo solo permite la selección de fuentes que están disponibles tanto en la impresora como en la pantalla. Si se establece este indicador, también se deben configurar los indicadores cdlCFBoth y cdlCFScalableOnly.

Nota Antes de mostrar el cuadro de diálogo Fuente, la propiedad Banderas debe establecerse en cdlCFScreenFonts, cdlCFPrinterFonts o cdlCFBoth. De lo contrario, se producirá un error de fuente inexistente.

2. Ejemplo:

Establezca la fuente para el siguiente cuadro de texto.

Código:

Subcomando privado1_Click()

En caso de error, Ir a kk

Cd1.Flags = cdlCFBoth o cdlCFEffects

Cd1.ShowFont

Text1.FontName = Cd1.FontName

Text1.FontSize = Cd1.FontSize

Text1.FontBold = Cd1.FontBold p>

Text1.FontItalic = Cd1.FontItalic

Text1.FontStrikethru = Cd1.FontStrikethru

Text1.ForeColor = Cd1.Color

kk :

End Sub

Efecto de ejecución:

6. Cuadro de diálogo Imprimir

El cuadro de diálogo "Imprimir" se puede mostrar usando el método ShowPrinter del cuadro de control CommonDialog. El cuadro de diálogo Imprimir le permite especificar cómo se debe imprimir la copia impresa. Puede especificar el rango de páginas a imprimir, la calidad de impresión, el número de copias a imprimir, etc. Este cuadro de diálogo también contiene información sobre las impresoras instaladas actualmente y permite configurar o reinstalar la impresora predeterminada.

Tenga en cuenta que este cuadro de diálogo no envía datos a la impresora, sino que solo especifica la situación en la que desea imprimir los datos. Si la propiedad PrinterDefault es True, puede utilizar el objeto Impresora para imprimir datos en el formato seleccionado.

En tiempo de ejecución, una vez realizada una selección en el cuadro de diálogo Imprimir, las siguientes propiedades incluyen información sobre esa selección:

Las propiedades determinan

Copias Número de impresión de copias.

FromPage comienza a imprimir la página.

ToPage finaliza la impresión de la página.

hDC La descripción del dispositivo de la impresora seleccionada.

7. Cuadro de diálogo de ayuda

El método ShowHelp del control CommonDialog puede ejecutar el motor de ayuda de Windows (WINHELP.EXE) y mostrar un archivo de ayuda establecido por la propiedad HelpFile.

Al configurar el atributo HelpCommand, puede indicarle al motor de ayuda qué tipo de ayuda en línea desea, como ayuda contextual o con palabras clave específicas, etc.

1. Atributo HelpCommand: Devuelve o establece el tipo de ayuda en línea requerida.

Sintaxis

object.HelpCommand [= valor]

La sintaxis del atributo HelpCommand tiene las siguientes partes:

Partes

Descripción

objeto Una expresión de objeto cuyo valor es el objeto en la lista "se aplica a".

valor Como se describe en "Establecer el valor", es una constante o valor que especifica el tipo de ayuda.

Valor establecido

El valor de configuración del valor es:

Descripción del valor constante

cdlHelpCommand &H102& Ejecute la macro de ayuda.

cdlHelpContents &H3& Muestra los temas de contenido de ayuda según lo definido por las opciones de contenido en la sección [OPCIÓN] del archivo .hpj. Consulte las instrucciones a continuación para obtener información sobre los archivos de Ayuda creados con Microsoft Help Workshop 4.0X.

cdlHelpContext &H1& Muestra ayuda para un contexto específico. Al utilizar esta configuración, también se debe especificar un contexto mediante la propiedad HelpContext.

cdlHelpContextPopup &H8& Muestra un tema de ayuda específico en una ventana emergente, identificado por el número de contexto definido en la sección [MAP] del archivo .hpj.

CdlHelpContextPopup &H9& garantiza que WinHelp muestre el archivo de ayuda correcto. Si se muestra el archivo de ayuda correcto, no se realiza ninguna acción. Si no se muestra el archivo de ayuda correcto, Winhelp abrirá el archivo correcto.

cdlHelpHelpOnHelp &H4& Muestra ayuda para la propia aplicación de ayuda.

cdlHelpIndex &H3& Muestra el índice del archivo de ayuda especificado. Las aplicaciones deben usar este valor para archivos de ayuda que tienen un solo índice.

cdlHelpKey &H101& Muestra ayuda para una palabra clave específica. Al utilizar esta configuración, también debe especificar una palabra clave mediante la propiedad HelpKey.

cdlHelpPartialKey &H105& Muestra un tema encontrado en la lista de palabras clave que coincide exactamente con la palabra clave pasada por el parámetro dwData. Si hay varias coincidencias, se muestra un cuadro de diálogo Buscar con los temas enumerados en el cuadro de lista Ir a. Si no hay ninguna coincidencia, se muestra el cuadro de diálogo Buscar. Para mostrar el cuadro de diálogo Buscar sin pasar una palabra clave, utilice un puntero largo a una cadena vacía.

cdlHelpQuit &H2& Notifica a la aplicación de ayuda que el archivo de ayuda especificado ya no se utiliza.

cdlHelpSetContents &H5& Determina qué tema de contenido se muestra cuando el usuario presiona la tecla F1.

cdlHelpSetIndex &H5& Establece el contexto especificado por la propiedad HelpContext en el índice actual del archivo de ayuda especificado por la propiedad HelpFile.

El índice permanece actualizado hasta que el usuario accede a otro archivo de ayuda. Este valor sólo se utiliza para archivos de ayuda con múltiples índices.

Descripción

Estos valores para las constantes de la propiedad HelpCommand se enumeran en la biblioteca de objetos Microsoft CommonDialog Control (MSComDlg) del Explorador de objetos.

La constante cdlHelpContents no tiene ningún efecto en los archivos de "Ayuda" creados con "Microsoft Help Workshop Versión 4.0X". Puede obtener el mismo efecto con el valor "&HB". Vea un ejemplo de código funcional en "Ejemplo de propiedad HelpCommand".

Tipo de datos

Entero

2. Atributo HelpFile: determina la ruta y el nombre del archivo de ayuda de Microsoft Windows. La aplicación utiliza este archivo para mostrar la Ayuda. o documentación en línea.

Sintaxis

objeto.HelpFile[ = nombre de archivo]

La sintaxis del atributo HelpFile tiene las siguientes partes:

Descripción de la parte

object Expresión de objeto cuyo valor es un objeto en la lista "se aplica a".

Nombre de archivo Expresión de cadena que determina la ruta y el nombre del archivo de Ayuda de Microsoft Windows en la aplicación.

Notas

Si crea un archivo de Ayuda de Windows para su aplicación y configura la propiedad HelpFile de la aplicación, Visual Basic llama automáticamente a la Ayuda cuando presiona la tecla F1. Ya sea para el control activo o el formulario activo, si hay un número de contexto en la propiedad HelpContextID, la Ayuda muestra el tema correspondiente al contexto de Ayuda actual; de lo contrario, se muestra la pantalla de contenido principal;