易截截图软件、单文件、免安装、纯绿色、仅160KB

vb 实用函数

 转自:http://www.pconline.com.cn/pcedu/empolder/gj/vb/0506/644702.html
Time
返回系统时钟的当前时间。
Date
返回系统时钟的当前日期。
Now
返回代表当前日期和时间的编码值。该函数经常用作其它系统时钟函数的参数。
Hour(Time)
返回指定时间的小时部分(0到23)。
Minute(Time)
返回指定时间的分钟部分(0到59)。
Second(Time)
返回指定时间的秒部分(0到59)。
Day(Date)
返回月份中的日期数(1到31)。
Month(Date)
返回日期中的月份(1到12)。
Year(Date)
返回日期中的年度。
Weekday(Date)
返回日期中代表一周中的星期几。
Abs(n)
返回n的绝对值。
Atn(n)
返回n的反正切值,以弧度为单位。
Cos(n)
返回n的余弦值,以弧度为单位。
Exp(n)
返回e的n次方。
Rnd(n)
产生0到1之间的一个随机数。
Sgn(n)
n小于0时返回-1,n等于0时返回0,n大于0时返回1。
Sin(n)
返回n的正弦值,以弧度为单位。
Sqr(n)
返回n的平方根。
Str(n)
把数值值转换成字符串。
Tan(n)
返回n的正切值,以弧度为单位。
Val(n)
把字符串转换为数值值。
Int(n)
返回数字的整数部分。8.4-->9
Fix(n)
返回数字的整数部分。8.4-->8
以上函数在VB6和VBScript中都适用,在。NET里面要在前面加上相应的命名空间,如System.Math.Cos(),Microsoft.VisualBasic.Hour()。
数据类型转换函数:
转换函数
将表达式转换成
CBool
Boolean
CByte
Byte
CCur
Currency '只在VB7.0以下有效
CDate
Date
CDbl
Double
CInt
Integer
CLng
Long
CSng
Single
CStr
String
CVar
Variant ‘只在VB7.0以下有效
CVErr
Error '只在VB7.0以下有效
若想了解Visual Basic正在使用哪种变量类型,可使用 VarType 函数。
字符串处理函数
关键字
说明
示例
Ucase
将字符串中的字母改为大写
Ucase("Kim")返回KIM
Lcase
将字符串中的字母改为小写
Lcase("Kim")返回kim
Len
确定字符串的长度(以字符为单位)
Len("Mississ")返回7
Right
返回字符串右部指定个数的字符
Right("Budapest",3)返回pes
Left
返回字符串左部指定个数的字符
Left("Budapest",4)返回Buda
Mid
从某一指定起始点开始返回字符串中指定个数的字符
Mid("Sommers", 4, 3) 返回mer
InStr
从一个较大字符串中查找另一个字符
 start% = InStr("bob


相关文档:

用VB Winsock控件创建TCP/IP客户机/服务器程序


转自:http://www.52arm.com/Article_Show.asp?ArticleID=186
 
作者:weidian    ---本站原创    点击数:4721    发表时间:2008-5-7    编辑:sanzang
 
Winsock控件建立在TCP、UDP协议的基础上,完成与远程计算机的 ......

Vb中窗体自定义坐标


开始使用vb的时候喜欢用手画出那个控件的位置.然后一个一个的拖动,一点一点的移动.直到感觉满意了为止.如果是控件多了这个就很麻烦了
一不小心可能会将谋个控件拖到一边去
所以,我们在以后的作品中
尽量使用代码来定义控件位置,,要灵活的掌握坐标位置.,可以使用自定义坐标.使用像素来更好的来分区显示控件.
 
& ......

VB 6.0使用api

这一段大家编写程序很多时候都在使用API,它给我们带来了强大的功能.让我们非常惊喜.
但是我们在调试程序的时候有时候总会奔溃.这样很不方便.
其中有些是api惹的祸
使用api注意事项:
首先我说说我的观点.
1:Api是很多系统也在用.我们在设置参数时如果和系统的参数有冲突.就可能引起软件出错
2.api很多都是c语言编写的, ......

VB登陆163邮箱

添加2个text,一个command,一个 WebBrowser
Dim vDoc, vTag
Dim i As Integer
Private Sub Command1_Click()
Set vDoc = WebBrowser1.Document
For i = 0 To vDoc.All.length - 1
If UCase(vDoc.All(i).tagName) = "INPUT" Then
Set vTag = vDoc.All(i)
If vTag.Type = "text" Then
Select Case vTag.Nam ......

VB与C#互转工具

http://www.carlosag.net/Tools/CodeTranslator/ 这个也许学计算机的哥哥姐姐们会用得到,,就转了希望多多支持哦 西西  用得到就顶哦
差点忘了哦    ,藕还有一个sql的插件很好用的呀。。。。有想要的就留言下要咯。。。。。 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号