
Abs(n):取绝对值
Rnd(n):产生随机数
Sqr(n):平放根
Asc(c):转换成ASCII码
chr(n):ASCII码转换成字符
str(n):数值转换为字符
val(n):字符转换为数值
Len(n):测试字符串长度
left(n):取字符串左边n个字符
right(n):去字符串右边n个字符
Ltrim(n):去掉字符串左边的空格
Rtrim(n):去掉字符串右边的空格
mid(c,n1,n2):从n1位开始取n2个字符
InStr(c1,c2):在字符串C1中查找C2
Ucase(c):将C转换成大写字母
Lcase(c):将C转换成小写字母
Date[$]:取系统日期
time[4]:取系统时间
Day(c|n):去日期值
Month(c|n):去月份值
Year(c|n):取年份值
Atn:返回参数的反正切值
cos:返回参数的大小角的余弦值
Exp:e的某次方
Log:返回参数的自然对数
Sgn:返回-1,0或1,当参数是小于0时返回-1,大于0时返回1;否则返回0
sin:返回参数的正弦值
Tan:返回参数大小角的正弦值
LenB:字符串所占字节数(不是字符长度)
string:返回单个由字符组成的指定的字符串
不能准确理解你的意思,仅提供下面模拟键盘按键事件的代码供参考或修改:
Option Explicit
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Integer
'判断函数调用时指定虚拟键的状态
Private Sub Command1_Click()
Label1Caption = ""
End Sub
Private Sub Form_Load()
Timer1Interval = 1
End Sub
Private Sub Timer1_Timer()
If MyHotKey(vbKeyV) And MyHotKey(vbKeyB) Then Label1Caption = "欢迎与我交流VB"
'If MyHotKey(vbKeyF11) Then Label1Caption = "欢迎与我交流VB"
End Sub
Private Function MyHotKey(vKeyCode) As Boolean
MyHotKey = (GetAsyncKeyState(vKeyCode) < 0)
End Function
(1) 用API函数keybd_event,这个函数可以用来模拟一个键盘事件,它的VB声明为: Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long) 参数bVk表示要模拟的按键的虚拟码,bScan表示该按键的扫描码(一般可以传0)dwFlags表示是按下键还是释放键(按下键为0,释放键为2),dwExtraInfo是扩展标志,一般没有用。比如要模拟按下A键,可以这样:Const KEYEVENTF_KEYUP = &H2 keybd_event VK_A, 0, 0, 0 '按下A键 keybd_event VK_A, 0, KEYEVENTF_KEYUP, 0 '释放A键 注意有时候按键的速度不要太快,否则会出问题,可以用API函数Sleep来进行延时,声明如下: Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) 参数dwMilliseconds表示延时的时间,以毫秒为单位。 那么如果要模拟按下功能键怎么做呢?比如要按下Ctrl+C实现拷贝这个功能,可以这样: keybd_event VK_Ctrl, 0, 0, 0 '按下Ctrl键 keybd_event VK_C, 0, 0, 0 '按下C键 Sleep 500 '延时500毫秒 keybd_event VK_C, 0, KEYEVENTF_KEYUP, 0 '释放C键 keybd_event VK_Ctrl, 0, KEYEVENTF_KEYUP, 0 '释放Ctrl键
以上就是关于VB中都有些什么常用的英文单词各代表什么意思全部的内容,包括:VB中都有些什么常用的英文单词各代表什么意思、vb6.0模拟按键,比如按abc,123,tab,enter之类的、键盘的按键在VB代码里怎么表示等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)