VB基础类
子过程问题，很简单，帮忙。
墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年，写一次发全网
我也要 关注 + 加入社区Public Function sprs(instr1 As String, out1 As String, out2 As String)
Dim llenstr As Integer
llenstr = InStr(instr1, ";")
out1 = Left(instr1, llenstr - 1)
out2 = Right(instr1, Len(instr1) - llenstr)
End Function
Private Sub Command1_Click()
sprs Label1.Caption, Text1.Text, Text2.Text
End Sub
为什么不执行？
Dim llenstr As Integer
llenstr = InStr(instr1, ";")
out1 = Left(instr1, llenstr - 1)
out2 = Right(instr1, Len(instr1) - llenstr)
End Function
Private Sub Command1_Click()
sprs Label1.Caption, Text1.Text, Text2.Text
End Sub
为什么不执行？
...全文
