Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


3853 / 13645 ツリー ←次へ | 前へ→

【59836】キーボードからも入力できる電卓 シロ 09/1/11(日) 1:59 質問[未読]
【59837】Re:キーボードからも入力できる電卓 マルチネス 09/1/11(日) 9:05 発言[未読]

【59836】キーボードからも入力できる電卓
質問  シロ  - 09/1/11(日) 1:59 -

引用なし
パスワード
   Visual Studio 2005を使用しています。 VBAを使い始めて数ヶ月の初心者です。よろしくお願いします。

普通のフォームから入力する電卓までは出来たのですがキーボードから入力する部分で悩んでいます。参考になりそうな物をあちこち見たのですがなかなか分かりません。下に貼った物が一番私の作りたい物に近いのですがVB6はまったく分からなくて困っています。

お分かりになる方VBAではどの部分が変わるのかそうでなければVBAの似たようなコードがあるサイトなどを教えていただければと思っています。

勝手なお願いですがどうかよろしくお願いします。


Private Sub Form_KeyPress(KeyAscii As Integer)

  If KeyAscii >= Asc("0") And KeyAscii <= Asc("9") Then
    cmdNum_Click KeyAscii - Asc("0")
  ElseIf KeyAscii = Asc(".") Then
    cmdNum_Click 10
  ElseIf KeyAscii = Asc("c") Or KeyAscii = Asc("C") Then
    cmdClear_Click
  ElseIf KeyAscii = Asc("+") Then
    cmdEnzan_Click 0
  ElseIf KeyAscii = Asc("-") Then
    cmdEnzan_Click 1
  ElseIf KeyAscii = Asc("*") Then
    cmdEnzan_Click 2
  ElseIf KeyAscii = Asc("/") Then
    cmdEnzan_Click 3
  ElseIf KeyAscii = Asc("=") Then
    cmdEnzan_Click 4
  End If
End Sub

【59837】Re:キーボードからも入力できる電卓
発言  マルチネス  - 09/1/11(日) 9:05 -

引用なし
パスワード
   回答者への参考として。

『キーボードからも入力できる電卓』(kota)
http://www.excel.studio-kazu.jp/cgi-bin/kazuwiki2.cgi?mycmd=read&mypage=[[20090110213938]]&mytime=005010

3853 / 13645 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free