當前位置:首頁 » 兒童樂園 » 可以用的兒童計算器怎麼做
擴展閱讀
領科教育模式怎麼樣 2024-09-25 15:55:36
同學生病住院怎麼辦 2024-09-25 15:46:50

可以用的兒童計算器怎麼做

發布時間: 2022-09-05 08:07:29

1. 如何用手指做計算器

食指掌管0.1.4.7鍵,中指00.2.5.8,無名指..3.6.9 ,小拇指+

2. 如何利用VB做一個簡單的計算器

這是我給別人寫過的簡單計算器程序,送給你用吧。
後面發了兩個文件的內容,你創建兩個文本文件按照那兩個文件命名後,並把對應代碼用記事本打開粘貼到裡面,最好再用vb運行project1.vbp文件編譯成exe文件或直接執行都可以。

計算器真正手寫代碼就這么多。
Dim mem1 As Long, mem2 As Long, mem3 As Long
Dim calc As Integer
Private Sub Command1_Click(Index As Integer)
Text1.Text = Text1.Text & Index
End Sub
Private Sub Command2_Click(Index As Integer)
calc = Index
mem1 = Text1.Text: Text1.Text = ""
End Sub
Private Sub Command3_Click(Index As Integer)
Select Case Index
Case 0
Text1.Text = ""
mem1 = 0: mem2 = 0: mem3 = 0
Case 1
Text1.Text = Text1.Text & "."
Case 2
mem2 = Text1.Text: Text1.Text = ""
Select Case calc
Case 0 '+
mem3 = mem1 + mem2
Case 1 '-
mem3 = mem1 - mem2
Case 2 '*
mem3 = mem1 * mem2
Case 3 '/
mem3 = mem1 / mem2
End Select
Text1.Text = mem3
End Select
End Sub

以下是計算器完整代碼文件內容-----------------------------------

因為網路知道不能上傳壓縮,只好把工程文件的文本代碼發給你了。
以下是文件Project1.vbp的內容
Type=Exe
Form=Form1.frm
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\STDOLE2.TLB#OLE Automation
Startup="Form1"
Command32=""
Name="Project1"
HelpContextID="0"
CompatibleMode="0"
MajorVer=1
MinorVer=0
RevisionVer=0
AutoIncrementVer=0
ServerSupportFiles=0
VersionCompanyName="BaterStudio"
CompilationType=0
OptimizationType=0
FavorPentiumPro(tm)=0
CodeViewDebugInfo=0
NoAliasing=0
BoundsCheck=0
OverflowCheck=0
FlPointCheck=0
FDIVCheck=0
UnroundedFP=0
StartMode=0
Unattended=0
Retained=0
ThreadPerObject=0
MaxNumberOfThreads=1

[MS Transaction Server]
AutoRefresh=1

