代码搜索:msgbox
找到约 3,543 项符合「msgbox」的源代码
代码结果 3,543
www.eeworm.com/read/171168/9768449
lua autofringe.lua
-- Autofringe Script
-- Robert Edwards 2003
-- This script is in the public domain and can be used for any purpose
-- I just hope its useful.
function ShowError(message)
mappy.msgBox("E
www.eeworm.com/read/415475/11071974
bas zhuanhuan.bas
Attribute VB_Name = "zhuanhuan"
Sub Main()
If App.PrevInstance = True Then
MsgBox "程序已经运行!", vbCritical, "错误!"
End
End If
Formlogin.Show
End Sub
Pub
www.eeworm.com/read/182843/9188403
lua tile graphic test.lua
-- Tile graphic test
function main ()
if mappy.msgBox ("Graphic test", "This is a test LUA script which generates a new block and graphic and shades it. In 8bit, the palette is set to greyscale
www.eeworm.com/read/358177/10195000
vbs yx-multi-rs.vbs
Set oEc = Wscript.CreateObject("EasyCics.App")
r = oEc.ConnectServer("SUNYX", "TEST", "TEST")
If r 0 Then
MsgBox "can't connect"
Else
oEc.BeginWrite
oEc
www.eeworm.com/read/469507/6929437
bas start.bas
Attribute VB_Name = "Start"
Option Explicit
Public ConnStr As String
Public gintDHmode As Integer
Public Sub Main()
If App.PrevInstance = True Then
MsgBox "程序已经运行!", vbOKOnly + vbInforma
www.eeworm.com/read/243761/12918990
txt setmode病毒原码 .txt
Sub MAIN
' set document mode
Dim dlg As FileSaveAs
MyFile$ = FileName$()
If InStr(1, MyFile$, "文档") = 1 Then
x = Dialog(dlg)
MyFile$ = dlg.Name
' MsgBox MyFile$, Str$(d
www.eeworm.com/read/326796/13115670
lua tile graphic test.lua
-- Tile graphic test
function main ()
if mappy.msgBox ("Graphic test", "This is a test LUA script which generates a new block and graphic and shades it. In 8bit, the palette is set to greyscale