摘要: 加一个中间文书存储doc: If Not udoc Is Nothing Then Dim askme As Integer askme = ws.Prompt (PROMPT_YESNO, _ "クリアの確認", "既にデータがあります、先月のデータを直接削除しますか?手操作で削除しますか?") ... 阅读全文
posted @ 2014-06-27 14:23 塔斯曼 阅读(169) 评论(0) 推荐(0) 编辑
摘要: message并不能达到想要的目的: If Not udoc Is Nothing Then 'MessageBox "既にデータがあります、先月のデータを削除してください。",MB_OK,"クリア確認" If MessageBox("既にデータがあります、先月のデータを削除しますか?", _ ... 阅读全文
posted @ 2014-06-27 13:53 塔斯曼 阅读(241) 评论(0) 推荐(0) 编辑