摘要: 1.取得日文汉字的读音的方法(例如強→キョウ) Application.Getphonetic(str) 2.保存Excel文件时不弹出是否保存的alter wb.close(false) 3.提示消息不要 Application.displayAlter =false 4.Excel的sheet比 阅读全文
posted @ 2018-08-07 12:49 不刷牙的大虫子 阅读(333) 评论(0) 推荐(0) 编辑
摘要: '在使用下面的代码之前一定要导入包文件(Mictosoft Scripting Runtime),否则有一些文件无法执行过去dim arrFiles(1 to 100) dim cntFile sub GetFile_click() dim strPath as string dim fso as new FileSystemObject dim fd as Folder... 阅读全文
posted @ 2018-08-07 12:33 不刷牙的大虫子 阅读(194) 评论(0) 推荐(0) 编辑
摘要: 全角のみ:"[^\\x20-\\x7E\\uFF66-\\uFF9D]*" 半角のみ:"[\\x20-\\x7E]*" 全角カナのみ:"[\\u30A1-\\u30FF]*" 半角カナのみ:"[\\uFF66-\\uFF9D]*" URL:"https?://.+" メール:"^.+@.+$" 阅读全文
posted @ 2018-08-07 12:23 不刷牙的大虫子 阅读(193) 评论(0) 推荐(0) 编辑
摘要: boolean checkFormate(string parm){ Pattern pattern = Pattern.compile("([0-9]{4})(0[1-9]|1[0-2])(0[1-9]|1[0-2][0-9]|3[0-1])"); Matcher matcher = Pattern.matcher(parm); if(matcher.matches()... 阅读全文
posted @ 2018-08-07 12:16 不刷牙的大虫子 阅读(222) 评论(0) 推荐(0) 编辑