判斷吧,如果點(diǎn)擊+按鈕,則一個全局變量為1,-按鈕,則全局變量為2.以此類推,然后if或case判斷哪個數(shù),如果為1,就兩個數(shù)相加。
成都創(chuàng)新互聯(lián)聯(lián)系電話:028-86922220,為您提供成都網(wǎng)站建設(shè)網(wǎng)頁設(shè)計及定制高端網(wǎng)站建設(shè)服務(wù),成都創(chuàng)新互聯(lián)網(wǎng)頁制作領(lǐng)域10余年,包括火鍋店設(shè)計等多個方面擁有多年的網(wǎng)站設(shè)計經(jīng)驗(yàn),選擇成都創(chuàng)新互聯(lián),為企業(yè)錦上添花。
我給出VB.net中的代碼,在VB6中你需要稍加刪改..
Public i As Short
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
i = i + 1
If i = 5 Then
Call Button2_Click(sender, e)
End If
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
i = 0
MsgBox("按鈕2被單擊!")
End Sub
拖三個textbox,一個button
在窗體上雙擊button1,在自動生成的button1的Click事件中:
textbox2.text=val(textbox1.text)^2
textbox3.text=val(textbox1.text)^3
定義一個全局的變量存放你點(diǎn)擊操作符時框內(nèi)的數(shù)值
再變量加框中的值
不過你點(diǎn)加時要判斷一下(A+B+C+)有沒有別一個加數(shù)
計算機(jī)光要加減乘除的那種嗎?
先在窗口添加一個textbox文本框名字是textbox1,再添加一個標(biāo)簽,屬性text:(為一個空格)名字是label1,再加一個textbox文本框,名字是textbox2,加標(biāo)簽,名字是label2,屬性text:“=”(引號不算),在后面加一個文本框,名字為textbox3.下一行添加五個按鈕,名字分別是Button1(屬性text:加),Button2(屬性text:減).……最后一個是,清空,按鈕
雙擊Button1,輸入代碼:dim a,b,c as single(回車!)a=textbox1.text(!)b=textbox2.text(!)a+b=c(!),textbox3=c(!)
后面分別點(diǎn)擊不同的按鈕,把“+”改成“-”,“*”“/”行了
雙擊最后按鈕輸入textbox1=""(!)textbox2=""(!)textbox3=""就ok了,累死我了呵呵(?。┍硎净剀嚢?/p>
分享文章:關(guān)于vb.net按鈕計算的信息
瀏覽地址:http://jinyejixie.com/article26/dodogjg.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供定制網(wǎng)站、網(wǎng)站導(dǎo)航、面包屑導(dǎo)航、標(biāo)簽優(yōu)化、品牌網(wǎng)站建設(shè)、響應(yīng)式網(wǎng)站
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)