在vb编程中如何把小写变成大写

VB6.0可使用UCase 函数可将小写字母变成大写。

UCase 函数，返回 Variant (String)，其中包含转成大写的字符串。

UCase 函数示例

本示例使用 UCase 函数来将某字符串转成全部大写。

说明，只有小写的字母会转成大写；原本大写或非字母之字符保持不变。

Dim LowerCase, UpperCase
LowerCase = "Hello World 1234"   ' 要输送的字符串。
UpperCase = UCase(LowerCase)   ' 返回 "HELLO WORLD 1234"。

UCase 函数
返回字符串的大写形式。

UCase(string)

string 参数是任意有效的字符串表达式。如果 string 参数中包含 Null，则返回 Null。

说明
只有小写字母被转换成大写字母；所有大写字母和非字母字符均保持不变。

下面的示例利用 UCase 函数返回字符串的大写形式：

Dim MyWord
MyWord = UCase("Hello World") ' 返回"HELLO WORLD"。

private sub command1_click()
label1.caption=ucase(text1.text)
end sub