帮我写段VB代码
发布网友
发布时间：2023-07-13 14:47
共5个回答
热心网友
时间：2023-09-10 19:08
'我为了完善一点居然被抢先了...
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Integer '检测键盘输入，这里用来设置热键F10和F12
Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long '设置鼠标位置的API
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, _
ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long) '模拟鼠标按键的API
'-------------鼠标API的相关常数-----------
Const MOUSEEVENTF_LEFTDOWN = &H2
Const MOUSEEVENTF_LEFTUP = &H4
Const MOUSEEVENTF_MIDDLEDOWN = &H20
Const MOUSEEVENTF_MIDDLEUP = &H40
Const MOUSEEVENTF_RIGHTDOWN = &H8
Const MOUSEEVENTF_RIGHTUP = &H10
Dim DoLoop As Boolean '用来控制循环的变量
Private WithEvents oControl As Timer '用来动态添加控件的变量
Private Sub MyMain()
Do '循环开始
DoEvents '释放一下程序的控制权
Pause 2 '延时2000毫秒 大厅等待中
If Not DoLoop Then Exit Do '判断是否结束
SetCursorPos 261, 85 '鼠标移动到（X261,Y85）开房间坐标
MouseL '单击一下 开房间提示框
Pause 0.1 '延时100毫秒 等待中
If Not DoLoop Then Exit Do '判断是否结束
SendKeys "{enter}" '按一下回车键 正在房间
Pause 3 '延时3000毫秒 已经开好房间了
If Not DoLoop Then Exit Do '判断是否结束
SendKeys "{f5}" '按F5 开始
Pause 19 '延时19000毫秒 等待19秒
If Not DoLoop Then Exit Do '判断是否结束
SetCursorPos 722, 578 '鼠标移动到（X722,Y578） 鼠标移动到退出位置
MouseL '单击一下 退出了
Pause 0.2 '延时200毫秒 等待中
If Not DoLoop Then Exit Do '判断是否结束
SetCursorPos 114, 582 '鼠标移动到(114,Y582) 鼠标移动到后退位置
Pause 0.2 '延时200毫秒 等待中
If Not DoLoop Then Exit Do '判断是否结束
'现在设换130频道
SetCursorPos 755, 125 '鼠标移动到(X755,Y125) 段坐标
Pause 0.2 '延时100毫秒 等待中
If Not DoLoop Then Exit Do '判断是否结束
SetCursorPos 510, 410 '鼠标移动到(X510,Y410) '130频道位置坐标
MouseL '单击一下 正在进入大厅
Pause 2 '等待2000毫秒 进入了大厅
If Not DoLoop Then Exit Do '判断是否结束
SetCursorPos 261, 85 '鼠标移动到（X261,Y85） 开房间坐标
MouseL '单击一下 开房间提示框
If Not DoLoop Then Exit Do '判断是否结束
Pause 0.1 '延时100毫秒 等待中
If Not DoLoop Then Exit Do '判断是否结束
SendKeys "{enter}" '按一下回车键 正在房间
Pause 3 '延时3000毫秒 已经开好房间了
If Not DoLoop Then Exit Do '判断是否结束
SendKeys "{f5}" '按F5 '开始
Pause 19 '延时19000毫秒 等待19秒
If Not DoLoop Then Exit Do '判断是否结束
SetCursorPos 722, 578 '鼠标移动到（X722,Y578） 鼠标移动到退出位置
MouseL '单击一下 退出了
Pause 0.2 '延时200毫秒 等待中
If Not DoLoop Then Exit Do '判断是否结束
SetCursorPos 114, 582 '鼠标移动到(114,Y582) 鼠标移动到后退位置
Pause 0.2 '延时200毫秒 等待中
If Not DoLoop Then Exit Do '判断是否结束
'现在设换131频道
SetCursorPos 755, 125 '鼠标移动到(X755,Y125) 段坐标
Pause 0.2 '延时100毫秒 等待中
SetCursorPos 710, 400 '鼠标移动到(X710,Y400) '130频道位置坐标
MouseL '单击一下 正在进入大厅
Loop Until Not DoLoop '循环结束
End Sub
Private Function MyHotKey(vKeyCode) As Boolean '判断按键是否被按过
MyHotKey = GetAsyncKeyState(vKeyCode) <> 0
End Function
Private Sub Form_Load()
Me.Show
DoLoop = False
Set oControl = Controls.Add("VB.Timer", "MyTimer") '动态添加一个Timer控件
oControl.Interval = 200 '设置间隔为200
MyMain '开始运行
End Sub
Private Sub oControl_Timer() '一个定时器，用来检测热键
If MyHotKey(vbKeyF10) And Not DoLoop Then '如果F10被按下并且不是正在执行，则开始
Me.Caption = "开始"
DoLoop = True '开始循环
End If
If MyHotKey(vbKeyF12) Then '如果F12被按下，则停止
Me.Caption = "结束"
DoLoop = False
End If
End Sub
Public Sub Pause(Dauer) '延时函数(单位:秒)
Dim a As Single, b As Single
Dim tem1 As Single, tem2 As Single
a = Format(Date, "0") * Year(Now)
tem1 = Timer
Do
If Not DoLoop Then Exit Sub '判断是否结束
DoEvents
b = Format(Date, "0") * Year(Now)
If a = b Then
tem2 = Timer
If tem2 - tem1 >= Dauer Then
Exit Do
End If
ElseIf a < b Then
tem1 = tem1 - 86400
a = b
End If
DoEvents
Loop
End Sub
Private Sub MouseL()
mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0, 0, 0, 0
End Sub
热心网友
时间：2023-09-10 19:08
是像按键精灵一样吗？
]
不知道对不对，没法调试
进入后按F10开始循环
按F12结束循环
按F10又开始循环..
Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
Private Type POINTAPI
x As Long
y As Long
End Type
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Private Const KEYEVENTF_KEYUP = &H2
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Private WithEvents ATt As Timer
Sub MouSd(Coms1 As Integer, Coms2 As Integer) 'Coms1:1Left 2Right Coms2:1Press 2Down 3Up
Dim s
s = IIf(Coms1 = 1, &H2, &H8)
s = IIf(Coms2 = 3, s + &H2, IIf(Coms(2) = 2, s, s Or s + &H2))
mouse_event s, 0, 0, 0, 0
End Sub
Sub KeySd(KeyCode As Integer, Optional Doindex As Integer = 2) '0up 1down 2press
If Doindex Then keybd_event KeyCode, 0, 0, 0
If (Doindex - 1) Then keybd_event KeyCode, KEYEVENTF_KEYUP, 0, 0
End Sub
Private Sub Doo()
Do
If GetAsyncKeyState(vbKeyF12) <> 0 Then Exit Do '检测F12
'现在在131频道
DoEvents
Sleep 2000 '大厅等待中
SetCursorPos 261, Y85 '开房间坐标
MouSd 1, 1 '开房间提示框
Sleep 100 '等待中
KeySd 13 '正在房间
If GetAsyncKeyState(vbKeyF12) <> 0 Then Exit Do '检测F12
Sleep 3000 '已经开好房间了
KeySd vbKeyF5 '开始
If GetAsyncKeyState(vbKeyF12) <> 0 Then Exit Do '检测F12
Sleep 19000 '等待19秒
SetCursorPos 722, 578 '鼠标移动到退出位置
MouSd 1, 1 '退出了
Sleep 200 '等待中
If GetAsyncKeyState(vbKeyF12) <> 0 Then Exit Do '检测F12
SetCursorPos 114, 582 '鼠标移动到后退位置
Sleep 200 '等待中
'现在设换130频道
SetCursorPos 755, 125 '段坐标
Sleep 100 '等待中
SetCursorPos 510, 410 '130频道位置坐标
MouSd 1, 1 '正在进入大厅
If GetAsyncKeyState(vbKeyF12) <> 0 Then Exit Do '检测F12
Sleep 2000 '进入了大厅
SetCursorPos 261, 85 '开房间坐标
MouSd 1, 1 '开房间提示框
Sleep 100 '等待中
KeySd 13 '正在房间
If GetAsyncKeyState(vbKeyF12) <> 0 Then Exit Do '检测F12
Sleep 3000 '已经开好房间了
KeySd vbKeyF5 '开始
Sleep 19000 '等待19秒
If GetAsyncKeyState(vbKeyF12) <> 0 Then Exit Do '检测F12
SetCursorPos 722, 578 '鼠标移动到退出位置
MouSd 1, 1 '退出了
Sleep 200 '等待中
If GetAsyncKeyState(vbKeyF12) <> 0 Then Exit Do '检测F12
SetCursorPos 114, 582 '鼠标移动到后退位置
Sleep 200 '等待中
'现在设换131频道
SetCursorPos 755, 125 '段坐标
If GetAsyncKeyState(vbKeyF12) <> 0 Then Exit Do '检测F12
Sleep 100 '等待中
SetCursorPos 710, 400 '130频道位置坐标
MouSd 1, 1 '正在进入大厅
If GetAsyncKeyState(vbKeyF12) <> 0 Then Exit Do '检测F12
'循环无数次,最后一行代码与第一行代码之间无延迟
Loop
End Sub
Private Sub ATt_Timer()
If GetAsyncKeyState(vbKeyF10) <> 0 Then Doo
End Sub
Private Sub Form_Load()
Set ATt = Controls.Add("VB.Timer", "ATt")
ATt.Interval = 500
End Sub
热心网友
时间：2023-09-10 19:09
Dim 延时2000毫秒 As 在在131频道
Dim 鼠标移动到 As 厅等待中 '
'ToDo: Error processing original source shown below
'
'
'----^--- Missing ' in char constant
Dim 单击一下 As 房间坐标 '
'ToDo: Error processing original source shown below
'
'
'-------------^--- Missing ' in char constant
Dim 延时100毫秒 As 房间提示框 '
'ToDo: Error processing original source shown below
'
'
'--------^--- Unexected character '（'
'
'ToDo: Error processing original source shown below
'
'
'-----------------^--- Unexected character '）'
'
'ToDo: Error processing original source shown below
'
'
'--------------------^--- Missing ' in char constant
Dim 按一下回车键 As 待中 '
'ToDo: Error processing original source shown below
'
'
'---------^--- Missing ' in char constant
Dim 延时3000毫秒 As 在房间 '
'ToDo: Error processing original source shown below
'
'
'------------^--- Missing ' in char constant
Dim 按F5 As 经开好房间了 '
'ToDo: Error processing original source shown below
'
'
'-----------^--- Missing ' in char constant
Dim 延时19000毫秒 As 始 '
'ToDo: Error processing original source shown below
'
'
'-------------^--- Missing ' in char constant
Dim 鼠标移动到 As 待19秒 '
'ToDo: Error processing original source shown below
'
'
'--------^--- Missing ' in char constant
Dim 单击一下 As 标移动到退出位置 '
'ToDo: Error processing original source shown below
'
'
'--------------^--- Missing ' in char constant
Dim 延时200毫秒 As 出了
'
'ToDo: Error processing original source shown below
'
'
'--------^--- Unexected character '（'
'
'ToDo: Error processing original source shown below
'
'
'------------------^--- Unexected character '）'
'
'ToDo: Error processing original source shown below
'
'
'---------------------^--- Missing ' in char constant
Function 鼠标移动到(__unknown As __unknown) As 待中 '
'ToDo: Error processing original source shown below
'
'
'---------^--- Missing ' in char constant
Dim 延时200毫秒 As 标移动到后退位置 '
'ToDo: Error processing original source shown below
'
'
'------------^--- Missing ' in char constant
'
'ToDo: Error processing original source shown below
'
'
'--------------------^--- Missing ' in char constant
Dim 鼠标移动到 As 在设换130频道 '
'ToDo: Error processing original source shown below
'
'
'------------^--- Missing ' in char constant
Dim 延时100毫秒 As 坐标 '
'ToDo: Error processing original source shown below
'
'
'----^--- Missing ' in char constant
Dim 鼠标移动到 As 待中 '
'ToDo: Error processing original source shown below
'
'
'---------------------^--- Missing ' in char constant
Dim 单击一下 As 频道位置坐标 '
'ToDo: Error processing original source shown below
'
'
'------------^--- Missing ' in char constant
Dim 等待2000毫秒 As 在进入大厅 '
'ToDo: Error processing original source shown below
'
'
'---------------------^--- Missing ' in char constant
Dim 鼠标移动到 As 入了大厅 '
'ToDo: Error processing original source shown below
'
'
'---------^--- Missing ' in char constant
Dim 单击一下 As 房间坐标 '
'ToDo: Error processing original source shown below
'
'
'-------------^--- Missing ' in char constant
Dim 延时100毫秒 As 房间提示框 '
'ToDo: Error processing original source shown below
'
'
'--------^--- Unexected character '（'
'
'ToDo: Error processing original source shown below
'
'
'-----------------^--- Unexected character '）'
'
'ToDo: Error processing original source shown below
'
'
'--------------------^--- Missing ' in char constant
Dim 按一下回车键 As 待中 '
'ToDo: Error processing original source shown below
'
'
'---------^--- Missing ' in char constant
Dim 延时3000毫秒 As 在房间 '
'ToDo: Error processing original source shown below
'
'
'------------^--- Missing ' in char constant
Dim 按F5 As 经开好房间了 '
'ToDo: Error processing original source shown below
'
'
'-----------^--- Missing ' in char constant
Dim 延时19000毫秒 As 始 '
'ToDo: Error processing original source shown below
'
'
'-------------^--- Missing ' in char constant
Dim 鼠标移动到 As 待19秒 '
'ToDo: Error processing original source shown below
'
'
'--------^--- Missing ' in char constant
Dim 单击一下 As 标移动到退出位置 '
'ToDo: Error processing original source shown below
'
'
'--------------^--- Missing ' in char constant
Dim 延时200毫秒 As 出了 '
'ToDo: Error processing original source shown below
'
'
'--------^--- Unexected character '（'
'
'ToDo: Error processing original source shown below
'
'
'------------------^--- Unexected character '）'
'
'ToDo: Error processing original source shown below
'
'
'---------------------^--- Missing ' in char constant
Dim 鼠标移动到 As 待中 '
'ToDo: Error processing original source shown below
'
'
'---------^--- Missing ' in char constant
Dim 延时200毫秒 As 标移动到后退位置 '
'ToDo: Error processing original source shown below
'
'
'------------^--- Missing ' in char constant
'
'ToDo: Error processing original source shown below
'
'
'--------------------^--- Missing ' in char constant
Dim 鼠标移动到 As 在设换131频道 '
'ToDo: Error processing original source shown below
'
'
'------------^--- Missing ' in char constant
Dim 延时100毫秒 As 坐标 '
'ToDo: Error processing original source shown below
'
'
'----^--- Missing ' in char constant
Dim 鼠标移动到 As 待中 '
'ToDo: Error processing original source shown below
'
'
'---------------------^--- Missing ' in char constant
Dim 单击一下 As 频道位置坐标 '
'ToDo: Error processing original source shown below
'
'
'------------^--- Missing ' in char constant
End Function '鼠标移动到 '
'ToDo: Error processing original source shown below
'
'
'---------------------^--- Missing ' in char constant
'
'ToDo: Error processing original source shown below
'
'
'---------^--- Missing ' in char constant
'
'ToDo: Error processing original source shown below
'
'
'----^--- Missing ' in char constant
'
'ToDo: Error processing original source shown below
'System.Char[]
'
'-^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'System.Char[]
'
'---^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'---------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'---------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------^--- Syntax error: 'identifier' expected
'
'ToDo: Error processing original source shown below
'
'
'----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'---------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'---------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'---^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ')' expected
'
'ToDo: Error processing original source shown below
'
'
'----------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'---------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ')' expected
'
'ToDo: Error processing original source shown below
'
'
'----------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'----------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'---------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'---------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'----------^--- Syntax error: ')' expected
'
'ToDo: Error processing original source shown below
'
'
'---------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'---------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'---^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ')' expected
'
'ToDo: Error processing original source shown below
'
'
'----------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'---------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-----------^--- Syntax error: ')' expected
'
'ToDo: Error processing original source shown below
'
'
'----------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'----------------------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'--------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'---^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'
'
'-------^--- Syntax error: ';' expected
'
'ToDo: Error processing original source shown below
'System.Char[]
'^--- Syntax error: ';' expected
热心网友
时间：2023-09-10 19:09
热心网友
时间：2023-09-10 19:10
