DIY

請問大家我是做錯了什麼事一直錯 ...

skycat[特训班学员(果壳门生)] [学号:H06] Rank: 12Rank: 12Rank: 12 果壳学院特训班学员 果壳币: 247

发表于 2020-6-10 00:56:34 | 5 条回复 | 314 次浏览

F544F647-0441-4EC2-9991-13FA2D2D63A9.jpeg

請問大家我是做錯了什麼事一直錯
发新帖
skycat[特训班学员(果壳门生)] [学号:H06] Rank: 12Rank: 12Rank: 12 果壳学院特训班学员 果壳币: 247

发表于 2020-6-11 01:48:31

請老師幫忙推薦一個例子
  1. Function 新笑傲江湖M
  2.     Dim 新笑傲江湖 _按钮
  3.     新笑傲江湖 _按钮 = ("309|179|7181D7,297|183|1423DD,286|156|58A8DD,332|182|060505,311|203|467FD3,281|179|FEFEFE")
  4.     新笑傲江湖M = 比色(新笑傲江湖 _按钮)
  5. End Function
  6. Sub 登录处理程式
  7. End Sub
  8. Function main
  9.     Dim i=0
  10.     初始化
  11.     TracePrint 新笑傲江湖M () //為真則輸出true, 為假則輸出false
  12.     EndScript
  13.     Do
  14.         載 (1000)
  15.         登录处理程式  
  16.         i = i + 1
  17.         TracePrint "====循环"&i&"轮===="
  18.     Loop
  19. End Function
复制代码


回复 道具 举报

果壳王子[果壳校长] [王子殿下] Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20 果壳热讲师 独家品牌学院 果壳热大导师 果壳学院创始人 果壳热教职工 果壳热平台站长 果壳学院校长/副校长 果壳学长 果壳热研究生 果壳币: 4622

发表于 2020-6-11 03:51:14

一. “缺少符号 、变量或标号”——意指没有函数名(或子程序名)。以下是错误代码:
  1. sub

  2. end sub
复制代码

以下是正确写法:
  1. sub 子程序

  2. end sub
复制代码


二. “推薦一個例子”代码纠错:
  1. main
  2. Function 新笑傲江湖M
  3.     dim 新笑傲江湖_按钮 = ("309|179|7181D7,297|183|1423DD,286|156|58A8DD,332|182|060505,311|203|467FD3,281|179|FEFEFE")
  4.     新笑傲江湖M = 比色(新笑傲江湖_按钮)
  5. End Function
  6. Function 比色(color)
  7.     If CmpColorEx(color,0.9) = 1 Then
  8.         比色 = true
  9.     Else
  10.         比色 = False
  11.     End If
  12. End Function
  13. Function main
  14.     Dim i=0
  15.     初始化
  16.     TracePrint 新笑傲江湖M() //為真則輸出true, 為假則輸出false
  17.     EndScript
  18.     Do
  19.         載 (1000)
  20.         登录处理程式  
  21.         i = i + 1
  22.         TracePrint "====循环"&i&"轮===="
  23.     Loop
  24. End Function
  25. Sub 登录处理程式
  26. End Sub
  27. Sub 初始化
  28. End Sub
  29. Sub 載(tm)
  30.     Delay tm
  31. End Sub
复制代码


回复 道具 举报

skycat[特训班学员(果壳门生)] [学号:H06] Rank: 12Rank: 12Rank: 12 果壳学院特训班学员 果壳币: 247

发表于 2020-6-11 09:55:41

謝謝果壳校长

回复 道具 举报

鹏NKSM[特训班学员(果壳门生)] [学号:H04] Rank: 12Rank: 12Rank: 12 果壳学院特训班学员 果壳币: 107

发表于 2020-6-11 20:41:43

调试窗口说的很明白,第一行,第四个字符,你的sub缺少一个名称

回复 道具 举报

skycat[特训班学员(果壳门生)] [学号:H06] Rank: 12Rank: 12Rank: 12 果壳学院特训班学员 果壳币: 247

发表于 2020-6-12 04:46:27

多謝大哥教我

回复 道具 举报

发新帖

手机版

© 2020-2030 果壳热 All rights reserved.

Powered by GUOHOT XS8.8. Theme designed by GUOKEHOT.

top bottom