Visual Basic中的Do循环语句用于控制循环次数未知的循环结构。此种语句有两种语法形式。 格式一：以下是引用片段：Do{While I Until}<条件> <语句块> [Exit Do] <语句块> loop 格式二：以下是引用片...
VB二级考试资料
Private Declare Function GetSystemMenu Lib "User32" (ByVal hwnd As Long, ByVal bRevert As Long) As Long Private Declare Function RemoveMenu Lib "User3...
相信电脑界的每个人都痛恨计算机病毒，她给我们带来了很多麻烦和损失，可你知道编写病毒的方法和过程吗？在此我仅以VB编写为例，揭开她的面纱。 用VB编写病毒需要考虑到如下几点： * 感染主机 首先染毒文件运行后先要判断主机是否以感染病毒，也就是判断病毒主体文件是否存在，如果不存在则将病毒主体...
请在声明区中放入以下声明 Const GWL_EXSTYLE = (-20) Const WS_EX_TRANSPARENT = &H20& Const SWP_FRAMECHANGED = &H20 Const SWP_NOMOVE = &H2 Const SWP_...
我们在用VB开发大型应用程序时遇到如下问题，进入调试、维护阶段开发小组进驻用户单位，软件交用户试用会经常修改程序并重新编译。然后再由程序员给用户复制更新，或者通知用户自行复制更新。对于少量用户可以做到及时更新。而我们的一个用户在一座十层的大厦中办公，有十几个部门(即有管理部门又有生产车间分布在不同的...
很长时间以来，都认为只能通过绝对路径引用标准DLL中的函数。其实，你也可以用相对路径。很简单的，现在就尝试一下吧。 1）绝对路径方法 比如你的DLL文件位于c:\testDLL\debug\testDLL.dll 一般来说，你需要在VB中作如下声明 Declare Sub m...
语法：Set objectvar = {[New] objectexpression | Nothing} Nothing 为选择性引数。停止 objectvar 和任何特定物件的关连。指定 objectvar 为 Nothing，会在没有其它变数引用时，释放所有与先前物件有关的系统和内存资源。 当...
第一种场景: 主表单调出客户列表表单选择一个客户 流程：用户单击主表单相应控件调出客户列表表单，选择一个客户，被选中的客户数据返回给主表单。 代码解释： a. 主表单mainform声明一个私有的客户列表表单CustomerList，WithEvents关键字表明该对象可以...
'这点代码将会找到Outlook信箱中的附件，并把它们保存至 '"C:\temp\Outlook Attachments"，它没有错误处理所以请小心使用！ '以下是代码（放在一个Command按钮下面） Dim oApp As Outlook.Application Dim oNameSpace A...
打印多页Rich Text 打印对象在处理RichTextBox时由于忽视了Rich Text代码将不会工作得很好。为了打印RichTextBox，要使用SelPrint命令，但是SelPrint不是非常得友好，它按照自己的方式打印然后产生退纸动作。为了打印多页Rich Text，要找到...
Windows 9x中有一个WinPopUp.exe可以在一个Windows网络中收发消息。但Windows NT中并未提供该程序。 利用WIN32 API函数NetMessageBufferSend()可以在一个Windows NT网络中广播一个消息。 Private Const NERR_Suc...
我们在开发软件过程中，为提高软件的商品化程度，感觉到界面的美观程度是一个软件能否获得成功的一个重要因素，我们仔细研究了一些成功的商品化软件，从这些软件上可以看到,程序窗口背景能显示出非常美丽的、富有立体感的花纹。而采用VisualBasic3.0或4.0进行窗体设计，若只按照系统提供的功能，只能从有...
