vb6 showing type mismatch in function

Question

This is my code to lock controls in VB6

Private Function lockControls()
    For Each ctrl In Me.Controls
        If TypeOf ctrl Is TextBox _
        Or TypeOf ctrl Is ComboBox _
        Or TypeOf ctrl Is NumBox _
        Or TypeOf ctrl Is OptionButton _
        Or TypeOf ctrl Is DTPicker Then
            ctrl.Enabled = True
        End If
    Next
End Function

But when I try to run the program it is showing type mismatch and is not giving any hint.
Can anyone say what is wrong in this code.

Community · Accepted Answer · 2017-05-23 12:11:00Z

1

VB6 has a hidden property LockControls that controls locking controls on the form. Your function name, lockControls, conflicts with it.

Rename the function.

edited May 23, 2017 at 12:11

CommunityBot

11 silver badge

answered Jul 3, 2014 at 6:55

GSerg

78.8k18 gold badges173 silver badges377 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

Rob · Accepted Answer · 2018-01-18 05:47:24Z

0

If you're receiving the error:

error DATA TYPE MISMATCH in FUNCTION OBJECT "FUNCTION1"

Go to your mdb file and change the datatype of your fields.

edited Jan 18, 2018 at 5:47

Rob♦

27.4k16 gold badges89 silver badges103 bronze badges

answered Jan 18, 2018 at 5:43

Rhasid

1

1 Comment

Rhasid Over a year ago

go to datasheet then select data type and choose number.

Collectives™ on Stack Overflow

vb6 showing type mismatch in function

2 Answers 2

Comments

1 Comment

Linked

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

1 Comment

Linked

Related