ayuda para poner el PATH

"aaron" preguntó:

como puedo hacer para que cuando instale mi aplicacion la DB
cuando aga el path sepa donde esta como se hacia en vb 6
app.path & "\base"
COMO SE HACE AHORA EN VB 2005

Hola:

Puedes utilizar la propiedad «StartupPath» del objeto «Application»:

MessageBox.Show(Application.StartupPath)

como puedo hacer para poner TODAS las fuentes en un Combobox

Consulta el siguiente ejemplo:

How to: Enumerate Installed Fonts
http://msdn2.microsoft.com/en-us/li...5t4e8.aspx

Si las deseas cargar en un control ComboBox, ejecuta la instrucción While
... End While de la siguiente manera:

While j < count
ComboBox1.Items.Add(fontFamilies(j).Name)
j += 1
End While

' Seleccionamos el primer elemento
ComboBox1.SelectedIndex = 0

Un saludo

Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.

si pro ahora como puedo cambiar la fuente de mi texto con escojerla
del como todo el texto se cambie a esa fuente

GRACIAS

"SoftJaén" escribió:

"aaron" preguntó:
>
> como puedo hacer para que cuando instale mi aplicacion la DB
> cuando aga el path sepa donde esta como se hacia en vb 6
> app.path & "\base"
> COMO SE HACE AHORA EN VB 2005

Hola:

Puedes utilizar la propiedad «StartupPath» del objeto «Application»:

MessageBox.Show(Application.StartupPath)

>
> como puedo hacer para poner TODAS las fuentes en un Combobox

Consulta el siguiente ejemplo:

How to: Enumerate Installed Fonts
http://msdn2.microsoft.com/en-us/li...5t4e8.aspx

Si las deseas cargar en un control ComboBox, ejecuta la instrucción While
End While de la siguiente manera:

While j < count
ComboBox1.Items.Add(fontFamilies(j).Name)
j += 1
End While

' Seleccionamos el primer elemento
ComboBox1.SelectedIndex = 0

Un saludo

Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.

"aaron" escribió:

si pro ahora como puedo cambiar la fuente de mi texto
con escojerla del como todo el texto se cambie a esa fuente

Si te he entendido bien, para cambiar la fuente del texto, tienes que crear
un nuevo objeto Font. El siguiente ejemplo cambiará la fuente del control
TextBox1, asignándole una fuente Verdana, de 12 puntos, y con estilo negrita
y cursiva:

TextBox1.Font = New Font("Verdana", 12, FontStyle.Bold Or FontStyle.Italic)

Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.