帮我看下这段代码哪里有问题?

来源:百度知道 编辑:UC知道 时间:2024/05/27 02:53:51
Private Sub Combo1_Change()

End Sub

Private Sub exit_Click()
intreturn = MsgBox("是否退出程序?", vbYesNo + vbDefaultButton2 + vbQuestion, "结束程序")
If intreturn = 6 Then End
End Sub

Private Sub Frame1_DragDrop(Source As Control, X As Single, Y As Single)

End Sub

Private Sub prediction_Click() 《==========这行
Form2.Show
Form2.SetFocus
End Sub

Private Sub resultofprediction_Click() 《==========这行

Form3.Show
Form3.SetFocus
End Sub
看了1楼的回答,我有这3个按钮,都是菜单上的按钮。

工程运行的时候点这些按钮都是有效的,但是调试的时候,就显示黄色了,是什么问题呢?

没有按钮也不可能是黄色的.
两种可能.
一种是设了断点,有断点的话,语句同行的左边会有个很大的红色圆点.
二种是你按的分步调试,你调式用F5调试不要用F8.

你要添加3个按钮.

exit
prediction
resultofprediction

它们分别是退出.. 显示form2的, 和显示form3的..