摘要：最近在处理Webservice文档的时候，因为是未格式化的，需要处理，所以有了以下代码。#Region "Xml字符串转换成格式化的XML文件" 'txt_Result.Text = StrToXml(txt_Result.Text) Public Function StrToX... 阅读全文

摘要：Public Class Cls_JM '使用 'Dim Jm As New Cls_JM(2) 'Dim strTmp As String 'Jm.jiemi(strTmp) 'Jm.Jiami(strTmp) Private TripleDes As New ... 阅读全文

摘要：1、编写日志2、本地文件的读取和写入3、Base64与图片的互相转换Imports System.IOImports System.TextPublic Class Cls_File#Region "编写日志" '根目录 Public Shared strCurrentPath As S... 阅读全文

摘要：在做录入框的时候，很希望有一个只带下划线的文本框，网上介绍的很多，有自己做组件的，须不知Delphi下只需要简单设置几个属性即可达到目的。 阅读全文