以下是文件Form1.frm里包括按鈕信息的文件內容
VERSION 5.00
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 5835
ClientLeft = 60
ClientTop = 345
ClientWidth = 4380
LinkTopic = "Form1"
ScaleHeight = 5835
ScaleWidth = 4380
StartUpPosition = 3 'Windows Default
Begin VB.CommandButton Command3
Caption = "="
Height = 615
Index = 2
Left = 1920
TabIndex = 17
Top = 4440
Width = 615
End
Begin VB.CommandButton Command3
Caption = "."
Height = 615
Index = 1
Left = 1200
TabIndex = 16
Top = 4440
Width = 615
End
Begin VB.CommandButton Command3
Caption = "C"
Height = 615
Index = 0
Left = 480
TabIndex = 15
Top = 4440
Width = 615
End
Begin VB.CommandButton Command2
Caption = "÷"
Height = 615
Index = 3
Left = 3360
TabIndex = 14
Top = 3120
Width = 615
End
Begin VB.CommandButton Command2
Caption = "×"
Height = 615
Index = 2
Left = 3360
TabIndex = 13
Top = 2400
Width = 615
End
Begin VB.CommandButton Command2
Caption = "-"
Height = 615
Index = 1
Left = 3360
TabIndex = 12
Top = 1680
Width = 615
End
Begin VB.CommandButton Command2
Caption = "+"
Height = 615
Index = 0
Left = 3360
TabIndex = 11
Top = 960
Width = 615
End
Begin VB.CommandButton Command1
Caption = "9"
Height = 615
Index = 9
Left = 1920
TabIndex = 10
Top = 960
Width = 615
End
Begin VB.CommandButton Command1
Caption = "8"
Height = 615
Index = 8
Left = 1200
TabIndex = 9
Top = 960
Width = 615
End
Begin VB.CommandButton Command1
Caption = "7"
Height = 615
Index = 7
Left = 480
TabIndex = 8
Top = 960
Width = 615
End
Begin VB.CommandButton Command1
Caption = "6"
Height = 615
Index = 6
Left = 1920
TabIndex = 7
Top = 1680
Width = 615
End
Begin VB.CommandButton Command1
Caption = "5"
Height = 615
Index = 5
Left = 1200
TabIndex = 6
Top = 1680
Width = 615
End
Begin VB.CommandButton Command1
Caption = "4"
Height = 615
Index = 4
Left = 480
TabIndex = 5
Top = 1680
Width = 615
End
Begin VB.CommandButton Command1
Caption = "3"
Height = 615
Index = 3
Left = 1920
TabIndex = 4
Top = 2400
Width = 615
End
Begin VB.CommandButton Command1
Caption = "2"
Height = 615
Index = 2
Left = 1200
TabIndex = 3
Top = 2400
Width = 615
End
Begin VB.CommandButton Command1
Caption = "1"
Height = 615
Index = 1
Left = 480
TabIndex = 2
Top = 2400
Width = 615
End
Begin VB.CommandButton Command1
Caption = "0"
Height = 615
Index = 0
Left = 480
TabIndex = 1
Top = 3120
Width = 615
End
Begin VB.TextBox Text1
Height = 285
Left = 480
TabIndex = 0
Top = 240
Width = 3495
End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Dim mem1 As Long, mem2 As Long, mem3 As Long

Dim calc As Integer

Private Sub Command1_Click(Index As Integer)
Text1.Text = Text1.Text & Index
End Sub

Private Sub Command2_Click(Index As Integer)
calc = Index
mem1 = Text1.Text: Text1.Text = ""
End Sub

Private Sub Command3_Click(Index As Integer)
Select Case Index
Case 0
Text1.Text = ""
mem1 = 0: mem2 = 0: mem3 = 0
Case 1
Text1.Text = Text1.Text & "."
Case 2
mem2 = Text1.Text: Text1.Text = ""
Select Case calc
Case 0 '+
mem3 = mem1 + mem2
Case 1 '-
mem3 = mem1 - mem2
Case 2 '*
mem3 = mem1 * mem2
Case 3 '/
mem3 = mem1 / mem2
End Select
Text1.Text = mem3
End Select
End Sub

3. 計算器怎麼做

1、首先,新建一個文本文件,命名為「計算器.txt」,你也可以命名為其他的,但是不能沒有後綴「.txt」。

2、雙擊打開,進入記事本,初次使用記事本,先熟悉一下界面,白色的區域是編輯區,最上方有標題,標題和編輯區中間有工具欄,這個界面的最下方是狀態。

3、這一步很重要,需要輸入一些代碼

4、最後一步,在狀態欄確定一下有沒有一個區域顯示ANSI,如果沒有,請點擊文件選項卡,在菜單中點擊另存為,彈出來的對話框中文件名為「計算器.vbe」,類型為「所有文件」,編碼選擇ANSI;如果有ANSI,那麼你先記差號,有一個對話框詢問你是否保存,點擊保存按鈕,然後把文件重命名為「計算器.vbe」。

拓展資料:

計算器上的各個鍵所代表的意思如下:

1、上電、全清鍵(ON、AC):按下該鍵表示上電,或清除所有寄存器中的數值。

2、清除鍵(C):在數字輸入期間,第一次按下此鍵將清除除存儲器內容外的所有數值。

3、清除輸入鍵(CE):在數字輸入期間按下此鍵將清除輸入寄存器中的值並顯示"0"。

4、平方根勾:顯示一個輸入正數的平方根。

5、M+:把目前顯示的值放在存儲器中;中斷數字輸入。

6、M-:從存儲器內容中減去當前顯示值;中斷數字輸入。

