VB TEXT控件应用

转载 2004年06月26日 18:06:00

TextBox控件:

a.   控制Textbox输入格式,我想大多人都遇到这个问题,在TextBox作为输入接口时,有时我们希望用户只能输入数字、大写、字母等,一般的做法是对用户输入的字符这个检查。但是如果我们使用API,将很容易实现这些功能,比如:

1、只允许输入数字:

Const ES_NUMBER = &H2000
Public Function NumbersOnly(tBox As TextBox)

    Dim DefaultStyle As Long

    DefaultStyle = GetWindowLong(tBox.hwnd, GWL_STYLE)

    NumbersOnly = SetWindowLong(tBox.hwnd, GWL_STYLE, DefaultStyle Or ES_NUMBER)

End Function

2、只允许大写:

Public Function UpperCaseOnly(tBox As TextBox)

    Dim DefaultStyle As Long

    DefaultStyle = GetWindowLong(tBox.hwnd, GWL_STYLE)

    UpperCaseOnly = SetWindowLong(tBox.hwnd, GWL_STYLE, DefaultStyle Or ES_UPPERCASE)

End Function

3、只允许小写:

Public Function LowerCaseOnly(tBox As TextBox)

    Dim DefaultStyle As Long

    DefaultStyle = GetWindowLong(tBox.hwnd, GWL_STYLE)

    LowerCaseOnly = SetWindowLong(tBox.hwnd, GWL_STYLE, DefaultStyle Or ES_LOWERCASE)

End Function

当然上边三个函数可以合成一个函数,因为他们方法是一样的,只是风格参数不同而已。

VB文本框textbox的那点事

1、限制文本框中只允许输入数字 在textbox的keypress事件里面写上 (1)判断输入的数字是否为小数 IfkeyAscii=46 and not(InStr(txtnumber,"."...
  • IstarI
  • IstarI
  • 2015年08月10日 10:43
  • 1775

VB6基本数据库应用(一):数据库基础

这是本套教程的第一课,讲述的是数据库结构的基础。学好数据库就必须了解清楚数据库的结构,其实并不困难。本套教程将从最基础的开始来讲述VB6的基础数据库操作。...
  • JiLuoXingRen
  • JiLuoXingRen
  • 2013年07月24日 17:14
  • 9813

vb中的日期控件Date TimerPicker

昨天上午师姐师哥们讲了博客的重要性,博客的价值。其中,贾林师哥说到了“碎碎念”这个词,我觉得我以前的博客就是大多都是在碎碎念,所以一直在网易博客里碎碎念,没好意思到这里碎碎念。总碎碎念可是不行的,所以...
  • u010924894
  • u010924894
  • 2013年11月18日 22:09
  • 3156

line控件和方法

在VB6中,画直线有两种途径 line方法line控件 line方法,就是在代码中用line(x1,y1)-(x2,y2)直接画线 这种方式看似简单,但也容易出错 看链接,出现图形部分显示不出来的问...
  • yiyiyicz
  • yiyiyicz
  • 2014年12月11日 20:58
  • 2588

手把手教你用VB制作ActiveX控件

随着控件在可视化编程中地位地位提高,控件也成了编程中最重要的一部分。许多VB编程者也许苦于没有好看的控件,今天登高望远来教大家如何制作ActiveX控件。 一、新建工程       1.选择Acti...
  • qq_33582668
  • qq_33582668
  • 2016年06月11日 19:41
  • 3933

VB中 MSComm控件使用详解

MSComm        控件通过串行端口传输和接收数据,为应用程序提供串行通讯功能。MSComm控件在串口编程时非常方便,程序员不必去花时间去了解较为复杂的API函数,而且在VC、VB、Delp...
  • niepangu
  • niepangu
  • 2015年06月16日 11:24
  • 4629

vb动态创建控件

vb动态创建控件 2009-05-17 15:52 创建数据驱动窗体         所谓数据驱动窗体就是根据所请求的数据的不同生成相应的窗体。举例来讲,假设你现在有一个数据...
  • whchensir
  • whchensir
  • 2013年07月10日 22:50
  • 2340

Vb中VSFlexGrid控件的应用

说明:O代表VSFlexGrid控件的名称,A代表当前属性名称,|代表可选       属性/方法名称                                                ...
  • june905206961
  • june905206961
  • 2015年03月10日 18:15
  • 1640

DataGrid控件用法详解

转自:http://www.vckbase.com/document/viewdoc/?id=1164 作者:万建华 下载源代码 写在前面   刚写这个题目,就觉得肩上...
  • banrixianxin
  • banrixianxin
  • 2014年05月16日 00:23
  • 4201

vb中自动调整控件的大小

机房收费系统中有很多查询记录类的窗体用到了MSHFlexGrid控件。当没有调整该控件的大小时,查询结果可能会如图所示: 而我们需要的是: 这本来是一个很简单的调整MSHFlexGrid列宽的...
  • u010930340
  • u010930340
  • 2013年11月17日 21:26
  • 1570
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:VB TEXT控件应用
举报原因:
原因补充:

(最多只允许输入30个字)