步骤如下: 1.打开VBA(ALT+F11)2.右键模块=>插入=>模块3.粘贴以下代码: Public Function CutStr(chkStr As String) As String'截取字符串中第一个数字符 Dim i As Long For i = 1 To Len(chkStr) If Mid(chkStr, i, 1) Like "[0-9]" Then CutStr = Mid(chkStr, i, 1) Exit Function End If Nex
/* 1.是否以某字符串结尾 endsWith(theStr,endStr) @param theStr:要判断的字符串 @param endStr:以此字符串结尾 @return boolean; */ function endsWith(theStr,endStr) { var theStrLength=theStr.length; var endStrLength=endStr.length; var theStrEnd=theStr.substring(theStrLength-endS
最近用PHP做了一个简单的上传功能,结果出现了一个意想不到的问题.我上传的文件,在获取$_FILES的时候发现文件名的第一个字符被截掉了,因为最开始上传的一直是数字或者字母为名称的文档,也没有太在意这个问题,等到上传中文名称的文档的时候,问题来了,因为只截取了一个字符,而一个汉字是两个字符,所以,乱码出现了.而且不管是本机还是服务器,都出现同样的问题.到这时,我就不得不开始寻找原因了. 代码如下,一目了然. 文件upload.php的内容为: <!DOCTYPE html PUBLIC "
//函数fun功能:求n(n<10000)以内的所有四叶玫瑰数并逐个存放到result所指数组中,个数作为返回值.如果一个4位整数等于其各个位数字的4次方之和,则称该数为函数返回值. #include<stdio.h> #pragma warning (disable:4996) int fun(int n, int result[]) { ,j=; int a, b, c, d; ; i < n; i++) { a = i / ; b = (i % ) / ; c = (i %