1 工程
2 属性
3 通过
4 form1.show
5 SelStart
7 x mod 5=0 or x mod 9 =0
Dim CountY%, CountC%
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim C$
C = Chr(KeyAscii)
If "A"
1 工程
2 属性
3 通过
4 form1.show
5 SelStart
7 x mod 5=0 or x mod 9 =0
Dim CountY%, CountC%
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim C$
C = Chr(KeyAscii)
If "A"