Jump to content
Forum Roportal
Sign in to follow this  
mary2007

cine stie VB?

Rate this topic

Recommended Posts

trebuie sa fac un fisier in VB (input, write...) in care tre sa scriu eu un text...

daca stiti va rog trim rasp

as avea nevoie de ajutor pas cu pas

multumesc

Share this post


Link to post
Share on other sites

nimeni nu stie vb :haha: acum lasand gluma la o parte, posteaza ce ai nevoie si incercam sa te ajutam

 

toate cele bune

Share this post


Link to post
Share on other sites
trebuie sa fac un fisier in VB (input, write...) in care tre sa scriu eu un text...

daca stiti va rog trim rasp

as avea nevoie de ajutor pas cu pas

multumesc

Din cate am inteles eu vrei sa scrii un fisier un continut anume (text)

o sa iti dau un exemplu

 

Faci o functie pentru ca este mai usor folosind functii

 

Public Function WriteToFile(NumeFisier As String, txtContinut as string)

On error goto er

Dim NfileNum As Integer

NfileNum = FreeFile

Open NumeFisier For Binary Access Write As #NfileNUm

Put #NfileNUm, 1, txtContinut

Close #NfileNUm

WriteToFile=True

exit function

er:

WriteToFile=False

End Function

Poti utiliza un TextBox intr-un form. (sa nu uiti TextBox-ul sa il faci MultiLine)

Dupa care apelezi functia cu WriteToFile "nume_fisier","continut"

Exemplu: WriteToFile "c:\fisier.txt", form1.text1.text

form1.text1.text este continutul TextBox-ului

Daca functia iti returneaza "True" totul a decurs normal, daca returneaza "False" a intampinat o eroare, poti modifica astfel incat sa iti afiseze si eroarea folosind err.description.

Daca nu intelegi ceva intreaba.

Edited by adr1an

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×