Qysoft Studio

摘要： 网络记事本 阅读全文

摘要： 返加网页Public Function Login(ByVal Url As String, ByVal Params As String) As String Dim strResult As String = getPageByPost(Url, Params) Return strResult End Function Public Function getPageByPost(ByVal ... 阅读全文

摘要： Public Shared Function readregedit() As Boolean Dim State As RegistryKey State = Registry.LocalMachine.OpenSubKey("SOFTWARE\JxcDFT Studio\Register") Try Dim StateValue As String '注意：注册表值取分大小写 StateVal... 阅读全文

摘要： 原理：用 Microsoft Installer （MSI）在您的安装包中包括的合并模块 (MSM) 分发。MSI 合并模块（MSM）可在“C:\Program Files\Common Files\Merge Modules”目录中找到。合并模块（MSM）分为三类：托管组件、数据库访问和密钥号码。托管组件 MSM 处理所有托管组件的分发，其中包括 Windows 窗体查看... 阅读全文

摘要： Public Class ButtonArray Inherits System.Collections.CollectionBase Private ReadOnly HostForm As System.Windows.Forms.Form '创建类的构造函数。 ' Visual Basic Public Sub New(ByVal host As System.Windows.Forms.F... 阅读全文

摘要： '读XML到数据集 Dim ds As newDataSet Dim ss As String ss = Path.GetFullPath("..") & "\XMLFile2.xml" ds.ReadXml(ss)'********************************************************************** a1 = Path.GetFu... 阅读全文

摘要： Try Dim mail As New MailMessage mail.To = "wqiyuan@126.com" mail.From = "qi@126.com" ' mail. ' mail.From. mail.Subject = "progToemail11" mail.BodyFormat = MailFormat.Html mail.Body = "qiyuan123" '****... 阅读全文

摘要： Public Sub Main() Dim creatdnew As Boolean Dim inst As System.Threading.Mutex inst = New System.Threading.Mutex(True, "WindowsApplication4", creatdnew) If creatdnew Then System.Windows.Forms.Applicati... 阅读全文

摘要： 顺序读出dataset 中的每一个数据 Dim row As Integer Dim col As Integer Dim rolesql As String = "select * from role" Dim ds As New DataSet Dim mdb As New MconnfromDB ds = mdb.GetDataFromDB(... 阅读全文

摘要： 'ps:printdocment 'dfdfdf:自定义纸张名称 Dim ps As System.Drawing.Printing.PaperSize For Each ps In PrintDoc.PrinterSettings.PaperSizes If ps.PaperName = "dfdfdf" Then PrintDoc.PrinterSettings.DefaultPageSett... 阅读全文