'You need a structure to hold the information on the bullet. Notice that all the members are Float to avoid problems with rounding
' You could also use Double for more accuracy
' X and Y are the current coordinates of the bullet
' xSpeed is the number of pixels to move horizontally each frame
' ySpeed is the number of pixels to move vertically each frame
Type tBullet(x As Float, y As Float, xSpeed As Float, ySpeed As Float)
...
'Execute this when the enemy fires on the ship
' Speed is the distance the bullet will travel per frame
Dim Bullet As tBullet
Dim Speed as Float = 2.0 '<- Mess with this value to change the bullet's speed
Dim Angle As Float = ATan2(Ship.y-Enemy.y,Ship.x-Enemy.x) 'Notice that Y is before X. This will give you the angle from the enemy to the ship
Bullet.xSpeed = Cos(Angle)*Speed
Bullet.ySpeed = Sin(Angle)*Speed
...
'Update the position of the bullet each frame with this code
Bullet.x = Bullet.x + Bullet.xSpeed
Bullet.y = Bullet.y + Bullet.ySpeed