Java教程

用VB做编程语言

本文主要是介绍用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
    MsgBox Mid(ThisCode, 8)
End If
End Function

Form1

Private Sub Timer1_Timer()
If TC = "ot" Then
    Text1.Text = Text1.Text + TS + vbCrLf
    TS = ""
    TC = ""
End If
End Sub

调用时:

RunCode(要执行的代码)

这篇关于用VB做编程语言的文章就介绍到这儿，希望我们推荐的文章对大家有所帮助，也希望大家多多支持为之网！
您可能喜欢
栏目导航