<?xml version="1.0" encoding="utf-8" ?><rss version="2.0"><channel><title><![CDATA[40Star的专栏]]></title><description><![CDATA[]]></description><link>https://blog.youkuaiyun.com/40Star</link><language>zh-cn</language><generator>https://blog.youkuaiyun.com/</generator><copyright><![CDATA[Copyright &copy; 40Star]]></copyright><item><title><![CDATA[使用VB进行子类化]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14770</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14770</guid><author>40Star</author><pubDate>Sun, 14 Sep 2003 19:06:00 +0800</pubDate><description><![CDATA[ 摘要这里我们讨论一下如何使用VB进行子类化，以及VB6和VB.NET的子类化实现的异同。 目录1. 何谓子类化（subclassing）2. Visual Basic 6子类化的实现3. Visual Basic .NET子类化的实现4. 小结 1. 何谓子类化（subclassing）众所周知，Windows是一个基于消息的系统，消息在Windows]]></description><category></category></item><item><title><![CDATA[在托盘上显示Balloon Tooltip（VB.NET）]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14769</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14769</guid><author>40Star</author><pubDate>Tue, 02 Sep 2003 23:24:00 +0800</pubDate><description><![CDATA[使用VB编写在托盘上显示Balloon提示的功能就需要调用Win32Api了，但是VB6和VB.NET代码上还是有些不同的，红色部分即为二者区别Imports System.Runtime.InteropServicesPublic Class Form1    Inherits System.Windows.Forms.Form#Region "Win32Api_NotifyIcon]]></description><category></category></item><item><title><![CDATA[在.NET的Windows桌面应用中使用Amazon的Web Services]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14768</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14768</guid><author>40Star</author><pubDate>Wed, 13 Aug 2003 11:35:00 +0800</pubDate><description><![CDATA[摘要Amazon免费的Web Services可以让你在自己编写的应用程序中查询并显示Amazon站点上的数据，接下来我们就进入雅玛逊，用.NET去体会Web Services。 目录1. Amazon Web Services简介2. 使用.NET体验Amazon Web Services3. 小结 1. Amazon Web Services简介几年前Ama]]></description><category></category></item><item><title><![CDATA[在VB.NET中寻找App]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14767</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14767</guid><author>40Star</author><pubDate>Tue, 08 Jul 2003 09:06:00 +0800</pubDate><description><![CDATA[  摘要使用过Visual Basic 6的开发人员几乎都使用过App这个对象，它的功能强大人所共知，那么Visual Basic .NET中是否也有类似的对象呢？下面将会进一步说明。 目录1. App简介2. 在VB.NET寻找类似功能3. 简单示例4. 小结 1. App简介在Visual Basic 6中，App是一个全局对象可以直接通过App]]></description><category></category></item><item><title><![CDATA[.NET中的DataReader简介]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14766</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14766</guid><author>40Star</author><pubDate>Mon, 09 Dec 2002 09:30:00 +0800</pubDate><description><![CDATA[  摘要本文介绍了ADO.NET中的一个重要的对象DataReader，简单的举例说明了DataReader的使用方法。 目录1. ADO.NET概览2. DataReader的使用方法3. 小结 1. ADO.NET概览在说明主题之前，简单的介绍一下ADO.NET。ADO.NET有两个核心组件：DataSet和.NET data provider，.N]]></description><category></category></item><item><title><![CDATA[ADO记录集和水晶报表]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14765</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14765</guid><author>40Star</author><pubDate>Tue, 03 Dec 2002 08:53:00 +0800</pubDate><description><![CDATA[ 在使用水晶报表时，经常会感到数据不是很好控制，最后只好使用这个终极绝招咯。那就是使用数据定义文件（TTX），把得到的ADO记录集传送给水晶报表。通常情况下，水晶报表是从物理的数据库上创建出来的，但是现在有了32位的Active Data Driver-- P2smon.dll，水晶就可以不用再事先连接到一个数据库上咯。首先，需要创建一个TTX文件，进入数据源选择窗体后，如下图选中]]></description><category></category></item><item><title><![CDATA[用VB处理定长文本的导入]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14764</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14764</guid><author>40Star</author><pubDate>Fri, 29 Nov 2002 14:49:00 +0800</pubDate><description><![CDATA[用VB编写将带分割符的文本导入数据库可能是最经常用到的方式，但是导入定长的文本就不是像前者那样简单了（个人观点）。因为这里需要处理一个技术问题，就是在VB中所有的字符都是按照Unicode进行运算的，所以一个字节的英文字符、数字和两个字节的汉字在VB中都是两个字节。那么在我将一行文本ReadLine读到一个字符串中后，如果从某位至某位是单双字节混合的字符串，那就没有办法用Mid、Left这类函数确]]></description><category></category></item><item><title><![CDATA[另类Msgbox]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14763</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14763</guid><author>40Star</author><pubDate>Thu, 28 Nov 2002 09:12:00 +0800</pubDate><description><![CDATA[写过VB的人都知道Msgbox函数弹出系统提示对话框，这个对话框既然是Windows给我们使用的那么我们就可以通过别的方式改变它。下面我就会调用MessageBox的Api来改变VB的对话框函数，创造出我们自己风格的Msgbox！该例程是将Msgbox弹出，并且总是位于窗口的中央；而且修改了Msgbox中的“确定”按钮上的文字。程序中简单的使用了Windows的钩子。1·加入一个模块：Op]]></description><category></category></item><item><title><![CDATA[ListBox中的字符串超长显示的解决方法]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14762</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14762</guid><author>40Star</author><pubDate>Sat, 02 Nov 2002 12:50:00 +0800</pubDate><description><![CDATA[使用ToolTip来解决超长文字的显示问题是不错的方案，下面给出了例子的代码。Option ExplicitPrivate Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As ]]></description><category></category></item><item><title><![CDATA[在.net中读写INI文件]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14761</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14761</guid><author>40Star</author><pubDate>Sun, 20 Oct 2002 09:18:00 +0800</pubDate><description><![CDATA[在.net中读写ini文件和Vb6中的做法是一致的，唯一注意的一点是Api声明中的Long型变量要改为int32类型在.net中    Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As Strin]]></description><category></category></item><item><title><![CDATA[Return to Sender]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14760</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14760</guid><author>40Star</author><pubDate>Tue, 15 Oct 2002 09:24:00 +0800</pubDate><description><![CDATA[Return to SenderThe Lowly Sender Parameter Can Make Applications Shine The humble Sender parameter could be one of Delphis most useful tools for modular, extensible programming. Although Sender i]]></description><category></category></item><item><title><![CDATA[VB术语表]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14759</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14759</guid><author>40Star</author><pubDate>Fri, 11 Oct 2002 23:19:00 +0800</pubDate><description><![CDATA[VB GlossaryUse this glossary of key programming terminology as your starting point as you learn Visual Basic. If a term is not listed here, or you need a more detailed explanation, try consulting the ]]></description><category></category></item><item><title><![CDATA[Introduction to OOP in VB.NET]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14758</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14758</guid><author>40Star</author><pubDate>Fri, 11 Oct 2002 23:07:00 +0800</pubDate><description><![CDATA[ by Budi Kurniawan09/23/2002 Visual Basic .NET offers its users, among many other things, a fully object-oriented programming (OOP) experience. Some former VB6 developers have prepared themselves ]]></description><category></category></item><item><title><![CDATA[处理鼠标移出事件]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14757</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14757</guid><author>40Star</author><pubDate>Fri, 11 Oct 2002 23:01:00 +0800</pubDate><description><![CDATA[ Windows提供的鼠标移出消息有时候很有用，但是VB6中没有把这个事件封装给我们。但是我们仍然可以使用子类化技术实现他，下面的代码就是一个简单的例子来处理Windows的WM_MOUSELEAVE消息的，我演示的是鼠标移出一个Button时的情形。1.加入一个模块，专门用来处理子类函数：Option Explicit]]></description><category></category></item><item><title><![CDATA[检查特殊字符的简单VCL]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14756</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14756</guid><author>40Star</author><pubDate>Wed, 25 Sep 2002 11:00:00 +0800</pubDate><description><![CDATA[ 这是个很简单的组件，编写它的目的也很单纯，就是想解决数据录入时的特殊字符检查问题。一开始要写函数实现，不过觉得麻烦，后来就想到写一个简单的VCL来遍历Form上所有的组件的方法。这个VCL目前只是检查所有的TEdit和TComboBox组件，有兴趣的朋友可以自己扩充功能。我想这个VCL对于编写数据库程序的人员来说还是有一点帮助的，比如对单引号的Check。想要检查什么符号只要在属性中]]></description><category></category></item><item><title><![CDATA[如何得到应用程序的运行时间]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14755</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14755</guid><author>40Star</author><pubDate>Tue, 24 Sep 2002 09:34:00 +0800</pubDate><description><![CDATA[ 利用函数GetTickCount就可以搞定，不过他是个API，需要声明一下下。还有需要注意的是，这个函数返回的是毫秒，所以需要自己再转换单位的！GetTickCount得到的是操作系统到现在为止的运行时间，那么用两次的返回值相减就可以了。Option ExplicitPrivate Declare Function GetTickCount Lib "kernel32" () As Lo]]></description><category></category></item><item><title><![CDATA[托拽Explore中的文件到VB.net的窗口]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14754</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14754</guid><author>40Star</author><pubDate>Thu, 29 Aug 2002 09:15:00 +0800</pubDate><description><![CDATA[要让VB.net相应外部托拽来的文件，需处理WM_DROPFILES消息。Private Declare Sub DragAcceptFiles Lib "shell32.dll" (ByVal hWnd As Int32, ByVal fAccept As Int32)Private Declare Sub DragFinish Lib "shell32.dll" (ByVal hDrop ]]></description><category></category></item><item><title><![CDATA[轻松实现控件间托拽操作]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14753</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14753</guid><author>40Star</author><pubDate>Wed, 28 Aug 2002 08:58:00 +0800</pubDate><description><![CDATA[    在Vb.net里实现ListBox之间的托拽，首先要使接受托拽数据的控件的AllowDrop属性设为真。再要处理的就是托拽效果，AllowedEffect是设置托拽的源控件的动作效果，而Effect是设置目标控件的动作。这些东东可以在DragEventArgs Members中查到！    Private Sub Form1_Load(ByVal sender As System.Ob]]></description><category></category></item><item><title><![CDATA[调用屏幕保护]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14752</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14752</guid><author>40Star</author><pubDate>Tue, 27 Aug 2002 09:19:00 +0800</pubDate><description><![CDATA[        想要调用系统屏幕保护，主要是发送一个WM_SYSCOMMAND消息即可。    Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Int32, ByVal wMsg As Int32, ByVal wParam As Int32, ByVal lPara]]></description><category></category></item><item><title><![CDATA[将About加入系统菜单]]></title><link>https://blog.youkuaiyun.com/40Star/article/details/14751</link><guid>https://blog.youkuaiyun.com/40Star/article/details/14751</guid><author>40Star</author><pubDate>Mon, 26 Aug 2002 11:28:00 +0800</pubDate><description><![CDATA[在VB.net中想要实现这个也很简单，不过需要重载窗口的WndProc过程才能处理WM_SYSCOMMAND消息具体代码：    Private Declare Function GetSystemMenu Lib "user32" Alias "GetSystemMenu" (ByVal hwnd As Int32, ByVal bRevert As Int32) As Int32    P]]></description><category></category></item></channel></rss>