string filepath="e:\\a.txt";
//根据扩展名判断是不是文本文件
FileInfo fileInfo = new FileInfo(@filepath);
if (fileInfo.Extension.Trim().ToUpper().Equals(".TXT"))
{
TextBox2.Text = "是文本文件";
}
else
{
TextBox2.Text = "不是文本文件";
}
//读出文本文件的内容
StreamReader reader = new StreamReader(@filepath,System.Text.Encoding.Default);
StringBuilder sb=new StringBuilder();
while (reader.Peek()>=0)
{
sb.Append(reader.ReadLine());
sb.Append("\r\n");
}
reader.Close(); TextBox1.Text = sb.ToString();
//根据扩展名判断是不是文本文件
FileInfo fileInfo = new FileInfo(@filepath);
if (fileInfo.Extension.Trim().ToUpper().Equals(".TXT"))
{
TextBox2.Text = "是文本文件";
}
else
{
TextBox2.Text = "不是文本文件";
}
//读出文本文件的内容
StreamReader reader = new StreamReader(@filepath,System.Text.Encoding.Default);
StringBuilder sb=new StringBuilder();
while (reader.Peek()>=0)
{
sb.Append(reader.ReadLine());
sb.Append("\r\n");
}
reader.Close(); TextBox1.Text = sb.ToString();
解决方案 »
- URLRewriter能不能把规则放在XMl文件中
- 怎么样让在一幅图片上点击后出现的窗口在图片的上层(不被图片遮盖掉)?
- 被arp攻击了,已找出局域网内攻击其它主机的主机,不知接下来怎么办?急!!
- TreeView数据绑定问题
- 请各位帮帮忙!!!!!!!!!!!
- Forms验证模式 退出问题
- 93如何转成九十三
- image设置有tag属性,imageList1添加image。从imagelist1中获取不到image的tag属性,怎么回事?!
- 进来看看,客户端实现一个很简单的功能?
- dataAdapter配置视图函数是出错:函数提供的参数不够!
- 关于在web页面上制作帮助的问题
- System.Data.OleDb.OleDbException: 操作必须使用一个可更新的查询?在线等
dim fileinfo as fileinfo = new new FileInfo(@filepath)
if fileInfo.Extension.Trim().ToUpper().Equals(".TXT") then
TextBox2.Text = "是文本文件"
else
TextBox2.Text = "不是文本文件"
end if
dim reader as StreamReader = new StreamReader(@filepath,System.Text.Encoding.Default)
dim sb as StringBuilder=new StringBuilder()
while reader.Peek()>=0 sb.Append(reader.ReadLine())
sb.Append("\r\n")
end while
reader.Close()TextBox1.Text = sb.ToString()
dim fileinfo as fileinfo = new FileInfo(filepath)
if fileInfo.Extension.Trim().ToUpper().Equals(".TXT") then
TextBox2.Text = "是文本文件"
else
TextBox2.Text = "不是文本文件"
end if
dim reader as StreamReader = new StreamReader(filepath,System.Text.Encoding.Default)
dim sb as StringBuilder=new StringBuilder()
while reader.Peek()>=0 sb.Append(reader.ReadLine())
sb.Append(vbCrlf)
end while
reader.Close()TextBox1.Text = sb.ToString()
dim fileinfo as fileinfo = new FileInfo(filepath)
if fileInfo.Extension.Trim().ToUpper().Equals(".TXT") then
TextBox2.Text = "是文本文件"
else
TextBox2.Text = "不是文本文件"
end if
dim reader as StreamReader = new StreamReader(filepath,System.Text.Encoding.Default)
dim sb as String
while reader.Peek()>=0 sb=sb & reader.ReadLine()
sb=sb & vbCrlf
end while
reader.Close()TextBox1.Text = sb.ToString()
------>
TextBox1.Text = sb