У нас вы можете посмотреть бесплатно VISUAL BASIC 6.0 CON ARCHIVOS SEPARADOS POR COMAS или скачать в максимальном доступном качестве, видео которое было загружено на ютуб. Для загрузки выберите вариант из формы ниже:
Если кнопки скачивания не
загрузились
НАЖМИТЕ ЗДЕСЬ или обновите страницу
Если возникают проблемы со скачиванием видео, пожалуйста напишите в поддержку по адресу внизу
страницы.
Спасибо за использование сервиса ClipSaver.ru
Creando un proyecto sencillo con archivos de texto delimitados por comas. Los podemos utilizar para crear directorios telefónicos, control de alumnos, etc. Utlizando Append e Input podemos hacer infinidad de aplicaciones sin tener que recurrir a las bases de datos. Dejen sus comnetarios, preguntas o sugerencia. Gracias. CODIGO: Sub Command1_Clic() Open App.path & "\Base1.zip" For Append as #1 Write #1,TEXT1,TEXT2,TEXT3,TEXT4 Close #1 Text1=Empty Text2=Empty Text3=Empty Text4=Empty Text1.Setfocus End Sub Sub Command2_Clic() Open App.path & "\Base1.zip" For Input as #1 Do While Not EOF(1) Input #1,Identificacion,nombres,direccion,telefono If Val(text1)=Val(Identificacion) Then text2=nombres Text3=direccion text4=telefono End If Loop Close #1 End Sub Sub Command3_Clic() Text1=Empty Text2=Empty Text3=Empty Text4=Empty Text1.Setfocus End Sub