schnurman Posted April 26, 2011 Author Share Posted April 26, 2011 How would you make a way so that if you have an option it will filterer words to like **** ect. Like have as an option like in options menu (button) so you could do it? You now for kids.. Yes I have vb6 Link to comment Share on other sites More sharing options...
Mikekan13 Posted April 26, 2011 Share Posted April 26, 2011 Just write a system that checks a word against a list of (bad words). If it is the same then change the character to an *. It isn't that hard to do but at the same time I could just write it Fv[k or duck or f#ck. I never understood censorship on words. If I see F#ck I know what you are tying to say; it has the same effect as the real word. Link to comment Share on other sites More sharing options...
schnurman Posted April 26, 2011 Author Share Posted April 26, 2011 @Mikekan13:> Just write a system that checks a word against a list of (bad words). If it is the same then change the character to an *. It isn't that hard to do but at the same time I could just write it Fv[k or duck or f#ck. I never understood censorship on words. If I see F#ck I know what you are tying to say; it has the same effect as the real word.Yes but where could I possibly start off this system as you speak? Link to comment Share on other sites More sharing options...
Tivoilos Posted April 26, 2011 Share Posted April 26, 2011 You'll prolly need to start with, looking for the code that handles the chat system. Look how chats are handled. Then maybe do a google search on how to filter words in Visual Basic 6\. Have fun Link to comment Share on other sites More sharing options...
Lavos Posted April 26, 2011 Share Posted April 26, 2011 Also look into vb6 syntax: "Do while" or "Do until" Link to comment Share on other sites More sharing options...
schnurman Posted April 26, 2011 Author Share Posted April 26, 2011 Okay thanks guys Link to comment Share on other sites More sharing options...
Robin Posted April 27, 2011 Share Posted April 27, 2011 ```If badWordMatch(tmpStr) then For i = 0 to UBound(tmpStr) Mid$(tmpStr, i, 1) = "*" NextEnd If``` Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now