RE:Tamaño de letra en el txtbox
hay varias formas de permitir al usuario cambiar la fuente, una sería incluir un control commondialog, y hacer lo siguiente:
- el control textbox se llama txtBox
- el commondialog se llama dlgCommon
- se selecciona cambiar la fuente mediante un botón en el menú mnuArchivoFuente
Private Sub mnuArchivoFuente_Click()
dlgCommon.ShowFont
txtBox.Font = dlgCommon.FontName
End Sub
- si sólo quisieras permitir el cambio del tamaño de la fuente, podrías hacerlo de otra forma, por ejemplo, incluir un combobox con los tamaños de fuente permitidos, y dependiendo del seleccionado, modificas la propiedad del textbox.FontSize:
- el combobox se llama cmbTamanoFuente
(no sé porqué ahora que compilaba no me funcionó con el evento Change() del combobox, supongo que debería funcionar, pero hacerlo con el Click() funciona bien)
Private Sub cmbTamanoFuente_Click()
txtBox.FontSize = cmbTamanoFuente.Text
End Sub
Nota: antes debes haber agregado al combobox todos los valores posibles:
cmbTamanoFuente.AddItem 8
cmbTamanoFuente.AddItem 10
cmbTamanoFuente.AddItem 12
cmbTamanoFuente.AddItem 14
etc...