易語言統(tǒng)計重復(fù)數(shù)教學(xué)
更新時間:2019年01月08日 11:48:21 投稿:laozhang
在本篇文章里小編給大家?guī)淼囊黄P(guān)于易語言統(tǒng)計重復(fù)數(shù)教學(xué)內(nèi)容,有興趣的朋友們可以學(xué)習(xí)下。
比如1 2 3 3 5 4 6 5 4 8 7 3 2這么多數(shù)字想取重復(fù)數(shù)據(jù),并統(tǒng)計重復(fù)次數(shù),可以用易語言編程來實現(xiàn)。

1、易語言新建程序

2、新建一個Windows窗口程序

3、如下圖所示,親建2個編輯框,1個選擇框,1個按鈕,并做好相應(yīng)排版。

4、雙擊取重復(fù)按鈕,并編寫如下代碼:
.版本 2
.支持庫 EDataStructure
.局部變量 zcf, 文本型, , "0"
.局部變量 i, 整數(shù)型
.局部變量 ii, 整數(shù)型
.局部變量 個數(shù), 整數(shù)型
.局部變量 節(jié)點, 節(jié)點
zcf = 分割文本 (編輯框1.內(nèi)容, #換行符, )
.計次循環(huán)首 (取數(shù)組成員數(shù) (zcf), i)
個數(shù) = 0
.計次循環(huán)首 (取數(shù)組成員數(shù) (zcf), ii)
.如果真 (zcf [i] = zcf [ii])
個數(shù) = 個數(shù) + 1
.如果真結(jié)束
.計次循環(huán)尾 ()
.如果真 (節(jié)點.加入屬性 (到文本 (zcf [i]), 0))
.如果真 (個數(shù) ≠ 1)
.如果 (選擇框2.選中 = 真)
編輯框2.加入文本 (zcf [i] + “----重復(fù)” + 到文本 (個數(shù)) + “次” + #換行符)
.否則
編輯框2.加入文本 (zcf [i] + #換行符)
.如果結(jié)束
.如果真結(jié)束
.如果真結(jié)束
.計次循環(huán)尾 ()

5、編譯試運行,在編輯框1里面加入一組含重復(fù)項數(shù)據(jù),選擇看重復(fù)項選擇框,點擊取重復(fù)按鈕,重復(fù)數(shù)據(jù)與重復(fù)次數(shù)就出現(xiàn)在右邊的編輯框了,是不是很簡單,如果有幫到您,請點擊左下角的投票哦,希望大家能從本經(jīng)驗中學(xué)到知識收獲快樂。


