下面是我
For x = 0 To 1 Step 0.0001
y = (q * x - xF) / (q - 1)
0 <= y < =1 and y >= xPicture1.PSet (x * 100, y * 100)
Next x我想规定 y在0-1,而且y不小于x , q 和xf是输入的数据
For x = 0 To 1 Step 0.0001
y = (q * x - xF) / (q - 1)
0 <= y < =1 and y >= xPicture1.PSet (x * 100, y * 100)
Next x我想规定 y在0-1,而且y不小于x , q 和xf是输入的数据
解决方案 »
- MsgBox("是否保存数据? ", vbYesNo , "提示" ) 如何指定默认焦点按钮为 否?
- 在VB6和SQL Server中,如何用语句判断一个子段的值为Null
- 数据库问题
- 用Winsock怎么发送带附件的邮件,解决马上给分,在线等……
- [请教] VB中如何监测IE被启动的事件
- 请教高手,如何在通用对话框commondialog中打开文件?谢谢!
- 我想实现对已经生成的treeview进行结点变色,只要子节点都为红色,则父结点为红色
- 谁有WINXP 风格的图标,哪里有,能告诉我吗?
- 请问VB中的DataReport能否像控件一样放到form中,如果能应该怎样做?
- 请问怎么样能确定EXCEL是中文版还是英文版?
- 求各位大神帮忙!
- VB的msgbox的按钮设置快捷键
For x = 0 To 1 Step 0.0001
y = (q * x - xF) / (q - 1)
if (0 <= y) and (y< =1) and (y >= x) then
Picture1.PSet (x * 100, y * 100)
end if
Next