2012-11-26 5 views
6

外部ifステートメントを削除すると、addmessageがクリックされたときにtxtBillTxtSetSrcフィールドにジャンプするリンクが作成されます。 ifステートメントの内部にリンクが表示されます。ランタイムエラー:オブジェクトがifステートメントの内部で動作しないと予想されます

Microsoft JScript runtime error: Object expected".

if文なしで動作します。なぜそれがではなく、と一緒に使用できますか?

If Me.txtBillTxtSetSrc.Text.Trim.Length > 0 Then 
    validateExpression = "^[BCGHJSR][0-9][0-9]" 
    ismatch = Regex.IsMatch((txtBillTxtSetSrc.Text).ToUpper, validateExpression) 

    If ismatch = False Then 
    tempErrorMsg = LASPBS_Classes.Errors.MainframeError.getError("281W") ' Text Set Must be B01-B99, etc. 
    Me.MessageCenter.addMessage(tempErrorMsg, "#", "txtBillTxtSetSrc", "form1", "E") 
    Me.MessageCenter.Visible = True 
    End If 
End If 

答えて

1

txtBillTxtSetSrcが使用時に有効であることを確認してください。それがNothing(null)の場合、.Textプロパティにアクセスすることはできません。また、それが何かであれば、それはプロパティの一つかもしれません。私はそれらを1つチェックします。

If Not (Me.txtBillTxtSetSrc is Nothing) andalso (Me.txtBillTxtSetSrc.Text.Trim.Length > 0) Then 
    validateExpression = "^[BCGHJSR][0-9][0-9]" 
    ismatch = Regex.IsMatch((txtBillTxtSetSrc.Text).ToUpper, validateExpression) 

    If ismatch = False Then 
     tempErrorMsg = LASPBS_Classes.Errors.MainframeError.getError("281W") ' Text Set Must be B01-B99, etc. 
     Me.MessageCenter.addMessage(tempErrorMsg, "#", "txtBillTxtSetSrc", "form1", "E") 
     Me.MessageCenter.Visible = True 
    End If 
End If 
関連する問題