vb6.0怎么用三角函数旋转

在VB6.0中，可以使用以下代码来使用三角函数旋转一个点：

' 定义一个点(x,y)
Dim x As Double
Dim y As Double

' 定义旋转角度（单位为度）
Dim angle As Double

' 定义三角函数的变量
Dim s As Double
Dim c As Double

' 将角度转换为弧度
angle = angle * 3.1415926 / 180

' 计算 sin 和 cos 值
s = Sin(angle)
c = Cos(angle)

' 计算旋转后的新坐标
Dim newX As Double
Dim newY As Double
newX = x * c - y * s
newY = x * s + y * c

其中，x 和 y 分别代表点的横纵坐标，angle 是旋转的角度，s 和 c 分别代表 sin 和 cos 的值，newX 和 newY 分别代表旋转后的新坐标。