相关分类: Java技术 C/C++ VB delphi
  • 解决Visual Basic的Grid控件的打印问题

    ---- Grid 控 件 是Visual Basic 最 常 见 控 件 之 一, 从VB3.0 到VB5.0 都有 该 控 件。 也 是VB 爱 好 者 最 喜 爱 的 工 具 之 一。 用 它 可 以 以表 格 的 形 式 显 示、 浏 览 数 据, 特 别 是 数 据 库 应 用, 直 接 绑定 即 可 显 示 浏 览 数 据 库 信 息...

    2008-02-23 07:02:15

  • 让 Visual Basic程序在 Windows 启动时自动执行

    有以下二个方法: 方法1: 直接将快捷方式放到启动群组中。 方法2: 在注册档 HKEY_LOCAL_MACHINE 中找到以下机码 SoftwareMicrosoftWindowsCurrentVersionRun 新增一个字串值,包括二个部份 1. 名称部份:自己取名,可设定为 AP 名称。 2. 资料部份:则是包含 '全路...

    2008-02-23 07:02:15

  • Boolean 值的转换

    我们都知道 Boolean 这个资料形态只有 True/False 二种值,但是当我们要存到资料库时,我们常常会将它转成数值,您可以直接设定 True=-1 / False =0,若您必须使用函数转换,很可能会用 Val(),但是小心,其结果是错的! 您必须使用 Abs() 或 CInt(),为什么呢?看结果...

    2008-02-23 07:02:13

  • Move Method 速度较快

    当我们要移动控制项 (Control) 或表单 (Form) 时,很多人习惯这样写: frmCustomer.Left = frmCustomer.Left 100 frmCustomer.Top = frmCustomer.Top 50 但是若使用 Move Method ,可以加快 40%: frmCustomer.Move frmCustomer.Left 100, frmCustomer.Top 50 上一篇:...

    2008-02-23 07:02:13

  • 快速定位上次Visual Basic程序修改处

    有时候您会同时写几个不同的程序,或因为某种原因,程序停了一段时间,当您下一次要再继续写时,已经忘了上次写到那里了,其实有一个很简单的方法,可以马上唤起您的记忆! 在您在写程序中要停下时,先随便写一行注解,但是拿掉注解符号〈'〉后存档,下一次您载入工程...

    2008-02-23 07:02:10

  • Visual Basic 移除 Form 右上方之『X』按钮

    其实 Form 右上方之三个按钮分别对应到 Form 左上方控制盒 (ControlBox) 中的几个选项 (缩到最小 / 放到最大 / 关闭),而其中的最大化 (MaxButton) 及最小化 (Minbutton) 都可以直接在 Form 的属性中设定,但是 VB 并没有提供设定『X』按钮的功能!要达到这个功能,必须...

    2008-02-23 07:02:10

  • Visual Basic 产生渐层的 Form 背景

    在 Form_Load 中加入以下程序码 Sub Form_Load() Form1.AutoRedraw = True '使 Form 物件的自动重绘有效 Form1.DrawStyle = 6 '直线的样式为内实线 (6-VBInsideSolid) Form1.DrawMode = 13 'copy Pen-由 ForeColor 属性指定的颜色。(13-vbCopyPen) Form1.DrawWidth = 2...

    2008-02-23 07:02:08

  • MDI Form可否跟一般的表单一样设定背景颜色 (BackColo

    VB3 以前的版本:不行。MDI Form没有此一功能。 VB4 / VB5 / VB6 :可以直接在属性表中设定! 上一篇: Visual Basic 可以产生四角形以外其他形状的 Form 下一篇: Visual Basic 让一个 Form 出现在另一个非 MDIForm 的 Form 中...

    2008-02-23 07:02:08

  • 利用 Visual Basic 建立快捷方式

    Private Declare Function fCreateShellLink Lib "STKIT432.DLL" (ByVal lpstrFolderName As String, ByVal lpstrLinkName As String, ByVal lpstrLinkPath As String, ByVal lpstrLinkArgs As String) As Long Sub Command1_Click() Dim lReturn As Long '添加到桌面 l...

    2008-02-23 07:02:06

  • 让鼠标进入 TextBox 时自动选定 TextBox 中之整串文字

    这个自动选定反白整串文字的动作,会使得输入的资料完全取代之前在 TextBox 中的所有字符。 Private Sub Text1_GotFocus() Text1.SelStart = 0 Text1.SelLength = Len(Text1) End Sub 上一篇: 用VB设计一个定时闹钟程序 下一篇: Visual Basic创建“五星”级控件...

    2008-02-23 07:02:07

2