锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net保存文本文件 vb保存文件后会产生哪几个文件( 二 )

IT技术窗体


'For后面的参数表示以何种方式打开文件vb.net保存文本文件，Input是读取vb.net保存文本文件，Output是覆盖写入，Append是追加写入
''''''append是每次在文件末尾写入,不删除其它已经存在的文件.如果换成output则删除其它文件后再写入
''''''print#1,text1.text ''''''如果print换成write则写进txt中后自动加双引号
Open strFileName For Output As lngHandle '打开文件
Print #lngHandle, strWrite '写入文本
Close lngHandle '关闭文件
End Sub
Private Sub Command2_Click()
'读文件示例
Dim strFileName As String '文件名
Dim lngHandle As Long '文件句柄
Dim strAll As String '所读取的文本文件的所有内容
Dim strLine As String '在循环中存放每行的内容
strFileName = App.Path"\a.txt"
'获得文件的句柄
lngHandle = FreeFile()
'For后面的参数表示以何种方式打开文件，Input是读?。琌utput是覆盖写入，Append是追加写入
Open strFileName For Input As lngHandle
'循环直到文件尾
Do While Not EOF(lngHandle)
'每次读取一行存放在strLine变量中
Line Input #lngHandle, strLine
'每次读取都把所读到的内容连接到strAll变量 ， 由于Line Input去掉vb.net保存文本文件了换行符，所以这里补上
strAllstrAll = strAllstrLinevbCrLf
Loop
'显示得到的全部分内容
MsgBox strAll
End Sub
Private Sub Command1_Click()
Open App.Path"\a.txt" For Output As #1
Print #1, Text1.Text '这里可以是数据本身也可以是目标控件的属性
Close #1 '关闭打开的文件
End Sub
'For后面的参数表示以何种方式打开文件，Input是读取 ， Output是覆盖写入，Append是追加写入
append是每次在文件末尾写入,不删除其它已经存在的文件.如果换成output则删除其它文件后再写入 print#1,text1.text 如果print换成write则写进txt中后自动加双引号，
vb.net保存两个文本框1、首先，点击保存按钮后应检查文本框内容 。
2其次，如果在文本框4中输入的值以400开头则保存反之更改为400 。
3、最后，再次检查文本框5如果文本框5中的值为29或31则保存反之则更改即可 。
【vb.net保存文本文件 vb保存文件后会产生哪几个文件】vb.net保存文本文件的介绍就聊到这里吧，感谢你花时间阅读本站内容 ， 更多关于vb保存文件后会产生哪几个文件、vb.net保存文本文件的信息别忘了在本站进行查找喔 。

推荐阅读


上一篇：微博看不到视频号怎么办，为什么看不到微博视频

下一篇：e管理-在线erp系统，erp管理登录