amiguirijillo29

Hola amiguirijillos, hoy les traigo el como hice un programa en Visual Basic 2005, el cual sirve para abrir y guardar archivos de texto, (es basicamente un bloc de notas con las funciones de abrír y guardar, la única diferencia es que se les puede dar un formato distinto al ".txt" ) se necesítan 3 formularios uno principal, otro para abrír y otro para guardar. los objetos que se necesitan son: form1: - 2 botones de comando - 1 richtextbox form2: - 1 botón de comando - 1 textbox form3: - 1 botón de comando - 1 textbox Acá les dejo un vídeo de como hacerlo: código del botón abrír form2.show código del botón guardar form3.show código del botón abrir (form2) Try Form1.RichTextBox1.LoadFile("(ruta)" + (TextBox1.Text) + ".(formato)" ) Me.Hide()  Catch ex As Exception MsgBox("archívo no encontrado en la siguiente ubicación: (ruta) " ) End Try código del botón guardar (form3) Try Form1.RichTextBox1.SaveFile("(ruta)" + (TextBox1.Text) + ".(formato)" ) Me.Hide() Catch ex As Exception MsgBox("ruta no encontrada" ) End Try Espero que les haya servido de ayuda, se despide de ustedes su servidor Amiguirijillo29

Hola Taringueros, hoy subo este post para que vean los novatos en Visual Basic como hacer el código de una calculadora (nivel sencillo) Lo que tienen que tener son 3 textbox, y 6 botones de comando UN TEXTBOX ES PARA RECIBIR EL RESULTADO, OTRO PARA INSTERTAR UN DATO Y EL ULTIMO TAMBIEN. CÓDIGOS Botón suma dim numuno, numdos, numres as single numuno = val(textbox1.text) numdos = val(textbox2.text) numres = numuno + numdos textbox3.text = numres Botón resta dim numuno, numdos, numres as single numuno = val(textbox1.text) numdos = val(textbox2.text) numres = numuno - numdos textbox3.text = numres Botón multiplicar dim numuno, numdos, numres as single numuno = val(textbox1.text) numdos = val(textbox2.text) numres = numuno * numdos textbox3.text = numres Botón dividir dim numuno, numdos, numres as single numuno = val(textbox1.text) numdos = val(textbox2.text) if numdos = 0 then textbox3.text = 0 else numres = numuno / numdos textbox3.text = numres end if botón limpiar textbox1.text="" textbox2.text="" textbox3.text="" Botón salir End aquí el video de prueba, aprovechen y comenten mi video, acá está el link dudas o detalles, comenten, el video describe detalles, acá nomas puse la codificación