kerwinamaro

drinfierno respondió: Para las Mayúsculas solo es Ucase(texto) Para psar de un texto a otro es texto. Setfocus Ahora para que solo sea letras. If IsNumeric(Texto) = true then MsgBox "Lo siento. Debe Ingresar SOLAMENTE Números.",vbInformation,"Cuidado!" txtText1.SetFocus End If

ifrancoz respondió: Lo anterior le funciona para cualquier formulario. Cree un proyecto nuevo con un formulario y un objeto Timer. Private Sub Form_Load() Timer1.Enabled = True End Sub Private Sub Timer1_Timer() Form1.Caption = "Mi Aplicación " & Format(Date,...