当前位置 > vb代码表vb代码查询表
-
怎样用VB实现 姓名代码表 查询
Private Sub Command1_Click() Text2.Text = "" s = Trim(Text1.Text) For i = 1 To Len(s) x = Asc(Mid(s, i, 1)) + 65536 Text2.Text = Text2.Text & Mid(s, i, 1) & " " & x \ 256 160 & Format(x Mod 256 160, "00") &am...
2024-08-28 网络 更多内容 360 ℃ 629 -
常用vb的编程代码
先在程序中加一个Label,名字应该符合VB程序控件命名规范: lbl<名称> 再加一个Timer控件,名字也要符合命名规范 在窗体代码对话框中打入 Private Sub Form_Load() On Error Resume Next Me.Font = "Arial" Me.FontSize = 24 Me.FontBold = True <Timer控件名>.En...
2024-08-28 网络 更多内容 315 ℃ 621 -
vb编程代码大全
Private Type POINTAPI X As Long Y As Long End Type Private Declare Function SelectObject Lib "gdi32" (ByVal hdc As Long, ByVal hObject As Long) As Long Private Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As Long Private Declare Function SetBkColor Lib...
2024-08-28 网络 更多内容 897 ℃ 887 -
VB常用代码
form 窗体的意思,像form和command这样的单词是控件的名称,名称是控件的属性之一,可以在屏幕右侧的属性列表中加以修改,找到name这一行,在右侧键入自己想要的名字即可,不必记忆,至于LostFocus..MouseUp是一些事件的名称,有必要记忆。下面写一些常用的。 lostfocus失去焦点 g...
2024-08-28 网络 更多内容 344 ℃ 892 -
vb的简单代码,
'所有控件在Form_Load中,4个text,6个标签,1个按钮Option ExplicitDim lngTime As Long, lngNN As Long, lngMax As LongPrivate Sub Command1_Click()RandomizeTimer1.Enabled = TruelngTime = 60Label3.Caption = "剩余时间:" & lngTime & "秒"Command1.Enabled = FalseinitTxtlngN...
2024-08-28 网络 更多内容 856 ℃ 175 -
求VB编程常用代码大全?
1.数值型函数:abs(num): 返回绝对值sgn(num): num>0 1; num=0 0; num<0 1;判断数值正负hex(num): 返回十六进制值 直接表示:&Hxx 最大8位oct(num): 返回八进制值 直接表示:&Oxx 最大8位sqr(num): 返回平方根 num>0int(num): 取整 int(99.8)=99; int(99.2)=100fix(num): 取...
2024-08-28 网络 更多内容 398 ℃ 37 -
vb程序代码
要通过注册表操作来进行!注册表RUN下写入键值可以达到这个效果! 比如你按下一个按钮来实现开机自启动! Private Sub command1_Click() CreateKey "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run" SetStringValue &...
2024-08-28 网络 更多内容 227 ℃ 955 -
谁能给我几条常用的vb代码
dim a as long a=100.1 call fun function fun() 。。。。。。 end function 找专业的代码不好找,常用的随便找本破书都能有。
2024-08-28 网络 更多内容 898 ℃ 130 -
谁有vb的一些常用代码
我有,中文的,有近八十兆。如果需要,可到我博客留言,或者Hi我。另外,在我博客力有很多我积攒的代码。http://hi.baidu.com/zgmg
2024-08-28 网络 更多内容 597 ℃ 319 -
vb基础代码
添加一个窗体Form2 打开窗口***.Show 关闭窗口Form2.Hide或Unload Form2 对话框 Msgbox 例:Msgbox"这是对话框!",64,"提示"
2024-08-28 网络 更多内容 945 ℃ 726