在日常的學習與工作中經(jīng)常需要計數(shù)，您還在紙上畫“正”計數(shù)嗎？今天“編輯之譚”信息給大家演示：以淘寶網(wǎng)“文章代寫”交易用戶評價信息的統(tǒng)計研究為例，利用Excel軟件編寫簡單的VB宏程序設計一個“正”字計數(shù)器。去看看！

近期在返修《中國科技期刊研究》(CSSCI)投稿的修改稿，需要補充關(guān)于論文代寫交易記錄及用戶評價消息的相關(guān)大數(shù)據(jù)分析。上一篇推文告誡過：學術(shù)道德的底線不可逾越，要對論文交易Say no！

圖1是萬能某寶網(wǎng)（什么都可以買賣?。┥?ldquo;代寫”關(guān)鍵詞搜索到的截圖（共4400多條結(jié)果，圖1僅顯示極少部分，圖中圓圈圖案是譚編打上去的圖章！）。

圖1 某寶網(wǎng)“代寫”交易產(chǎn)品（部分）

譚編選擇銷量第一的“美啊美旗艦店”的其中一個“代寫”產(chǎn)品，對其用戶評價記錄進行人工分類（編寫爬蟲應該可以自動抓取評價記錄，并可進行語義關(guān)鍵詞的自動統(tǒng)計與分類，但限于時間，暫時不采用爬蟲編程，后續(xù)譚編會嘗試Spider程序）。

例如翻閱評價消息，判斷并分3類：①代寫服務質(zhì)量評價（速度快、文筆好、質(zhì)量高、包修改、失望）；②代寫文章需求類型（總結(jié)報告、演講稿、領導報告、報獎材料、簡歷）；③求助代寫的原因（急、忙、不會寫）。

譚編起初采用傳統(tǒng)方法：在紙上畫“正”計數(shù)，如圖2所示。

圖2 傳統(tǒng)“畫正計數(shù)”法

數(shù)據(jù)量大，正字不夠位置畫了。那就設計一個Excel“正”字計數(shù)器！

利用Excel程序(這里使用的是國產(chǎn)WPS辦公系統(tǒng)，您也可以采用Office的Excel程序），設計一張報表如圖3所示。所有按鈕其實已經(jīng)繪制好了，下面的截圖只是演示一二。

第一步：Excel中按鈕的繪制

點擊菜單“開發(fā)工具”，再點擊工具欄中的按鈕，鼠標指針變?yōu)槭志€，可以在需要繪制按鈕的地方，拖動鼠標然后松開鼠標來實現(xiàn)對按鈕的繪制，如圖3所示。

圖3 按鈕的繪制

修改按鈕的標題：右鍵點擊按鈕，然后選擇“屬性”，即可彈出“屬性”對話框，將Caption右邊的屬性值改為想要的內(nèi)容，如“速度快”等。如圖4所示。

圖4 按鈕標題的修改

第二步：VB“宏”程序的編寫

點擊按鈕右鍵選擇“指定宏”，在彈出的VB編輯器中，輸入程序代碼：range("A6") =range("A6")+1。由于每個按鈕的運行事件都是累加操作，所有的模塊代碼均相似，只需要修改模塊名稱及代碼中單元格即可。如圖5所示。

圖5 VB宏程序的設計

設計一個“減”按鈕，萬一點錯多加1次，點擊“減”按鈕可以減1，則宏代碼：

第三步：給按鈕指定宏

“退出設計”，右鍵點擊按鈕，選擇“指定宏”，在彈出的對話框中選擇相應的宏名稱。類似設置其他所有按鈕。如圖6所示。

圖6 給按鈕配置宏

宏程序已經(jīng)配置成功，下面看看效果（圖7），點擊相應按鈕后，相應單元格的數(shù)字在原值的基礎上累加1，達到了預期的效果。

圖7 Excel“正”字計數(shù)器演示效果

考慮到在同一屏幕，既要顯示淘寶網(wǎng)頁，又要在EXCEL中點擊按鈕計數(shù)，進一步將該Excel表格重新編排成豎排列，如圖8所示。

圖8 豎排計數(shù)器

后續(xù)待譚編修改的這篇論文刊出后，再跟大家分享研究結(jié)果。