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

【VB 老旧版本维护系列---迷之集合- dataTable】的更多相关文章

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

迷之集合- dataTable '定义一个datatable,并声明一个空对象 Dim data As DataTable = New DataTable() '获取行数 Dim rows As Integer = data.Rows.Count '获取每行列名以及值 For Each row As DataRow In data.Rows For Each col As DataColumn In data.Columns '获取列名 Print(col.ColumnName) '获取列值 P…

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

迷之集合- ArrayList '定义一个字符串 Dim dataType_ImageStr As String = "2023,2091,2092,2096,2212" '将字符串转化为数组 Dim dataType_Image() As String = dataType_ImageStr.Split(",") '将数组转化为数组集合 Dim DataType_ImageList As ArrayList = ArrayList.Adapter(dataType…

VB 老旧版本维护系列---尴尬的webapi访问返回json对象

尴尬的webapi访问返回json对象首先Imports Newtonsoft.Json Imports MSXML2(Interop.MSXML2.dll) Dim URLEncode As System.Text.Encoding = System.Text.Encoding.GetEncoding("utf-8") '所需传递的json对象参数 Dim requestDataJson As String=requestDataJson = JsonConvert.Seriali…

VB 老旧版本维护系列---兜兜转转有点晕：从服务器通过URL不中转保存的下载

从服务器通过URL不中转保存的下载首先引用System.dll 然后新开一个页面,空的,在后台Page_Load方法里写 Dim docPath As String ="" Dim fileName As String = Dim myWebClient As New Net.WebClient() Dim data() As Byte = myWebClient.DownloadData(New Uri(docPath)) Response.Clear() Response.A…

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

有点懵逼的webserver访问 '定义webserver地址 Dim postUrl As String = "" '定义webserver所需xml字符串参数 Dim xmlRequest As String = "" '获取webserver返回信息 Dim responseText As String = "" '定义传输字符编码 Dim URLEncode As System.Text.Encoding = System.Text.En…

VB 老旧版本维护系列---读取xml某个节点的值

读取xml某个节点的值 '定义xml字符串内容地址 Dim xmlFileStr As String = "" '定义所需读取节点的名称 Dim readNodeName As String = "" Function readXMl(ByVal xmlFileStr As String, ByVal readNodeName As String) As String '定义节点内容 Dim nodeValue As String = "" Tr…

[WPF]为旧版本的应用添加触控支持

之前做WPF开发时曾经遇到这样一个需求:为一个基于 .NET Framework 3.5开发的老旧WPF程序添加触控支持,以便于大屏触控展示. 接手之后发现这是一个大坑. 项目最初的时候完全没考虑过软件架构设计,业务逻辑基本都写在后台代码中,经过两代程序员的开发维护(初代开发者已离职,文档这种东西不存在的),主界面cs代码已经有上万行,各种事件注册的非常杂乱.由于是做给政府部门用的,稳定性很重要,修修补补不断的打补丁,程序已经非常难维护了. 而且不像最新.net框架下的WPF以及UWP开发中,我…