Simple Spiral Graphics
This code is all in a simple module, making it fairly easy to draw a spiral at run time. I have commented most lines, but anybody with some understanding of trigonometry should be able to get it. Uses about 9 different input parameters to totally customize your program. I have tested this with VB 6 and 5, so no guarantees for the lower ones, but it should work 'coz all it is is maths. I have also included a nice testing app to show what types of spiral are possible ;) Please vote. Thanks!
AI
Shrnutí AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
Zdrojový kód
Upload ' Requires VBScript 5.0 installed on the server. Function StripHTML(ByRef asHTML) Dim loRegExp ' Regular Expression Object ' Create built in Regular Expression object Set loRegExp = New RegExp ' Set the pattern to look for HTML tags loRegExp.Pattern = "<[^>]*>" ' Return the original string stripped of HTML StripHTML = loRegExp.Replace(asHTML, "") ' Release object from memory Set loRegExp = Nothing End Function
Původní komentáře (3)
Obnoveno z Wayback Machine