2017-10-13 49 views
0

大家好我如何做一個語句,如果標籤有文本和文本框沒有循環中的文本?我無法找到任何關於它,我知道有一個文本框,我可以使用.TextLength但不作爲.CaptionLength工作,希望你能幫助VBA - 用戶表單 - 循環 - 如果標籤有文字

For k = 2 To 41 
    If Me.Controls("Label" & k).CaptionLength < 0 And Me.Controls("TextBox" & 
    k).TextLength = 0 Then 
    MsgBox "You have a name without Hdc" 

    Exit Sub 
End If 

更新,工作守則

Dim k As Long 
For k = 1 To 40 
    If Len(Me.Controls("Label" & k).Caption) > 0 And Me.Controls("TextBox" & 
k).Text = vbNullString Then 
    MsgBox "You have a name without Hdc" 
    Exit Sub 
    End If 
Next 

回答

1

嘗試

If len(Me.Controls("Label" & k).caption) > 0 And ... 

len函數返回一個字符串的長度和caption - 屬性給出了一個標籤的文本(字幕)

+0

嗯我認爲它的正確軌道,但它是調出msgbox即使沒有空的TextBox是因爲我使用的文本框錯我嘗試使用=和<>的文本框也沒有關閉() '如果Len(Me.Controls(「Label」&k).Caption)> 0並且(Me.Controls(「TextBox」&k).TextLength <> 0)然後' –

+0

讓我嘗試在文本框上使用len –

+0

對於文本框,可以使用屬性'text'(不是標題),但是'TextLength'也可以。但如果你想檢查文本框是否爲空,你必須檢查'TextLength = 0' – FunThomas