2019 年 12月 6 日随笔档案 - 诗情寻知己

2019年12月6日

摘要：读取xml某个节点的值 ‘定义xml字符串内容地址 Dim xmlFileStr As String = "" ‘定义所需读取节点的名称 Dim readNodeName As String = "" Function readXMl(ByVal xmlFileStr As String, ByVa 阅读全文

posted @ 2019-12-06 13:32 诗情寻知己阅读(414) 评论(0) 推荐(0)

VB 老旧版本维护系列---有点懵逼的webserver访问

摘要：有点懵逼的webserver访问 ‘定义webserver地址 Dim postUrl As String = "" ‘定义webserver所需xml字符串参数 Dim xmlRequest As String = "" ‘获取webserver返回信息 Dim responseText As S 阅读全文

posted @ 2019-12-06 13:32 诗情寻知己阅读(180) 评论(0) 推荐(0)

VB 老旧版本维护系列---迷之集合- dataTable

摘要：迷之集合- dataTable ‘定义一个datatable，并声明一个空对象 Dim data As DataTable = New DataTable() ‘获取行数 Dim rows As Integer = data.Rows.Count ‘获取每行列名以及值 For Each row As 阅读全文

posted @ 2019-12-06 11:06 诗情寻知己阅读(298) 评论(0) 推荐(0)

VB 老旧版本维护系列---迷之集合- ArrayList

摘要：迷之集合- ArrayList ‘定义一个字符串 Dim dataType_ImageStr As String = "2023,2091,2092,2096,2212" ‘将字符串转化为数组 Dim dataType_Image() As String = dataType_ImageStr.Sp 阅读全文

posted @ 2019-12-06 10:05 诗情寻知己阅读(295) 评论(0) 推荐(0)