cLeft(string, length) 返回指定数目的从字符串的左边算起的字符,区分单双字节。 如: Dim MyString, LeftString MyString = "文字测试VB
因为比较简单,我就不说什么了。一看就明白的! Function ChkStr(InString) If InString<>"" Then ?InString=Replace(LC
因为比较简单,我就不说什么了。一看就明白的! Function ChkStr(InString) If InString<>"" Then InString=Replace(LCas
最近有一个计算周的需要,看了网上现成的代码,不太合适,只好自己动手了。 默认把该年第一个星期一作为第一周的开始。 '计算某年第一周开始日期 function firstday(inputyea
文章来源: 视点设计 8see.net rem ---表单提示函数 Being----------------------------- CODE Copy ... Function Chec
1. 返回日期当月天数条件: 已知日期 MonthDays(dtaLocal) DateDiff("d", dtaLocal, DateAdd("m", 1, dtaLocal)) End
function DeleteFile(Filename) '删除文件 if Filename<>"" then Set fso = server.CreateObject("Scr
给大家介绍几个.NET中Path类的几个方法: 1. Path.combine(string, string) 根据给出的两个路径, 返回一个路径. 例如:
/* written by Jaron ,2003-6-8 */ /* 原出处:江都资讯网论坛 http://www.jiangdu.net/bbs */ /* 转载请注明出处和保留此版权信息 *
//函数名:chkemail //功能介绍:检查是否为Email Address //参数说明:要检查的字符串 //返回值:0:不是 1:是 function chkemail