剛接觸VB，各位大神幫幫忙！！
Private Sub cmdDel_Click()
On Error GoTo ErrHandler
If Not lvwLotList.SelectedItem Is Nothing Then
If lvwLotList.SelectedItem.selected Then
DeleteFOUPId = lvwLotList.SelectedItem.Text
' Call m_oParent.o_frmLoginMES.setDeleteObjectId(DeleteFOUPId)
Call m_oParent.o_frmLoginMES.Clear
Call m_oParent.o_frmLoginMES.frmShow("DeleteFOUP-" & DeleteFOUPId, "DELETEFOUP", True, DeleteFOUPId)
End If
End If
Exit Sub
ErrHandler:
Call WriteErrorLog("Error raise during Sub:" & MODULE_ID & ".cmdDel_Click, Desc is " & Err.description)
End Sub
程式停在 If Not lvwLotList.SelectedItem Is Nothing Then
uj5u.com熱心網友回復：
lvwLotList是一個事先拖動到視窗中的List控制元件。轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/75299.html
標籤：VB基礎類