Office中国论坛/Access中国论坛

标题: 帮我看看如何输入时自动显示大写字母 [打印本页]

作者: djhong    时间: 2006-2-18 21:46
标题: 帮我看看如何输入时自动显示大写字母
[attach]15900[/attach]

vb里是可以的.....vba里不知道出了什么问题了

作者: fan0217    时间: 2006-2-18 22:02
没有弄明白你的问题。
作者: 一点通    时间: 2006-2-18 22:09
很简单,在文本框的格式中写入 > 这个符号就行了
作者: djhong    时间: 2006-2-18 22:11
[attach]15901[/attach]
vb里的可以的.在vba里实现怎么不行.

输入字母自动转为大写
作者: djhong    时间: 2006-2-18 22:12
谢谢
作者: fan0217    时间: 2006-2-18 22:12
被他的大堆代码都弄糊涂了,呵呵!还调用了API函数。

Access的VBA于VB还是有很多不同的,很多在VB中可用的方法,在Access中未必可以用。

虽然VB可以算VBA的妈了吧,但儿子也可能不会完全象妈的哦。

[此贴子已经被作者于2006-2-18 14:23:40编辑过]


作者: djhong    时间: 2006-2-18 22:27
[attach]15903[/attach]

晕了........我搞昏了...不行.呵呵

作者: fan0217    时间: 2006-2-18 22:33
[attach]15904[/attach]
[em06]

要文本框失去焦点后才显示。
作者: djhong    时间: 2006-2-18 22:41
最好是输入就大写.不过这样也可以了.呵呵
作者: djhong    时间: 2006-2-18 22:44
昏迷咯.发现输入后保存到表里居然成小写了.汗
作者: djhong    时间: 2006-2-18 22:46
原来只要在表里格式改下就ok了.....汗.笨的了.....自己瞎搞[em06]


作者: 一点通    时间: 2006-2-18 23:03
能充分理解、运用,就会少走弯路,恭喜你能正确使用这种方法
作者: djhong    时间: 2006-2-18 23:08
谢谢了[em01]
作者: okmijn    时间: 2006-2-21 06:53
没必要这么复杂啊
作者: okmijn    时间: 2006-3-1 04:20
+32
作者: wuaza    时间: 2006-3-1 16:59
摘自帮助

以下示例将文本框中输入的文本在键入时转换为大写,每键入一个字符就转换一个。

若要试用该示例,请将下列事件过程添加到窗体中,并使窗体中含有一个名为“货主地区”的文本框。
  1. Private Sub ShipRegion_[b]KeyPress[/b](KeyAscii As Integer)

  2.     Dim strCharacter As String



  3.     ' Convert ANSI value to character string.

  4.     strCharacter = Chr(KeyAscii)

  5.     ' Convert character to upper case, then to ANSI value.

  6.     KeyAscii = Asc(UCase(strCharacter))

  7. End Sub
复制代码






欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3