十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
以下示例一次从文件中读取一行,然后将每行文本打印到控制台。
创新互联公司服务项目包括屏山网站建设、屏山网站制作、屏山网页制作以及屏山网络营销策划等。多年来,我们专注于互联网行业,利用自身积累的技术优势、行业经验、深度合作伙伴关系等,向广大中小型企业、政府机构等提供互联网行业的解决方案,屏山网站推广取得了明显的社会效益与经济效益。目前,我们服务的客户以成都为中心已经辐射到屏山省份的部分城市,未来相信会继续扩大服务区域并继续获得客户的支持与信任!
Sub ReadTextLinesFromFile()
Dim file As New System.IO.StreamReader("c:test.txt")
Dim oneLine As String
oneLine = file.ReadLine()
While (oneLine "")
Console.WriteLine(oneLine)
oneLine = file.ReadLine()
End While
file.Close()
End Sub
dataset中的数据是以DataTable(表)为单位存储的,DataTable中才是以DataRow(行)为单位存储的。
如果你要从Dataset中读取某一行数据,必须先知道Datatable的名称或者index,然后才可以读取。
例:
dim cDataSet as DataSet = nothing
...
/* DataSet的赋值操作 */
...
if (not cDataSet is nothing) then
for each cRow as DataRow in cDataSet.Tables(0).rows
....
Next
end if
这里循环中的cRow就是对应的cDataSet.Tables(0)里的每一行数据
ListView1.FocusedItem.SubItems.Item(1).Text '获取当前有焦点项的第二个数据
ListView1.SelectedItems.Item(0).SubItems.Item(1).Text '获取当前选择的项的第二个数据。
ListView1.Items(0).SubItems.Item(1).Text '获取索引为0的项的第二个数据。