請問大大關於VB畫圖的問題
 

不好意思，請諸位大大幫幫忙，小弟表單只有一個指令按鈕
要畫一個指數函數，利用這個函數找出每一點的最高點當作直方圖的頂點（Y座標）
劣者現在的問題是直方圖沒有辦法配合指數函數的頂點，所以肯請版上大大幫忙

**********以下是程式*************
Private Sub Command1_Click()
mu = InputBox("請輸入參數")
If mu > 40 Then
MsgBox ("Error")
Unload Me
End If
Cls
Scale (-1, 0.7)-(10, -0.1)
DrawWidth = 1
Line (-1, 0)-(10, 0), RGB(0, 0, 255)
Line (0, 0.7)-(0, -0.1), RGB(0, 0, 255)
DrawWidth = 3

For x = 0.1 To 8 Step 0.01
PSet (x, (1 / mu) * Exp(-x / mu)), RGB(255, 0, 0)
Next x

limitl = x - 0.5
limitu = x + 0.5
For w = 1 To 4
maxpdf = (1 / mu) * Exp(-w / mu)
Next w
Line (limitl, 0)-(limiltu, maxpdf), RGB(0, 255, 0), BF
End Sub

最後請大大幫幫忙 ，幫忙劣者找出錯誤，感恩

一下就掉到第二頁
推∼∼∼
請懂得大大幫忙
感恩

自推∼∼∼
有沒有熱心的大大願意幫劣者解答
感恩

劣者懇請大大伸出原
幫忙劣者這個VB新手
感恩

幫你推
最近我也用VB寫程式
不同的是我寫的是要拿來解方程式的 = =

恩恩~~~多謝大大的推文
自己在推押
有沒有大大可以幫忙小弟
感恩