輸入英文顯示中文.
 

各位大大,

以下為個人寫滴VB程式碼:
Dim WeeK As String
WeeK = InputBox ("請輸入一星期7天的英文單字:")
Select Case Week
Case "sunday" : Print "Sunday 是星期日"
Case "monday" : Print "Monday 是星期一"
Case "tuesday" : Print "Tuesday 是星期二"
Case "wednesday" : Print "Wednesday 是星期三"
Case "thursday" : Print "Thursday 是星期四"
Case "friday" : Print "Friday 是星期五"
Case "saturday" : Print "Saturday 是星期六"
End Select
End Sub

但是輸入英文大寫就無法顯示.
請問該如何使用Lcase,若輸入大寫直接強迫轉換為小寫?
謝:on_51:

這很簡單，加在 select case 上即可

Select Case LCase(Week)

再指導VB初學者一下~
 

大大的指導,讓我恍然大悟,已解決.:on_79:
初學者還有個問題想請教大大,

若表單的程式碼如下,會無法顯示.
Private Sub Form_Load()
Dim WeeK As String
WeeK = InputBox ("請輸入一星期7天的英文單字:")
Select Case LCase(Week)
Case "sunday" : Print "Sunday 是星期日"
Case "monday" : Print "Monday 是星期一"
Case "tuesday" : Print "Tuesday 是星期二"
Case "wednesday" : Print "Wednesday 是星期三"
Case "thursday" : Print "Thursday 是星期四"
Case "friday" : Print "Friday 是星期五"
Case "saturday" : Print "Saturday 是星期六"
End Select
End Sub
--------------------------------------------------
若表單的程式碼如下,可以顯示.
Private Sub Form_Active()
Dim WeeK As String
WeeK = InputBox ("請輸入一星期7天的英文單字:")
Select Case LCase(Week)
Case "sunday" : Print "Sunday 是星期日"
Case "monday" : Print "Monday 是星期一"
Case "tuesday" : Print "Tuesday 是星期二"
Case "wednesday" : Print "Wednesday 是星期三"
Case "thursday" : Print "Thursday 是星期四"
Case "friday" : Print "Friday 是星期五"
Case "saturday" : Print "Saturday 是星期六"
End Select
End Sub

謝謝指導!

你必須將你的 INPUT 那些指令 放在
Private Sub Form_Active()

中.

Form_Load() 是設定些初值 不會顯示出來的

因為 Form_Load 還沒跑完前
表單窗體 是 不會顯示出來的

此時如果不將 Form1 的 AutoRedraw 設為 True
print(畫在) 在 Form1 的 咚咚
就會因為 "重新顯示" 這個動作在後
使的在Form1畫布上的圖形
消失掉 (不被自動重繪)

可以比較一下
與
有何不同

原來如此!
 

謝謝大大,
原來如此,上了一課.
:on_79: