PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickTryDimpathAsStringpath="C:\DocumentsandSettings\Administrator\MyDocuments\VisualStudio2008\Projects\创建TXT文本并写入及查询\12312\bin\Debug\lio.Txt"'记得自己改路径(绝对路径)