代码搜索：msgbox
找到约 3,543 项符合「msgbox」的源代码
代码结果 3,543
www.eeworm.com/read/252808/12262187
bas 备份.bas
Attribute VB_Name = "备份"
'
' If getDB Then '如果 weboy 数据库存在，则...
' If getUsersTable And getConsumersTable Then '如果 users 表及 consumer 表存在，则...
'
www.eeworm.com/read/234226/14118235
vbs changetime.vbs
Flag=0
TimeGetF=100
TimeNum=TimeGetF*60
Sub ChangeTime()
TimeNum=TimeNum-1
TimeNumF=TimeNum\60
TimeNumM=TimeNum mod 60
if TimeNumF
www.eeworm.com/read/231973/14213066
vb clsdboperation.vb
'****************************************************************************
'人人为我，我为人人
'枕善居汉化收藏整理
'发布日期：2007/07/23
'描 述：网吧计费管理系统客户端/服务器端
'网 站：http://www.Mndsoft.com/ (VB6源码博客)
'网 站：
www.eeworm.com/read/129736/14230145
frm frmland.frm
VERSION 5.00
Begin VB.Form frmLand
BackColor = &H00404040&
Caption = "登陆"
ClientHeight = 4620
ClientLeft = 60
ClientTop = 450
ClientWidt
www.eeworm.com/read/129736/14230157
bas 备份.bas
Attribute VB_Name = "备份"
'
' If getDB Then '如果 weboy 数据库存在，则...
' If getUsersTable And getConsumersTable Then '如果 users 表及 consumer 表存在，则...
'
www.eeworm.com/read/129138/14263194
vbs changetime.vbs
Flag=0
TimeGetF=100
TimeNum=TimeGetF*60
Sub ChangeTime()
TimeNum=TimeNum-1
TimeNumF=TimeNum\60
TimeNumM=TimeNum mod 60
if TimeNumF
www.eeworm.com/read/230581/14281141
ats while.ats
Section Main
var @a as atsint
@a = 1
While @a < 5
msgbox @a
@a = @a +1
Wend
End Section
www.eeworm.com/read/230581/14281151
ats do.ats
Section Main
var @a as atsint
@a = 1
do @a < 5
msgbox @a
@a = @a +1
loop @a < 5
End Section
www.eeworm.com/read/230581/14281154
ats testmyobj.ats
Section Main
var @a as AtsString
@a = myobj.getname()
msgbox @a
End Section