添加兩個(gè)按鈕,在畫(huà)兩個(gè)三角形,一個(gè)箭頭朝上,一個(gè)箭頭朝下。
然后把一個(gè)朝上的箭頭放在第一個(gè)按鈕上,再把朝下的箭頭放在另一個(gè)按鈕上。
下一步是鼠標(biāo)選中第一個(gè)按鈕和箭頭朝上的三角形,鼠標(biāo)右鍵--自定義--添加一個(gè)鼠標(biāo)左鍵動(dòng)作事件,
這樣按鈕和三角形箭頭就成了一個(gè)整體的按鈕,并且還有了個(gè)鼠標(biāo)左鍵動(dòng)作的事件,另外一個(gè)按鈕和下箭頭同第一個(gè)一樣操作。
最后在自定義好的按鈕里選擇屬性---事件---左鍵動(dòng)作用VBS代碼和C來(lái)實(shí)現(xiàn)。
VBS代碼如下:
上箭頭加數(shù)值按鈕;點(diǎn)動(dòng)一次往變量as里加一
dim dat,dat1
dat=dat+1
Set dat1=HMIRuntime.Tags("as")
dat1.write dat
下箭頭減數(shù)值按鈕;點(diǎn)動(dòng)一次往變量as里減一
Dim dat, dat1,,dat2
Set dat=HMIRuntime.Tags("as")
dat, read dat2
dat2=dat2-1
Set dat1=HMIRuntime.Tags("as")
dat1.write dat2