急问:VB里什么样的东西要放在通用声明段啊?

来源:百度知道 编辑:UC知道 时间:2024/05/16 12:24:35
我实在搞不清哪些变量要定义,哪些要放在通用声明段里
Dim CountY%, CountC%

Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim C$
C = UCase(Chr(KeyAscii))
If "A" <= C And C <= "Z" Then
Select Case C
Case "A", "E", "I", "O", "U"
CountY = CountY + 1
Case Else
CountC = CountC + 1
End Select
End If
If KeyAscii = 13 Then
Picture1.Print "元音字母有"; CountY; "个"
Picture1.Print "其它字母有"; CountC; "个"
End If
End Sub

拿这个做例子,是从一串字母中统计出元音字母的,为什么CountY%, CountC%要放在通用声明段啊?

CountY%, CountC%作为一个全局的变量,做计数用
如果你放在单个事件里的话,每触发一次事件,那两个变量值会重新变成0
从而达不到计数的效果

没所谓
只要字母不同就行了