Imports System Imports System.Globalization Imports System.Threading
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load ''''在這裡放置使用者程式碼以初始化網頁
Dim arrDayNames() As String = {"日", "一", "二", "三", "四", "五", "六"} Dim culture As CultureInfo = New CultureInfo("zh-TW") culture.DateTimeFormat.AbbreviatedDayNames = arrDayNames Me.Calendar1.DayNameFormat = DayNameFormat.Short Thread.CurrentThread.CurrentCulture = culture End Sub
注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] 
