代码搜索：bas

找到约 10,000 项符合「bas」的源代码

代码结果 10,000
热门代码： main.c GPIO I2C SPI UART timer interrupt ADC PWM LED
www.eeworm.com/read/123471/14629578

bas 蚂蚁.bas

Attribute VB_Name = "蚂蚁" Option Explicit Public Map() As Integer Public LiveAntMap() As Integer Public DeadAnt_Num As Integer '死白蚁的数量 Public Row_Num, Col_Num As Integer '范围，一个正方形的边长
·
www.eeworm.com/read/223053/14662895

bas 备份.bas

Attribute VB_Name = "备份" ' ' If getDB Then '如果 weboy 数据库存在，则... ' If getUsersTable And getConsumersTable Then '如果 users 表及 consumer 表存在，则... '
·
www.eeworm.com/read/119177/14837724

bas 变量.bas

Attribute VB_Name = "变量" Option Explicit Public con As ADODB.Connection Public com As ADODB.Command Public rs As ADODB.Recordset Public sqlstr As String
·
www.eeworm.com/read/217878/14945742

bas 备份.bas

Attribute VB_Name = "备份" ' ' If getDB Then '如果 weboy 数据库存在，则... ' If getUsersTable And getConsumersTable Then '如果 users 表及 consumer 表存在，则... '
·
www.eeworm.com/read/217875/14945950

bas 备份.bas

Attribute VB_Name = "备份" ' ' If getDB Then '如果 weboy 数据库存在，则... ' If getUsersTable And getConsumersTable Then '如果 users 表及 consumer 表存在，则... '
·
www.eeworm.com/read/212172/15165009

bas 公用.bas

Attribute VB_Name = "公用" '与我发表的老虎机不同的是使用了BitBlt绘图, '应该说比我的那个还要好, ' 'zfc775 07.1.30 '有话直接留言 zfc775.ys168.com Option Explicit Publ
·
www.eeworm.com/read/209207/15225825

bas on.bas

10 print "ON.BAS -- Test ON...GOTO Statement" 20 input "Enter a number 1-5:";n 30 on n goto 40, 60, 80, 100, 120 40 print "You entered 1" 50 goto 140 60 print "You entered 2" 70 goto 140 80 print "You
·
www.eeworm.com/read/17665/752413

bas 图像.bas

Attribute VB_Name = "图像" Option Explicit '一下代码均来自网络，非本人原创 Const RC_PALETTE As Long = &H100 Const SIZEPALETTE As Long = 104 Const RASTERCAPS As Long = 38 Private Type PALETTEENTRY pe
·
www.eeworm.com/read/441492/1770250

bas 备份.bas

Attribute VB_Name = "备份" ' ' If getDB Then '如果 weboy 数据库存在，则... ' If getUsersTable And getConsumersTable Then '如果 users 表及 consumer 表存在，则... '
·
www.eeworm.com/read/262041/4315865

bas on.bas

10 print "ON.BAS -- Test ON...GOTO Statement" 20 input "Enter a number 1-5:";n 30 on n goto 40, 60, 80, 100, 120 40 print "You entered 1" 50 goto 140 60 print "You entered 2" 70 goto 140 80 pri
·