Sección de códigos , trucos y ejemplos para visual basic

61 - Abrir el cuadro de diálogo configuración regional de windows mediante el Shell

Código de ejemplo que permite mediante el Shell y Rundell , abrir el cuadro de configuración regional de Windows.

Vista del cuadro de configuración regional y de idioma de windows

cuadro configuración regional de windows - abrirlo mediante el shell

Nota: En la sección de Artículos de esta web, hay una lista con un montón de llamadas utilizando el Rundell para acceder a las distintas opciones de Windows por si le querés hechar un ojo. El enlace es el siguiente:

Listado de llamadas de windows mediante rundell32 utilizando el comado Shell

Código fuente en el formulario

Option Explicit

Private Sub Form_Load()

Dim ret As Long
    
    ' Abre el díalogo de configuración regional del sistema
    ret = Shell("rundll32.exe shell32.dll,Control_RunDLL intl.cpl,,0", 5)

End Sub

Para abrir el diálogo en una pestaña específica, se debe cambiar el último valor , por ejemplo lo siguiente despliega el diálogo en la solapa Idiomas pasándole el valor 1

ret = Shell("rundll32.exe shell32.dll,Control_RunDLL intl.cpl,,1", 1)

Para la solapa de " Opciones avanzadas " .. pasar el valor 2

ret = Shell("rundll32.exe shell32.dll,Control_RunDLL intl.cpl,,2", 1)

Recursos vb6 - Enlaces relacionados

Buscar en Recursos vb