VBで電卓のメモリー機能はどのように作るのですか。

解決済

質問者：s_h_y
質問日時：2001/05/26 20:09
回答数：4件

ＶＢを始めて少ししか経っていないものです。
会社で「"実際の電卓"その物をＶＢで、５月一杯までに作りなさい」と言われました。本を買い何とか数字を文字列に変えたり、四則計算などは出来たのですが、
"平方根と、メモリー機能と、ＣＥ(直前の入力された値をキャンセルします)"が載っていなかったので、とても困っています。
どなたかわかる方、教えて頂けないでしょうか。よろしくお願いします。

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (4件)

ベストアンサー優先
最新から表示
回答順に表示

No.4ベストアンサー

回答者： ARC
回答日時：2001/05/27 07:53

えっと、変数の使い方がまだ良く分かってらっしゃらないんじゃないかと推測します。

まず、電卓フォームのコードを表示して、
Dim curMemory as Currency
って書きます。
これで、このフォームのすべてのプロシージャから参照可能な、「curMemory」って言う名前の変数(通貨型)が使用可能になります。

んで、まずは「M+」を実装してみます。
フォーム上にボタン「cbMemoryPlus」と、数値を表示するためのテキストボックス「tb表示」が配置されているものとします。

まず、ボタンをダブルクリックで、Clickイベントのコードを表示させた後、
Sub cbMemoryPlus_Click()
　　'「curMemory」に、(「現在の『curMemory』の値」＋「テキストボックスの値」)をセットする
　　curMemory = CurMemory + val(Me.tb表示)
End Sub

「M-」「MC」も同様(あえて書きません。)

「MR」は
Sub cbMemoryRecall_Click()
　　'テキストボックスに「curMemory」の値をセットする
　　Me.tb表示 = curMemory
End Sub
ですね。

「CE」も同様です。(あえて書きません。)

本を読むのは重要ですが、実際のプログラミングにおいては八割方は、どんな本にも載ってないようなコードを書かなくてはなりません。自分の持てる知識を総動員して、試行錯誤＋創意工夫によって答えを導き出さなくてはならないのです。
五月末までにまだ暫くありますので、その間、ご自身がお書きになったコードを１行ずつ読み、そこで何が行われているのかをしっかりと理解しておくようにすれば、いいかもしれません。そうすれば今後似たような問題を出されたとしても、スラスラ解けるようになるのではないかと思います。

ってことで、がんばってください！

※「電卓」は初級コースの問題ですが、これが「関数電卓」になるといきなり上級コースになっちゃうんですよねぇ。
私も昔「電卓」に取り組んだことがありますが、これを関数電卓にアップグレードしようとして悩みぬいた挙句、挫折した記憶があります。(当時は後置記法なんて、微塵も知らんかったもんなぁ。)

この回答への補足

　お礼が遅くなり申し訳ありません。ありがとうございました。すみません、折角細かく書いて下さっているのに、私の乏しい知識では自分の(本の)コードのどこに入れたら良いのかが分からないのです。入れる場所はどのようにすれば宜しいのでしょうか。
　そして、教えて頂きたいのですが今回はテキストボックスではなく、ラベルで数字を出しているので、説明して下さったテキストの部分をどのように変えれば良いのかが分からないのです。後、ラベルで、数字を１２桁以上、表示出来ない様にするには、MaxLengthでやっているのですが、エラーが出てしまいます。どうすれば良いと思われますか。
　お時間がありましたら、ご返答の方宜しくお願います。

補足日時：2001/05/28 16:04

通報する