unhandled exception has ocurred... cannot convert start value type "integer" limit value of type domainupdown and step value of type integer to a common numeric,
how do i fix this help is apreciated thanks.
my program helps the user create passwords here is the code which isnt wokring:
how do i fix this help is apreciated thanks.
my program helps the user create passwords here is the code which isnt wokring:
Public Function Password() As Object Dim intRnd As Object Dim strName As Object Dim intNameLength As Object Dim intLenght As Object Dim strInputString As Object Dim inStep As Object strInputString = character.Text intLenght = Len(strInputString) intNameLength = DomainUpDown1 '<<<<<<THIS IS THE PROBLEM Randomize() strName = "" For inStep = 1 To intNameLength intRnd = Int((intLenght * Rnd()) + 1) strName = strName & Mid(strInputString, intRnd, 1) Next Password = strName End Function
Last edited by a moderator: