UC知道vb, 实时错误 424 , 高手进
来源：百度知道 编辑：UC知道 时间：2024/05/15 00:17:11
设计乘法表, 点F5 弹出实时错误 424, 点调试第三行变黄,何解?
Private Sub Command1_Click()
Dim se As String
Picture1.Print Tab(35); "乘法表" (变黄)
For I = 1 To 9
For J = 1 To 9
se = I & "X" & J & "=" & I * J
Picture1.Print Tab((J - 1) * 9); se;
Next J
Picture1.Print
Next I
End Sub
Private Sub Command1_Click()
Dim se As String
Picture1.Print Tab(35); "乘法表" (变黄)
For I = 1 To 9
For J = 1 To 9
se = I & "X" & J & "=" & I * J
Picture1.Print Tab((J - 1) * 9); se;
Next J
Picture1.Print
Next I
End Sub
大哥，程序根本没有任何问题，调试也过得了
如果点调试第三行变黄说明你的表单没有Picture1对象
只需在表单上添加一个名为Picture1的Picture对象
我测试过没有问题
35数字太大了