7、MRC:第一次按下此鍵將調用存儲器內容,第二次按下時清除存儲器內容。

8、MR:調用存儲器內容。

9、MC:清除存儲器內容。

10、GT:按下GT鍵,傳送GT存儲寄存器內容到顯示寄存器;按AC或C鍵消除GT顯示標志。

11、MU(Mark-up and Mark-down鍵):按下該鍵完成利率和稅率計算。

12、MRC:第一次按下此鍵將調用存儲器內容,第二次按下時清除存儲器內容。

4. 怎麼把學生計算器改造成游戲機

環境設計專業老師周韋緯說:我們帶著學生一起做鄉村的改造是純公益性的,一方面可以鍛煉學生的專業能力,讓學生在具體的實踐中去磨煉自身的技能。一方面,我們的設計方案也確實能夠得到鄉村的採用,在環境改造中提升鄉村居民的生活水平,為鄉村的旅遊也和集體經濟的發展起到很好的助推作用。
此外,我們學校還專門開辟了一個公共信息平台,家長通過這個平台可隨時了解子弟的情況,學生根本沒有配帶手機的必要。前不久,我校一位學生家長花18多元給小孩買了個游戲機,帶到學校,結果不出三天就丟了。並且,學生在星期五丟了游戲機時,又不及時報告班主任和學校,直到星期一,班主任才知道學生丟了游戲機。
家長沒有精力、沒有能力輔導,計算器可以輔導嗎?如果計算器能輔導,讓學生學到計算方法,或者更根本的獨立思考解決問題的方法,計算器就是老師,教育部歡迎還來不及,怎麼會禁止?但是計算器顯然不能。它擅長的就是替學生做,而不是教學生做。
4月,北京大學醫學部、北京大學兒童青少年衛生研究所出具的權威評估報告顯示:立達信健康光環境改造項目顯著提升了教室的照明環境,在一定程度上可預防中小學生視力下降和降低不良視力的新發率。 五年來,對改造校與多所未改造校共計39068名學生的視力情況進行追蹤。數據顯示,立達信改造校學生視力不良率顯著低於未改造校,且各年齡組下降5.9~33.3%不等。

5. 怎麼用51單片機做簡易計算器

先製作出數字顯示電路,還有相應數字按鍵電路,需要幾位數就用幾個數碼管,然後根據計算邏輯編寫出相應C程序

6. 用Scratch做計算器程序,以支持多位數的任意四則運算(加減乘除)

將計算結果設為a
scratch的模塊體有很多類,請告知具體情況。以下是幾種其他語言的基本方法,復雜但簡單。
python:
a = int(input())
b = int(input())
print(a+b)
C++/C:
#include <iostream>
using namespace std;
int main(){
int a,b;

cin>>a>>b;
cout>>a+b;

總之大致意思就是輸入兩個加數,並給他們取名(也就是變數名),再列印出變數名+變數名;當然你也可以用一種更簡單的方法:直接列印兩個加數的和。

7. 用VB做一個簡單的計算器,該怎麼做

我是搶劫的,把分給我吧
首先建立一個command1 然後剪切復制 系統提示說已經有一個COMMAND1 是否要建立控制項數組?
你點擊是 這樣重復9次 分別把caption該成0到9 然後建立command2 方法同上,caption為 +-*/ 然後是 command3 caption是=
然後輸入代碼,首先在通用里生命dim shu1,shu2
dim suanfu as string
private sub command1(index)_click
text1.text=text1.text & commmand1(index).capton
end sub
command2里 輸入
shu1=text1.text
suanfu=text1.text & command(index).capiton
text1.text=""
end sub
command3里輸入
shu2=text1.text
selece case suanfu
case "+"
text1.text=shu1+shu2
case "-"
text1.text=shu1-shu2
case "*"
text1.text=shu*shu2
case "/"
if shu2=0 then
msgbox "分母不能為0"
else text1.text=shu1/shu2
end if
end select
end sub
這是最簡單的計算器的 如果還需要什麼功能 我也可以告訴你的 我學VB3個月了 略有小成 所以想來照顧新手的 我以前也是新手啊 新手見新手兩眼淚旺旺 順便把分給我吧