| | |
how to calculate the distence ?
Please support our Visual Basic 4 / 5 / 6 advertiser: Programming Forums - DaniWeb Sister Site
![]() |
•
•
Join Date: Jan 2008
Posts: 3
Reputation:
Solved Threads: 0
can help me in the coding by giving example coding.
No, shinchan, we won't do your homework for you. If your professor has asked you to do something with tools he has not taught you, go see the department chair or the ombudsman. Otherwise, if you haven't paid enough attention in class to pass the assignment then you are going to fail it. Sorry.
If you try to do it, and post here with what you have got, and where it goes wrong, etc. we will help you.
If you try to do it, and post here with what you have got, and where it goes wrong, etc. we will help you.
Count me in Duoas, yeah he didn't even give a try...
A conclusion is the place where you got tired of thinking. http://www.martin2k.co.uk/forums/index.php?showforum=4
http://www.a1vbcode.com/a1vbcode/vbforums/Forum3-1.aspx
http://www.developerfusion.co.uk/for...orum&ForumID=4
Count me in Duoas, yeah he didn't even give a try...
A conclusion is the place where you got tired of thinking. http://www.martin2k.co.uk/forums/index.php?showforum=4
http://www.a1vbcode.com/a1vbcode/vbforums/Forum3-1.aspx
http://www.developerfusion.co.uk/for...orum&ForumID=4
try to use this sample code
vb Syntax (Toggle Plain Text)
Public Function DistanceBetween(ByVal X1 As Single, ByVal Y1 As Single, ByVal X2 As Single, ByVal Y2 As Single) As Single ' Calculate the distance between two points, given their X/Y coordinates. ' The short version... DistanceBetween = Sqr((Abs(X2 - X1) ^ 2) + (Abs(Y2 - Y1) ^ 2)) ' The longer version, to illustrate how it works... Dim Horizontal As Single, Vertical As Single Horizontal = Abs(X2 - X1) Vertical = Abs(Y2 - Y1) DistanceBetween = Sqr((Horizontal * Horizontal) + (Vertical * Vertical)) End Function
Share your Knowledge.
![]() |
Other Threads in the Visual Basic 4 / 5 / 6 Forum
- Previous Thread: search command in vb
- Next Thread: Data Report Grouping/Group header - How to?
| Thread Tools | Search this Thread |
Tag cloud for Visual Basic 4 / 5 / 6
* 6 429 2007 access activex add age append application basic beginner birth bmp calculator cd cells.find click client code college column component connection connectionproblemusingvb6usingoledb copy creat ctrl+f data database datareport date delete dissertations dissertationthesis dissertationtopic edit error excel excelmacro file filename form hardware header iamthwee image inboxinvb internetfiledownload keypress label listbox listview liveperson login looping machine microsoft movingranges number objectinsert open oracle password prime program prompt range-objects readfile reading record refresh remotesqlserverdatabase report retrieve save search sendbyte sites sort sql sql2008 sqlserver subroutine table tags textbox time timer urldownloadtofile vb vb6 vb6.0 vba visual visualbasic visualbasic6 web window windows






