引用:
作者: mini
你可以使用一個全域變數當作判斷旗標
分別應用在 TextBox1 與 TextBox2 的 GotFocus事件上
比如
在TextBox2 的 GotFocus事件寫上
flg_IsTextBox = 2
在TextBox1 的 GotFocus事件寫上
flg_IsTextBox = 1
|
的確是永遠呼叫不完.
還有另一寫法 , 就是表單上多設2個: option1 和 option2 讓 user可以選
3事件內 全部指令 加起來 只須7行指令即可ok
TextBox1的事件只須要5行指令如下
引用:
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
If Option1 Then
TextBox2.Text = Format(Val(TextBox1.Text) / 2.54, "#######0.0####")
Else
TextBox2.Text = Format(Val(TextBox1.Text) * 2.54, "#######0.0####")
End If
End Sub
|
option1 的 click事件 內寫1行 呼叫:TextBox1_TextChanged
option2 的 click事件 內也是寫1行:TextBox1_TextChanged
執行畫面 我2分鐘後上傳. format 看樓主你自己須要 ~ 自己改改即可.