我想用代码将姓首字母的小写字母改为大写字母
我表格上的代码是:
选项比较数据库
私有子Text19_Click()
Text19 = UCase(Text19)
结束子对象
但是我的桌子没有变化!
此外,我如何找到姓氏的空格,逗号或句号,并使它没有空格,逗号和句号。
比如
月亮,
月亮。
太空月球
把它们改成
月亮
发布于 2016-11-21 19:58:15
如果您的表没有更改,那么您的字段可能没有绑定到记录集?也许你需要“重新整理”你的表格。
而且,看起来您正在尝试在TextBox上使用这段代码吗?守则如下:
Private Sub Text19_DblClick(Cancel As Integer)
Text19 = Trim(Text19) ' Get rid of leading and trailing spaces.
If right(Text19, 1) = "." Or right(Text19, 1) = "," Then ' Remove comma, period
Text19 = left(Text19, Len(Text19) - 1)
End If
Text19 = UCase(left(Text19, 1)) & Mid(Text19, 2)
End Subhttps://stackoverflow.com/questions/40727317
复制相似问题