I'm working on a Pythagorean Theorem program that calculates the sides and angles of a right triangle. I have the side measurements and all that down, but I can't find the Visual Basic function that will allow me to calculate the angles from the side measurements. I've tried asin and sinh, but both give me the wrong measure.
View 2 RepliesHow can i calculate the angles of a triangle, where i have the lengths in cm of all 3 sides?
heres an example where i already know the angles. i know its a sin, cos or tan formula, but nothing i've tried works.
assuming i have an isoceles triangle, where i know the height + base width, how
can i calculate the width of that triangle at 1/3 of the distance from the point + 2/3 of the distance from the point?
i thought it'd be simply 1/3 base width + 2/3 base width, but my drawing is +/- a few pixels when i resize it?
Well I attempted collision detection and it was only ok. First of all only the out of bounds place would work because I just made the right side of the screen make you go left etc.My moving button also goes outside of the area for a brief second before it teleports back to the bounds + 3 or w/e.Never mind all of that I guess.Could someone give me some source code for the simplest way to do collisions from all angles (like a zelda game or something...) or just up/down or left/right (like in pong).
View 1 RepliesI have got the code to draw the line at the angle. the issue is that I need 0 degrees to be the right hand side and not the top.[code]
View 37 RepliesI followed this tutorial [URL] in creating a pong game in VB NET, everything worked well as followed but believe there is still more development that needs to be done to it, for example if the ball is moving horizontally in a straight line, it will just re-bound of the paddles in the same angle everytime which means there is no point to the game. When the game starts moving the ball at a random angle and the ball re-bounds of either paddles, it will re-bound in the same angle it started with each time.
Pointed out what code this is:
Dim random As New Random() ' Random instance
Dim xVel As Single = Math.Cos(random.Next(6, 8)) * speed ' Move ball from randomized angle in X-axis
Dim yVel As Single = Math.Sin(random.Next(6, 8)) * speed ' Move ball from randomized angle in Y-axis
[code]....
If the ball hits the top of the paddle object, it should re-bound at a different angle How it should be is when the ball hits the paddle object, it should re-bound at a different angle, if it intersects at the top of the paddle, it should re-bound up or bottom of paddler should re-bound down.
Here's the code i'm using to rotate:
Dim m As New System.Drawing.Drawing2D.Matrix
Dim size = image.Size
m.RotateAt(degreeAngle, New PointF(CSng(size.Width / 2), CSng(size.Height / 2)))
Dim temp As New Bitmap(600, 600, Imaging.PixelFormat.Format32bppPArgb)
Dim g As Graphics = Graphics.FromImage(temp)
g.Transform = m
g.DrawImage(image, 0, 0)
(1) Disposals removed for brevity.
(2) I test the code with a 200 x 200 rectangle.
(3) Size 600,600 it just an arbitrary large value that I know will fit the right and bottom sides of the rotated image for testing purposes.
(4) I know, with this code, the top and left edges will be clipped because I'm not transforming the orgin after the rotate.
The problem only occurs at certain angles:
(1) At 90, the right hand edge disappears completely.
(2) At 180, the right and bottom edges are there, but very faded.
(3) At 270, the bottom edge disappears completely.
Is this a known bug?If I manually rotate the corners an draw the image by specifying an output rectangle, I don't get the same problem - though it is slightly slower than using RotateAt.
I need a Function or section of code that finds the angle of a lineShape. Alternitively, a code to find the angle between two set coordinates would also work. I need to know the angle in order for my program to work properly. I'm using VB Express 2010.
View 2 RepliesIm making a little game. All it does is make a bunch of Random Letters. Move around the screen. Im drawing to the form with paint. But i wanted to make it. So you have to click the letter that my program ask's you to click. I know there is easy ways of doing this. Like just getting the x,y and the mouse x,y on the click event. But i was wondering. If i could accomplish this task. Just by Scanning about 10x10 pixels from where the mouse down event is triggerd. to see if a letter is there. And how i could make it see if it is an A or B etc. The font is white. And about this size. I was thinking about it counting all the white pixel's but that wouldn't work?
View 3 RepliesI dont even know if you can do this in vb.net but, how do you change the pictureboxes x2 y2 to tilt some degrees other than 90 degree angles?
View 2 RepliesI think this will be better than what I was thinking before.
How can I allow multiple lengths to a textbox.Allow multiple lengths on a textbox?
something like
if Not TextBox1.TextLength = 8 Or 11 Or 14 Or 18 Then msgbox("error")
Can a substring have mutiple arguments? I am pulling a substring from a drop down list into my database for records, the string is between 6 and 8 numbers, is it possible to pass more than one argument to make this work?
Sample data:
DropDownList
123456 | Name
1234567 | Name
[Code]....
Forgive me but i have a noob question, I cant seem to get my head around.I have a textbox.text string as "111.1, 22.2, 3333.3, 444.44" What I want to is extract the numbers which may be random lengths, but all separated by a comma to
dim i1st number as Integer
dim i2nd number as Integer
dim i3rd number as Integer
dim i4th number as Integer
I know how to search for one instance of a string in a string but taking the 1st part to the comma, then the next comma and so on is confusing me.
[Code]...
Basically I'm just trying to see if the date/time of files have changed on files.So I've got code something like this:-
Dim fi_source_CreationTime As DateTime = fi.CreationTime
Dim file_info_DateCreated As String = '** LOADED from a file **
If (fi_source_CreationTime = CDate(file_info_DateCreated)) Then
[code]....
simple loop code to split a text which is displayed on the text box. All that will need to do is split the text into 48 char lengths.
View 11 RepliesI have an array of strings such as "blue", "green", "red" and I wish to sort them so the longest string comes first and the shortest last.
Currently I am creating another array with the lengths of each string in the array in the same index positions and using this array as the key array to sort by as can be seen below, but I think this could be optimised into one line perhaps?
Dim colours() As string = {"blue", "green", "red"}
Dim colourslength() As Integer
For i As Integer = 0 To colours.Length - 1
[Code].....
Edit: just realised I defined colours as a list in the example code, it's an array in my actual code.
I am working on a project that I scroll from one screen to another.
A particular string I have 2 variables that can be changed. If I stay on this screen I can change either variable just as I need
however when I change to another screen then return my string is 1 digit longer and when I wish to edit this string my program fails because the string isn't the expected length.
A portion of my program follows....The Y6 is just a counter. The MA is a conditional control.
ElseIf _
Y6 = 4 _
And MA = True _
[Code]....
Delete 0-27 then determine whats there "NC" or "NO" and simply change it. But again when I leave this particular screen and return my text length is no longer 29 charactors long, it is now 30 charactors.
I want to write the DS into a txt fie with predefined field lengths.
Code:Dim ds As New Data.DataSetda.SelectCommand = New SqlCommand da.SelectCommand.Connection = conn da.SelectCommand.CommandText = "SELECT * from Samp1" da.Fill(ds, "S1")
[Code]...
Is there any way to create a multidinensional array that contains arrays of different lengths (similar to nesting arrays of different lengths in python).
Because if I were to declare a variable Dim accounts(2,2) As Integer all 1D arrays at each dimension have the same length. Is there any way to create an array so that this is not the case?
e.g The above code would create an array like this:
[[0,0],[0,0]]
but would it be possible to create this:
[[0,0],[0,0,0]]
I am working on a program that opens a .txt file, finds the length of each line in the file, and then outputs the minimum and maximum lengths. For example, assuming this is the .txt file I am opening:
2789304
293048203
27598493
[code].....
I would like to return something like this:
Minimum length: 6
Maximum length: 9
I cannot use arrays for this assignment. I figured out how to get the maximum length but cannot figure out how to get the minimum. Am I going about this the right way or is there an easier way to do this? Here is what I have thus far:
Dim FileName As String
Dim FileReader As StreamReader
Dim FileLine As String
[code].....
I have a string which can be of any length. I want to loop tthrough this string and if there 53 characters assign that to Variable1, then loop round again and assign the next 53 characters or less to variable2 etc etc until the end of the string. Ideally I would not want to split words - but that is another problem.....
View 10 RepliesFor a school program, I was assigned to use a .dat file to store and edit information while using VB to be it's front end( to appear in a listbox). I was also given what field length to use per field. I never worked with .dat files, so I have a few questions (all the google-ing Ive done say the same thing: every .dat file is different so you can't play around with them):
[Code]...
I have 6 array lists and I would like to know which one is the longest without using a bunch of IF STATEMENTS."if arraylist.count > anotherlist.count Then...." <- Anyway to do this other than this?
Examples in VB.net or C#.Net (4.0) would be helpfull.
arraylist1.count
arraylist2.count
arraylist3.count
arraylist4.count
arraylist5.count
arraylist6.count
DIM longest As integer = the longest arraylist should be stored in this variable.
I am trying to calculate the number of years for my calculate age event handler, however i am apparently missing a method or whatnot because im trying to calculate the age , can anyone suggest help on this. I need to subtract years to get my age but when i try the birthdate.Subtract (currentDate) method i get an error about not able to convert from LONG?
So below is what I have.
Private Sub btnCalculateAge_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCalculateAge.Click
Dim currentDate As Date
Dim BirthDate As Date
Dim Age As Long
[CODE]
I'm creating a movable scenary with, like 100 different flights. I want to create for every type of flight a triangle...so it's moves around and you have an idea how the airspace looksq like at what moment.Now my question is, what's the best way to draw these rectangles? I created a class 'Flight' and it has a Graphicspath in it. Now I want to update the triangle, which represents the aircraft, with the speed and heading...so it moves around well.
View 3 RepliesDim blackPen As New Pen(Color.Black, 3)
Dim ptsArray As PointF() = {New PointF(100.0F, 120.0F), New PointF(70.0F, 60.0F), _
New PointF(40.0F, 120.0F), New PointF(100.0F, 120.0F)}
e.Graphics.DrawLines(blackPen, ptsArray)
I have the outline of a triangle right where I want it. I need to fill it so it's a solid color. Can anyone give me a start on filling it? (Using VB.NET 2008)
How do I draw a triangle?
View 10 RepliesCurrently working on a 2D engine, not for gaming but for design software / visualisation for machines. So far it is comming along quite fine. I started to wonder if it were possible to draw a triangle and fill it with some form of a a texture, or even better a polygon and fill that with a texture.
I know that DX can do that for me :P but I am realy focussing on GDI+ at the moment.
How to draw a right triangle and spherical triangle using vb.net 2008? Where you're going to consider the angles and sides of the triangles.......
View 1 Repliestriangle of stars like the one shown below
*
* *
* * *
* * * *