重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
先按行读出所有数据,然后找到需要的信息
创新互联建站是一家集网站建设,播州企业网站建设,播州品牌网站建设,网站定制,播州网站建设报价,网络营销,网络优化,播州网站推广为一体的创新建站企业,帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿,时刻以成就客户成长自我,坚持不断学习、思考、沉淀、净化自己,让我们为更多的企业打造出实用型网站。
IEnumerable string list= File.ReadLines("test.txt",Encoding.Default );
foreach (string s in list)
{
if (s.Contains("图名"))
{
textBox1.Text += s+"\r\n";
}
if (s.Contains("图号"))
{
textBox1.Text += s + "\r\n";
}
}
不好意思,用的C#,其实差不多了,自己改改就好了
你这不是一个标准的xml文件,所以建议用正则提取:
Sub Main()
Dim xml = File.ReadAllText("C:\test\css.txt")
Dim rate = Regex.Match(xml, "rate([.\d]+)/rate").Groups(1).Value
Console.WriteLine(rate)
Console.ReadLine()
End Sub
第一个问题有个简单的方法,把字符串变量赋值到一个textbox里面,利用textbox.lines实现。如:
dim a as string ="hh12345" vbcrlf "qdq123" vbcrlf "ddd244" vbcrlf "whw266" ’定义变量
textbox1.text=a ‘赋值
message.show(textbox1.lines(2).tostring) ‘显示第三行内容。
第二个问题结合第一个问题,用循环逐行查找,就可知道字符串第一次出现在哪行。
添加spire.doc.dll为引用,在vb.net中读取指定word文档的内容到 txt文件,代码示例如下:
'加载Word文档
Dim doc As Document = New Documentdocument.LoadFromFile("测试文档.docx")
'使用GetText方法获取文档中的所有文本
Dim s As String = doc.GetText
File.WriteAllText("文本1.txt", s.ToString)