vb6.0制作。可以设定某程序到某一时间运行。但暂时只能添加单一程序。就是指运行时不能设定多个任务。但可以运行多个本程序。ps:后来又添加了一个回车触发添加的函数。但没有必要再上传了。把那个函数代码写在下面,只要放到代码段就Ok。Private Sub MaskEdBox1_KeyDown(KeyCode As Integer, Shift As Integer) ' 添加了一个回车触发事件 If KeyCode = 13 Then Call Command2_Click End If End
Private Sub 向量差(R, A, B);Private Sub 输入矩阵(矩阵, 文件路径)Public Function Bezier(P, u, w) 矢量积 NQ, Qu, Qw 向量差 L, PLight, Q LLen = 长度(L) 向量差 V, Eye, Q VLen = 长度(V) 对称向量 R, L, NQ 矢量单位化 NQe, NQ 矢量单位化 Le, L 矢量单位化 Ve, V 矢量单位化 Re, R 光路强度 PRgb, PRgb, LLen, Ps 漫射光色