リスト５：テンキー(0～9)がクリックされたときの処理 Private Sub cmdTenkey_Click(Index As Integer) 　　If txtNumber.Text = 0 Then txtNumber.Text = "" 　　txtNumber.Text = txtNumber.Text & CStr(Index) End Sub 本文へ戻る