返回列表 上一主題 發帖

[發問] VB的運算符號

acdx

帖子
132 
主題
56 
精華
0 
積分
190 
點名
0  
作業系統
Win10 
軟體版本
Office 365 
閱讀權限
20 
性別
男 
註冊時間
2012-5-17 
最後登錄
2024-4-29 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2016-6-15 10:53 | 只看該作者

[發問] VB的運算符號

過去習慣使用excel中的VBA,現在因故需要寫VB卻發現差好多
1. 對數運算子Log不能直接用?
2. +-/*運算符號也不能直接用?
請問該怎麼改才行?

Public Class Form1
    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        Dim p As Single
        p = Val(TextBox1.Text)
        TextBox2 = 10 * Log((p ^ 2) / 100)
    End Sub

    Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged
        TextBox1 = 10 ^ (TextBox2 / 20) * 0.00002
    End Sub
End Class
收藏 分享

bsy4life

帖子
22 
主題
2 
精華
0 
積分
19 
點名
0  
作業系統
Win7 
軟體版本
2007 
閱讀權限
10 
註冊時間
2016-6-2 
最後登錄
2016-6-22 
4#
發表於 2016-6-15 18:01 | 只看該作者
回復 3# acdx


    建議你先不要使用任何變數，把可能影響結果的定義都先註解起來
    單純的給他值，讓他運算，再把值丟入textbox
    例如：
  1. Dim p as double,TextBox1 as double
  2. p=math.log(10)
  3. TextBox1.text = p
複製代碼
如果可以成功回傳值在改成你要的計算方式
     你的執行結果看起來應該是你的TextBox無法接收這個回傳值

TOP

acdx

帖子
132 
主題
56 
精華
0 
積分
190 
點名
0  
作業系統
Win10 
軟體版本
Office 365 
閱讀權限
20 
性別
男 
註冊時間
2012-5-17 
最後登錄
2024-4-29 
3#
發表於 2016-6-15 14:28 | 只看該作者
回復 2# bsy4life

還是出現錯誤訊息

TOP

bsy4life

帖子
22 
主題
2 
精華
0 
積分
19 
點名
0  
作業系統
Win7 
軟體版本
2007 
閱讀權限
10 
註冊時間
2016-6-2 
最後登錄
2016-6-22 
2#
發表於 2016-6-15 12:24 | 只看該作者
剛幫你查了一下，用math.log((p ^ 2) / 100) 看看
另外加減乘除應該可以用阿！
試試看
TextBox2 .text=10 * math.log((p ^ 2) / 100)
我也好久沒碰VB><

TOP

        靜思自在 : 君子立恆志，小人恆立志。
返回列表 上一主題