作业帮Private Sub Form_Terminate()For i = 1 To 100If que(i) "" Thent1 = 9End IfNextIf t1 = 9 Thent1 = MsgBox("真的要退出吗?(注：退出后您所输入的数据将全部丢失!)",vbYesNo + vbExclamation,"单选题自动生成器")If t1 = 6 Then End e
来源：学生作业帮助网 编辑：作业帮 时间：2024/07/13 02:05:06
xKP 랔$%A`CKO1u@7)>N>)ЬňR#">ݻ
zz;s9?F]+&N4Xy {Hae3`,pSS
l,ķ3nt.E7湄PzzpxΊ ӁQA) fDEG TnNf$--&{ܻFG90^wBp#M(h5wrXG]X۠شQ iq:30 לnH!u.G#p/oG1&)`u Z}"`jG=~Pꢖ<>.ʽCbWiM$2Sն
j
Private Sub Form_Terminate()For i = 1 To 100If que(i) "" Thent1 = 9End IfNextIf t1 = 9 Thent1 = MsgBox("真的要退出吗?(注：退出后您所输入的数据将全部丢失!)",vbYesNo + vbExclamation,"单选题自动生成器")If t1 = 6 Then End e
Private Sub Form_Terminate()
For i = 1 To 100
If que(i) "" Then
t1 = 9
End If
Next
If t1 = 9 Then
t1 = MsgBox("真的要退出吗?(注：退出后您所输入的数据将全部丢失!)",vbYesNo + vbExclamation,"单选题自动生成器")
If t1 = 6 Then End else
Else
End
End If
End Sub
这是程序,我想知道倒数第五行的else后面若不想退出该怎样写!
Private Sub Form_Terminate()For i = 1 To 100If que(i) "" Thent1 = 9End IfNextIf t1 = 9 Thent1 = MsgBox("真的要退出吗?(注：退出后您所输入的数据将全部丢失!)",vbYesNo + vbExclamation,"单选题自动生成器")If t1 = 6 Then End e
你应该把这段代码写到form_unload中,那么else后面可以写 cancle=1以不退出.