Error 13 Type Mismatch In Vb 6.0
resources Windows Server 2012 resources Programs MSDN subscriptions Overview Benefits Administrators Students Microsoft Imagine Microsoft Student Partners ISV Startups TechRewards Events Community Magazine Forums Blogs Channel 9 Documentation APIs and reference Dev centers Retired content Samples We’re sorry. The content you requested has been removed. You’ll be auto redirected in 1 second. Reference Trappable Errors Core Visual Basic Language Errors Core Visual Basic Language Errors 13 Type mismatch 13 Type mismatch 13 Type mismatch 3 Return without GoSub 5 Invalid procedure call or argument 6 Overflow 7 Out of memory 9 Subscript out of range 10 This array is fixed or temporarily locked 11 Division by zero 13 Type mismatch 14 Out of string space 16 Expression too complex 17 Can't perform requested operation 18 User interrupt occurred 20 Resume without error 28 Out of stack space 35 Sub, Function, or Property not defined 47 Too many DLL application clients 48 Error in loading DLL 49 Bad DLL calling convention 51 Internal error 52 Bad file name or number 53 Can't find specified file 54 Bad file mode 55 File already open 57 Device I\O error 58 File already exists 59 Bad record length 61 Disk full 62 Input past end of file 63 Bad record number 67 Too many files 68 Device unavailable 70 Permission denied 71 Disk not ready 74 Can't rename with different drive 75 Path\File access error 76 Path not found 91 Object variable or With block variable not set 92 For loop not initialized 93 Invalid pattern string 94 Invalid use of Null 96 Can't sink this object's events because it's already firing events... 97 Can't call Friend procedure on an object that isn't an instance of... 98 A property or method call cannot include a reference to a private ... 321 Invalid file format 322 Can't create necessary temporary file 400 Form already displayed; can't show modally 422 Property not found 429 ActiveX component can't create object or return reference to this... 430 Class doesn't support Automation 432 File name or class name not found during Automation operation 438 Object doesn't support this property or method 440 Automation error 442 Connection to type library or object library for remote process h... 443 Automation object doesn't have a default value 445 Object doesn't support this action 446 Object doesn't support named arguments 447 Object doesn't support current locale setting 448 Named argument not found 449 Argument not optional 450 Wrong number of arguments or invalid property assignment 451 Property let procedure not defined and property get procedure did not return an object 452 Invalid ordinal 453 Speci
360 games PC games Windows games Windows phone games Entertainment All Entertainment Movies & TV Music Business & Education Business Students & educators Developers Sale Sale Find a store Gift cards Products Software & services Windows Office Free downloads & security Internet https://msdn.microsoft.com/en-us/library/aa264979(v=vs.60).aspx Explorer Microsoft Edge Skype OneNote OneDrive Microsoft Health MSN Bing Microsoft Groove Microsoft Movies & TV Devices & Xbox All Microsoft devices Microsoft Surface All Windows PCs & tablets PC accessories Xbox & games Microsoft Lumia All https://support.microsoft.com/en-us/kb/181542 Windows phones Microsoft HoloLens For business Cloud Platform Microsoft Azure Microsoft Dynamics Windows for business Office for business Skype for business Surface for business Enterprise solutions Small business solutions Find a solutions provider Volume Licensing For developers & IT pros Develop Windows apps Microsoft Azure MSDN TechNet Visual Studio For students & educators Office for students OneNote in classroom Shop PCs & tablets perfect for students Microsoft in Education Support Sign in Cart Cart Javascript is disabled Please enable javascript and refresh the page Cookies are disabled Please enable cookies and refresh the page CV: {{ getCv() }} English (United States) Terms of use Privacy & cookies Trademarks © 2016 Microsoft
here for a quick overview of the site Help Center Detailed answers to any questions you might have Meta Discuss the workings and policies of this site About Us Learn more about Stack Overflow the company Business Learn http://stackoverflow.com/questions/20839233/run-time-error-13-type-mismatch more about hiring developers or posting ads with us Stack Overflow Questions Jobs Documentation Tags Users Badges Ask Question x Dismiss Join the Stack Overflow Community Stack Overflow is a community of 4.7 million programmers, just like you, helping each other. Join them; it only takes a minute: Sign up Run Time Error -13 : Type Mismatch up vote 0 down vote favorite ' Create display Disp.Create ' Set properties Set Disp.Handle.ExcelHandle = myInterface.ExcelHandle Set error 13 Disp.Handle.DispMgrHandle = myInterface Disp.Handle.InternalMode = InternalMenuitem.Checked Disp.Handle.TestMode = TestMenuitem.Checked ' Restore the window position of the display tmp = GetSetting("AppPath\" + s + Disp.name, "Window", "Left", 0) If 0 <> tmp Then width = GetSetting("Teradyne\IG-XL\DisplayManager\" + s + Disp.name, "Window", "Width", 0) height = GetSetting("AppPath\" + s + Disp.name, "Window", "Height", 0) leftPos = GetSetting("AppPath\" + s + Disp.name, "Window", "Left", 0) topPos = GetSetting("AppPath\" + s + Disp.name, "Window", "Top", 0) If leftPos >= 0 error 13 type And topPos >= 0 Then Disp.Handle.FormHandle.left = leftPos Disp.Handle.FormHandle.Top = topPos End If If height >= 0 And width >= 0 Then Disp.Handle.FormHandle.height = height Disp.Handle.FormHandle.width = width End If End If ' Make it visible Disp.Handle.UnMinimize Disp.Handle.Show In the above code, in the line Disp.Handle.FormHandle.left = leftPos, I got the error, Run Time Error -13 : Type Mismatch. But leftPos is always an integer value. When I comment that line, I got the same error in next line. After I comment all the four lines, I got error in Disp.Handle.UnMinimize, if commented that, next line. I am not able to find why the error happens when there is no type mismatch. Can anyone help on this? ' Function for create ' Start a new copy of the display and save its handle Public Sub Create() On Error GoTo errorhandler Set Me.Handle = CreateObject(Me.name + ".IGXLDebugDisplay") ' Don't call client create yet. This actually loads the form and is premature here. ' Me.Handle.Create Exit Sub errorhandler: Set Me.Handle = Nothing MsgBox "Error creating " + Me.name + Chr$(13) + "Error " + str(Err.Number) + " " + Err.Description, , "Error" End Sub vb6 share|improve this question asked Dec 30 '13 at 12:07 Rayner 2926 You can try debugging this. Set breakpoint on Disp.Handle.FormHandle.Left = .... Do a Quick Watch on Disp, Disp.Handle, Disp.Handle.