Question

vb编一个李萨如图形的动画演示程序，但是时钟控件不知道怎么回事每次都只是画出来一个点。

如题

其中，w1,w2分别是频率1，频率2，p1，p2分别是初相位1，初相位2，t代表时间





Answer 1

李萨如图形的  是什么意思？

 

要想画出sin曲线或者cos曲线，需要移动X坐标。你的X坐标的范围太小了。当然看起来是一个点。

ScaleMode = 3 ' 设置ScaleMode 为像素。

    DrawWidth = 5 ' 设置DrawWidth.画笔的粗细

For i = 1 To 450

        PSet (i + 100, 20 * Cos(i * 0.1) + 100), QBColor(4) '画红色的点

        DoEvents

    Next

就可以画出曲线。把cos改成sin也可以。

 

 

追问

用动画演示可以不用时钟控件么？

Answer 2

首先，有一个错误我给你指出来，我w1=w1.text等类似的表述是错误的，根据你上下的内容，发现w1是double，所以建议w1=val(w1.text)，后面的也一样；
其次，你要用的w1, w2, p1, p2, t, x, y应该是静态变量，要么你在语言最顶端用Dim来定义，要么你把过程中的Dim换成Static。

Answer 3

请问，你用VB演示李萨如图形的代码写出来了吗，可否分享下？