高級表格取選擇任意行列的內(nèi)容
.版本 2.支持庫 eGrid.程序集 窗口程序集1.子程序 __啟動(dòng)窗口_創(chuàng)建完畢高級表格1.置數(shù)據(jù) (1, 1, #表格常量.文本型, “我”)高級表格1.置數(shù)據(jù) (1, 2, #表格常量.文本型, “愛”)高級表格1.置數(shù)據(jù) (1, 3, #表格常量.文本型, “你”)高級表格1.置數(shù)據(jù) (1, 4, #表格常量.文本型, “你”)高級表格1.置數(shù)據(jù) (1, 5, #表格常量.文本型, “愛”)高級表格1.置數(shù)據(jù) (1, 6, #表格常量.文本型, “我”)高級表格1.置數(shù)據(jù) (2, 1, #表格常量.文本型, “易”)高級表格1.置數(shù)據(jù) (2, 2, #表格常量.文本型, “語”)高級表格1.置數(shù)據(jù) (2, 3, #表格常量.文本型, “言”)高級表格1.置數(shù)據(jù) (2, 4, #表格常量.文本型, “我”)高級表格1.置數(shù)據(jù) (2, 5, #表格常量.文本型, “愛”)高級表格1.置數(shù)據(jù) (2, 6, #表格常量.文本型, “你”)高級表格1.置數(shù)據(jù) (3, 1, #表格常量.文本型, “我”)高級表格1.置數(shù)據(jù) (3, 2, #表格常量.文本型, “愛”)高級表格1.置數(shù)據(jù) (3, 3, #表格常量.文本型, “你”)高級表格1.置數(shù)據(jù) (3, 4, #表格常量.文本型, “易”)高級表格1.置數(shù)據(jù) (3, 5, #表格常量.文本型, “語”)高級表格1.置數(shù)據(jù) (3, 6, #表格常量.文本型, “言”)高級表格1.置數(shù)據(jù) (4, 1, #表格常量.文本型, “腳”)高級表格1.置數(shù)據(jù) (4, 2, #表格常量.文本型, “本”)高級表格1.置數(shù)據(jù) (4, 3, #表格常量.文本型, “之”)高級表格1.置數(shù)據(jù) (4, 4, #表格常量.文本型, “家”)高級表格1.置數(shù)據(jù) (4, 5, #表格常量.文本型, “j”)高級表格1.置數(shù)據(jù) (4, 6, #表格常量.文本型, “b”)高級表格1.置數(shù)據(jù) (4, 7, #表格常量.文本型, “5”)高級表格1.置數(shù)據(jù) (5, 1, #表格常量.文本型, “1”)高級表格1.置數(shù)據(jù) (5, 2, #表格常量.文本型, “.”)高級表格1.置數(shù)據(jù) (5, 3, #表格常量.文本型, “n”)高級表格1.置數(shù)據(jù) (5, 4, #表格常量.文本型, “e”)高級表格1.置數(shù)據(jù) (5, 5, #表格常量.文本型, “t”)高級表格1.置數(shù)據(jù) (6, 1, #表格常量.文本型, “共”)高級表格1.置數(shù)據(jù) (6, 2, #表格常量.文本型, “同”)高級表格1.置數(shù)據(jù) (6, 3, #表格常量.文本型, “學(xué)”)高級表格1.置數(shù)據(jù) (6, 4, #表格常量.文本型, “習(xí)”)高級表格1.置數(shù)據(jù) (6, 5, #表格常量.文本型, “吧”).子程序 _按鈕_取表格行_被單擊.局部變量 起始列, 整數(shù)型.局部變量 終止列, 整數(shù)型.局部變量 i, 整數(shù)型.局部變量 數(shù)據(jù), 文本型起始列 = 到數(shù)值 (編輯框_行.內(nèi)容)輸出調(diào)試文本 (“起始列:” + 到文本 (起始列))終止列 = 高級表格1.列數(shù)輸出調(diào)試文本 (“終止列:” + 到文本 (終止列)).變量循環(huán)首 (1, 終止列, 1, i) .如果真 (到文本 (高級表格1.取數(shù)據(jù) (起始列, i)) ≠ “假”) ' 因未選擇的單元格會(huì)返回假,所以要去掉取出的文本“假”字 數(shù)據(jù) = 數(shù)據(jù) + 到文本 (高級表格1.取數(shù)據(jù) (起始列, i)) .如果真結(jié)束.變量循環(huán)尾 ()信息框 (數(shù)據(jù), 0, ).子程序 _按鈕_取表格列_被單擊.局部變量 起始行, 整數(shù)型.局部變量 終止行, 整數(shù)型.局部變量 i, 整數(shù)型.局部變量 數(shù)據(jù), 文本型起始行 = 到數(shù)值 (編輯框_列.內(nèi)容)輸出調(diào)試文本 (“起始行:” + 到文本 (起始行))終止行 = 高級表格1.行數(shù)輸出調(diào)試文本 (“終止行:” + 到文本 (終止行)).變量循環(huán)首 (1, 終止行, 1, i) .如果真 (到文本 (高級表格1.取數(shù)據(jù) (起始行, i)) ≠ “假”) ' 因未選擇的單元格會(huì)返回假,所以要去掉取出的文本“假”字 數(shù)據(jù) = 數(shù)據(jù) + 到文本 (高級表格1.取數(shù)據(jù) (i, 起始行)) .如果真結(jié)束.變量循環(huán)尾 ()信息框 (數(shù)據(jù), 0, ).子程序 _按鈕_取表格任意行列_被單擊.局部變量 起始行, 整數(shù)型.局部變量 起始列, 整數(shù)型.局部變量 終止行, 整數(shù)型.局部變量 終止列, 整數(shù)型.局部變量 i, 整數(shù)型.局部變量 數(shù)據(jù), 文本型.局部變量 N, 整數(shù)型起始行 = 高級表格1.取選擇起始行 ()終止行 = 高級表格1.取選擇終止行 ()起始列 = 高級表格1.取選擇起始列 ()終止列 = 高級表格1.取選擇終止列 ().如果真 (起始行 = -1 或 起始列 = -1) 信息框 (“未選擇表格!”, 0, ) 返回 ().如果真結(jié)束.變量循環(huán)首 (起始行, 終止行, 1, N) .變量循環(huán)首 (起始列, 終止列, 1, i) 數(shù)據(jù) = 數(shù)據(jù) + 到文本 (高級表格1.取數(shù)據(jù) (N, i)) .變量循環(huán)尾 ().變量循環(huán)尾 ()信息框 (數(shù)據(jù), 0, )
運(yùn)行結(jié)果:
總結(jié)
以上就是這篇文章的全部內(nèi)容了,希望本文的內(nèi)容對大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值,謝謝大家對VeVb武林網(wǎng)的支持。
新聞熱點(diǎn)
疑難解答