- 博客(1)
- 收藏
- 关注
RSS订阅原创 用VB做编程语言
废话不多说，上代码 Module1 Public TC, TS As String Function RunCode(ByVal ThisCode As String) TmpCode = LCase(ThisCode) a = InStr(TmpCode, "printl ") If a = 1 Then TC = "ot" TS = Mid(ThisCode, 8) End If a = InStr(TmpCode, "ifobox ") If a = 1 Then Msg
2022-03-21 13:27:13
354
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人