Text1.Text = UCase(Text1.Text)
End Sub
是这个吗。。。？追答
错了，是不是这个：
Private Sub Text1_Change()
Text1.Text = UCase(Text1.Text)
End Sub
能不能解释下…我看不懂
追答当Text1的内容发生改变时，就让Text1的内容转换为大写。UCase()是个函数，功能是讲一个字符串中左所有出现的小写字母都换成相应的大写字母
本回答被提问者采纳Private Sub FTextBox2_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Sub追问
看不懂，能jies
解释下吗
VB中输代码时怎样一键自动换成大写
如果想在VB输入时，按一个键快速换成大写，按住Shift键不放，再按字母键就是大写。
vb.net text.box 如何实现输入的小写转变为大写
1：将文件拷贝到WORD中 2：点击菜单“格式”——更改大小写，出现对话框 3：可以选择“大写”或者“切换大小写”，就都可以换过来了 最后，再复制回到你所需要的文档中即可！
VB text 文本转大小写和还原
Lcase("字符串")：将字符串中所有大写字母转换成小写，最终字符串全部是小写字母。 注意：因为你有还原功能，转换前要把原先的字符串给保存起来。例：先定义变量Private Sub Form_Load()dim savetextEnd Sub 转大写：在大写有按钮单击事件中插入代码if savetext="" then savetext=text1.textend ...
在vb中文本框输入怎么把小写自动转换为大写
VB6.0可以文本框的KeyPress事件中判断键盘输入字符的keyascii参数做判断来自动转换。KeyPress事件，此事件当用户按下和松开一个 ANSI 键时发生。Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii >= Asc("a") And KeyAscii <= Asc("z") Then KeyAscii = KeyAscii - 32 End...
VB 将Text中的多行的英文首字母转换为大写,代码怎么编写?
Dim a() As String, i As Integera = Split(Text1.Text, vbCrlf) '将文本框内容按回车分割Text1.Text = ""For i = LBound(a) To UBound(a) Text1.Text = Text1.Text & UCase(Left(a(i), 1)) & Mid(a(i), 2) & vbCrlf '将首字母转为大写Next ...
如何使用vb语言在文本框中输入小写内容,转换为大写后在网页中显示。_百...
可以在文本框的输入事件中加入js函数。如onKeyUp=“函数名”，function toUpCase(){ \/\/首先判断输入的是否是小写，\/\/是的话toUpperCase();转化为大写，\/\/不是的话不处理 }
vb中在文本框text1中输入的英文字母一律用大写显示的程序怎么写!!!
Private Sub Text1_Change()Dim i As Long i = Text1.SelStart Text1.Text = UCase$(Text1.Text)Text1.SelStart = i End Sub
请问用VB怎样实现将一串英文字母进行大小写转换啊?跪求程序代码_百度...
想要转换为小写:变量=LCase(字符串)想要转换为大写:变量=UCase(字符串)比如:Dim AAA As String AAA=Inputbox("请输入一串英文字符")me.caption=LCase(AAA)这样就能在窗体的标题上显示刚才输入的小写字符了
VB中怎样把text 1中的小写字母变为text2中的大写字母
第一种：Private Sub Text1_Change()Text2 = UCase(Text1)End Sub 第二种：你的 Private Sub Form_Load()Text1 = ""Text2 = ""End Sub Private Sub Text1_KeyPress(KeyAscii As Integer)Select Case KeyAscii Case 65 To 90 KeyAscii = KeyAscii + 32 Case 97 To 122 KeyAscii = ...
如何让VBtext输入的字母变成大写
简单，在text 的 change事件里头 ，满意请采纳
