-
VB 日期时间函数
所属栏目：[百科] 日期：2020-12-17 热度：135
1.date(日期表达式) 将日期表达式转换成日期类型的数据。 日期表达式是任何可以解释成日期的表达式，包含日期文字，可以看作日期的字符串以及从函数返回的日期。 比如：myDate = CDate("99-5-20") ，这样的日期表达式必须加双引号，否则结果不可预料。 CDate[详细]
-
怎样让VB6程序只能运行一次
所属栏目：[百科] 日期：2020-12-17 热度：81
方法一：利用PrevInstance属性 If App.PrevInstance Then Call MsgBox("对不起本程序已在运行中,不得重复加载!!",vbCritical) End End If 优点：简单方便、 缺点：针对性不强、随意复制一份即可再次运行、 方法二：创建互斥体（个人比较喜欢） Private Decla[详细]
-
vb检查磁盘类型
所属栏目：[百科] 日期：2020-12-17 热度：155
Option Explicit Private Declare Function GetDriveType Lib "kernel32.dll" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long Private Sub Command1_Click() Select Case GetDriveType("C:") Case 0 MsgBox "未知类型",vbExclamation Case 1 MsgB[详细]
-
vb的一些搞怪的操作
所属栏目：[百科] 日期：2020-12-17 热度：59
VB代码之：鼠标锁 option Explicit Private Type RECT Left As Long Top As Long Right As Long Bottom As Long End Type Private Declare Function ClipCursor Lib "user32" (lpRect As Any) As Long Private Sub Command1_Click()'锁定鼠标 Dim r As RECT[详细]
-
vb中filecopy拷贝文件
所属栏目：[百科] 日期：2020-12-17 热度：100
FileCopy("源文件名","目标文件名") 两个参数都是必选的,且都包含路径。 在VB中filecopy函数可以直接调用。而CopyFile函数则不能要先定义filesystemobject变量，然后才能用。有过copyFile比fileCopy的功能有所不同。 FileCopy是单个文件的copy,目标文件名可[详细]
-
vb中picturebox透明时看到下面的picturebox中图片
所属栏目：[百科] 日期：2020-12-17 热度：67
在加载窗体时，把PictureBox1的背景指定为透明， 再把PictureBox1指定为PictureBox2的父容器 就可以实现PictureBox2透明于PictureBox1且都透明与窗体背景了。 VB2010环境下的。 代码如下： Private Sub Form1_Load(ByVal sender As System.Object,ByVal e As[详细]
-
vb随机显示图片
所属栏目：[百科] 日期：2020-12-17 热度：191
根目录下建一个文件夹PIC，在PIC下存放5张图片， 名称分虽是1，2，3，4，5 然后添加一个timer1控件，一个image1控件， 它的interval设5000（即5秒） 写如下代码 Private Sub Form_Load() Dim i As Integer Image1.Picture = LoadPicture(App.Path "pic1.bmp[详细]
-
VB 声音提示
所属栏目：[百科] 日期：2020-12-17 热度：147
Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long,ByVal dwDuration As Long) As Long Private Sub Form_Load() playsnd 587,100: playsnd 784,100: playsnd 880,100: playsnd 988,100:: playsnd 988,200: playsnd 0,100 playsnd 988,10[详细]
-
VB另类技巧（可以用于VBA）－指针的使用
所属栏目：[百科] 日期：2020-12-17 热度：199
大家都知道C中可以使用指针，但现在VB（当然也有VBA）也可以使用指针了，这是我在网上看的一篇文章，大家参考一下。 想当年东方不败，黑木崖密室一战，仅凭一根绣花针独战四大高手，神出鬼没，堪称天下武林第一高手。若想成为VB里的东方不败，熟习VB《葵花宝[详细]
-
vb读出二进制文件，合并两个文件
所属栏目：[百科] 日期：2020-12-17 热度：76
========================================= Dim FileMe() As Byte,File1() As Byte,File2() As Byte Dim Ii As Integer,Ss As String '读入程序自身 Open App.Path "" App.EXEName ".exe" For Binary As #11 ReDim FileMe(FileLen(App.Path "" App.EXENam[详细]
-
转载：VB监视进程
所属栏目：[百科] 日期：2020-12-17 热度：153
从百度知道看的，VB监视进程： 让VB程序监视进程中的名称“Windows 任务管理器”,和“AAA”两个进程的进程名， 而且进行操作：如果“Windows 任务管理器”被关闭时则自动关闭“进程某某”程序！ 可以用一个 Timer 定时执行下面的代码 Dim Handle As LongHand[详细]
-
解析VB编程关键字New（一）
所属栏目：[百科] 日期：2020-12-17 热度：121
在编代码时我们经常见到 Dim MyObject As New Object Dim MyObject As Object Set MyObject =New Object Set MyObject = Object 究竟加这几句话有什么区别，我们平常写的代码究竟对不对哪？？ Dim语句用来 声明 变量 并分配存储空间。 可以使用 Dim 语句在模[详细]
-
解析VB编程关键字New（二）
所属栏目：[百科] 日期：2020-12-17 热度：181
语法 Set objectvar = {[ New ] objectexpression | Nothing } Set 语句的语法包含下面部分： New 可选的。通常在声明时使用 New ，以便可以隐式创建对象。如果 New 与 Set 一起使用，则将创建该类的一个新实例。如果 objectvar 包含了一个对象引用，则在赋[详细]
-
为什么vb的load事件不能显示输出
所属栏目：[百科] 日期：2020-12-17 热度：81
任何图形或输出完成Form_Load 过程中不会显示在表单上除非您首先使窗体可见用 Form1.Show 方法，或者如果您设置窗体的 AutoRedraw 属性设置为真（非零）。 当 Form_Load 过程的执行（在程序的开头），默认情况下不还显示该窗体。因此，在 Form_Load 事件，没[详细]
-
VB中CommonDialog示例
所属栏目：[百科] 日期：2020-12-17 热度：164
VB中CommonDialog示例 从project-components,选中microsoft common dialog control 6.0,点击“确定”，会有Commondialog按钮出现在控件栏中，然后拖一个到窗体，用其默认名Commondialog1。 在本程序中实现如下功能： 打开Word/Text/其它文件到Text1控件，Com[详细]
-
vb study
所属栏目：[百科] 日期：2020-12-17 热度：132
从今天起，我会用博客的形式记录自己每天 VB学习的进度。算是对自己的督促吧。[详细]
-
VB中Text控件获得焦点的同时全选
所属栏目：[百科] 日期：2020-12-17 热度：188
选择文本内容，设置文本框的 SelStart 和 SelLength 属性值即可完成文本的选择。 SelStart 为文本选择的起点， SelLength 为文本选择的长度。 如果选择 Text1 中的所有文本内容，代码如下： Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) Text1.Set[详细]
-
VB.net学习笔记（二十）XML
所属栏目：[百科] 日期：2020-12-17 热度：172
一、XML序列化 序列化的目的：就是为了存储或传输。 通俗地说：序列化就是把一个完整的东西，拆成（精简）成一堆小的东西。 反序列化就是把一堆小东西，又复原成原来的东西。 下例，把一个实例对象序列化，拆成一个XML。 XML序列化要用到System.Xml.Serializ[详细]
-
易语言-VB keypress事件中键盘上每个键的KeyAscii值
所属栏目：[百科] 日期：2020-12-17 热度：200
案例: keybd_event vbKeyTab,0 VB keypress事件中键盘上每个键的KeyAscii值! 常数 值 描述 vbKeyLButton 1 鼠标左键 vbKeyRButton 2 鼠标右键 vbKeyCancel 3 CANCEL 键 vbKeyMButton 4 鼠标中键 vbKeyBack 8 BACKSPACE 键 vbKeyTab 9 TAB 键 vbKeyClear 12 CL[详细]
-
2进制、8进制、16进制...各种进制间轻松转换(VB.NET)
所属栏目：[百科] 日期：2020-12-17 热度：81
在 .NET Framework 中， System.Convert 类中提供了较为全面的各种类型、数值之间的转换功能。其中的两个方法可以轻松的实现各种进制的数值间的转换： Convert.ToInt32(value As String ,fromBase As Integer ) 可以把不同进制数值的字符串转换为数字，其中[详细]
-
灵活运用VB的App对象
所属栏目：[百科] 日期：2020-12-17 热度：189
在Visual Basic 的编程实践中，App 是非常重要的全局对象。合理使用该对象开发程序可以大大节约开发时间，并且能实现用其他方法很难达到的目标。下面便是作者在用Visual Basic 开发应用程序时得到的一些技巧和体会。 工具/原料 Visual Basic 6.0 步骤/方法[详细]
-
VB编写的验证码生成器
所属栏目：[百科] 日期：2020-12-17 热度：52
验证码（CAPTCHA）是“Completely AutomatedPublicTuring test to tell Computers andHumansApart”（全自动区分计算机和人类的图灵测试）的缩写，是一种区分用户是计算机和人的公共全自动程序。由于计算机无法解答CAPTCHA的问题，所以回答出问题的用户就可[详细]
-
VB.Net程序设计:Action(Of)代码段
所属栏目：[百科] 日期：2020-12-17 热度：54
Dim gcAction As Action = Sub() GC.Collect() GC.WaitForPendingFinalizers() End Sub'---------------------------- Dim ac As New Action(Sub() GC.Collect() GC.WaitForPendingFinalizers() End Sub) ac()'-------------------------- Array.ForEach(New[详细]
-
项目实战（三）—真正了解VB吗？
所属栏目：[百科] 日期：2020-12-17 热度：60
最近做项目的时候遇到这样一个问题,现在的粮仓只有粮种类型,简单的说一种是长方体,另一种就是圆柱体.但用户要求把原平台上所有的仓房类型都加到系统中(看上去很专业).想想怎样去合理的切割,既可以显示出来,又可以不影响性能. 观察了一下这些仓的类型发现可以[详细]
-
VB查询数据库之结账——机房收费系统总结（五）
所属栏目：[百科] 日期：2020-12-17 热度：55
对于机房收费的结账，我感觉是所有窗体中，最难的一个。这个窗体我真的做了好多天。它的难度系数我感觉是最高的。 首先，你要理清上机时间和收费标准的关系，在预备时间中，是不收费的。 其次，在超过预备时间，一个单位时间之内，收一个费用。在一个单位时[详细]
