→ unget:mail給你了..加油啊 05/14 21:54
→ LinLeopold:挖 謝謝!! 謝謝!! 我寫出來了!!! ^^" 05/14 22:50
to fumizuki 前輩
套用你教的 Combo2.SetFocus
Exit Sub
我也有樣學樣 想把option1 跟 option2 做個必填的設定
-----------------------------------
Private Sub Option1_Click()
If Option1.Value = True Then
sex = "男"
Else
sex = "女"
End If
End Sub
-----------------------------------
Private Sub Command1_Click()
If Option1.Value = 0 Then
MsgBox "您尚未選擇性別哦!!"
Option1.SetFocus
Exit Sub
End If
End Sub
------------------------------------
雖然好像看似OK 可是總覺得怪怪的 ^^"
其實ﴠ我不太知道 Option1.Value = 0 的意思
那個0是我隨便打的 感覺應該是 沒有選擇的意思 @@"
還是有另外更好的作法??
可以讓使用者非選擇Option不可 否則無法繼續下一步
再來一個小問題就是 如果我要設一個text1.text為必填選項
我就很天真的把程式寫成
------------------------------
Private Sub Text1_Change()
If Text1.Text = "" Then
MsgBox "請填入姓名哦!!!"
End If
End Sub
------------------------------
結果如果我沒填text1.text的時候
也沒有跳出一個Msgbox來反應
除非我在text1.text打了一些字 然後做清除掉的動作
它才會跳出一個Msgbox來 而且跳出來之後 程式還是可以繼續
沒有回到text1.text讓使用者繼續填入...
不知道我該怎麼改才好呢??
盼您指導我一下 ^^"
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.141.102.185