Welcome to OGeek Q&A Community for programmer and developer-Open, Learning and Share
Welcome To Ask or Share your Answers For Others

Categories

0 votes
564 views
in Technique[技术] by (71.8m points)

vb6 - How to display the text file while clicking the button

How to display the file(*.txt) while clicking the command button

How to display the content of the file while clicking the button

Data's are stored in the text file, ex 1.txt when am clicking the command buttion, 1.txt file will open and 1.txt data's should display

See Question&Answers more detail:os

与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…
Welcome To Ask or Share your Answers For Others

1 Reply

0 votes
by (71.8m points)

Add a textbox to a form, make it multiline=true, add a button to the form. And in the buttons click handler add this:

Private Sub Button1_Click()
  Dim iFile As Long
  Dim strFilename As String
  Dim strTheData as String

  strFilename = "C:1.txt"

  iFile = FreeFile

  Open strFilename For Input As #iFile
   strTheData = StrConv(InputB(LOF(iFile), iFile), vbUnicode)
  Close #iFile
  text1.text=strThedata
End Sub

This will read the text in the file and add it to the textbox.

Edit: Changed the line that reading the content to be more robust as pointed out by MarkJ in this answer (Cred goes to to MarkJ to pointing out that.)


与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…
OGeek|极客中国-欢迎来到极客的世界,一个免费开放的程序员编程交流平台!开放,进步,分享!让技术改变生活,让极客改变未来! Welcome to OGeek Q&A Community for programmer and developer-Open, Learning and Share
Click Here to Ask a Question

...