此题该怎么解?
vb吧
全部回复
仅看楼主
level 5
2023年11月01日 05点11分 1
level 5
输了这行代码,为什么点击运行没反应呢?
正确的
写法是什么呢
2023年11月01日 05点11分 2
index怎么来的?能通过么?命令按钮不是数组控件
2023年11月01日 11点11分
level 8
Dim S1 As String, S2 As String
For i = 0 To 3
If Option1(i).Value = True Then S1 = Option1(i).Caption
If Check1(i).Value = 1 Then S2 = S2 & Check1(i).Caption
Next i
MsgBox (Label1.Caption & Text1.Text & Label2.Caption & S1 & Label3.Caption & S2)
2023年11月01日 06点11分 3
按照你写的试了下运行时弹出编译错误:next没有for
2023年11月01日 07点11分
@莫劼咯哆😘 你再好好看看哪个没有复制
2023年11月01日 08点11分
全都复制了,可结果就是那样
2023年11月01日 09点11分
把next i去掉提示是子程序函数为定义。把end if加上也还是 next没有for。是哪出了问题
2023年11月01日 09点11分
1