字母大小写转化

 在通用声明段中，声明模块级变量x,代码如下：

Dim x as String

Private Sub Form_Load()

    x=Text1.Text

End Sub

Private Sub Command1_Click()

    Text1.Text=Ucase(x)

End Sub

Private Sub Command2_Click()

    Text1.Text=Lcase(x)

End Sub

Private Sub Command3_Click()

Text1.Text=x

    End Sub

     突然间发现只要你认真，程序设计起来其实挺简单的。但是却有很多的前提。比如：VB的基础知识；VB的语言等。所以要解决这些问题还需要一段漫长的旅程。