�����g�e�`��δ�ҵ�������(sh��)��(j��)�ɆT Private Sub Command1_Click���� Dim iChinese As Byte, iMath As Byte '�P(gu��n)�I�� ������ ���ԄӞ�����ĸ�󌑣����w�ɫ���mɫ iChinese = �Z��.Text iMath = ��(sh��)�W(xu��).Text Dim iSum As Integer, iAvg As Single '���� iSum = iChinese + iMath 'ƽ���� iAvg = iSum / 2 Label4 = "���֣�" & iSum & Chr��10�� & "ƽ���֣�" & iAvg End Sub �����g�e�`��δ�ҵ�������(sh��)��(j��)�ɆT