返回列表 上一主題 發帖

[發問] 請問為什麼Textbox的回傳值被限定類型?

[發問] 請問為什麼Textbox的回傳值被限定類型?

我寫了語法去回傳Textbox的內容,但是不知道為什麼只有輸入純數字時才會回傳到指定欄位,只要有含括英文或者空格都無法回傳;
以下是我們語法,再麻煩大家了。
Private Sub CommandButton1_Click()

Application.ScreenUpdating = False
        
mybook = ActiveWorkbook.Name
mysheet = ActiveSheet.Name

Dim i As Integer
Dim a As Integer

For i = 1 To 3

If Controls("TextBox" & i).Value = True Then

Worksheets("HIDE - Message").Activate

    For a = 1 To 1000
   
    If Cells(1 + a, 3) = Worksheets("water program").Cells(36 + i, 2).Value Then
   
    Cells(1 + a, 7) = Controls("Textbox" & i).Text
   
   
    Exit For
    End If
    Next a

End If

Next i
   
Application.ScreenUpdating = True
Worksheets(mysheet).Activate

Unload Me

End Sub

回復 1# sy091649


    謝謝前輩發表此主題
請將 If Controls("TextBox" & i).Value = True Then  修改為判斷字數,替換以下代碼試試看
If Len(Controls("TextBox" & i).Value) >0 Then
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

感謝解答,這個方法的確有用;謝謝!!!!!!

TOP

        靜思自在 : 犯錯出懺悔心,才能清淨無煩惱。
返回列表 上一主題