Question

我必须在文本框中vb.net上的页面加载时修复日期格式MM / dd / yyyy 但是由于其他文本框中的更改而导致页面刷新后，它立即更改为其他格式，例如dd / MM / yyyy

我该怎么办

日期

热号

javascript 函数isNumber1（evt，element）{ var charCode =（evt.which）吗？ evt.which：event.keyCode 如果（（charCode！= 45）&&（charCode！= 47）&& // （charCode <48 || charCode> 57）返回false；返回true； }

//要获取页面加载的日期，代码为

私人Sub getdateshift（） txtDate.AutoPostBack = False 如果Now.Hour = 0 OrElse Now.Hour = 1 OrElse Now.Hour = 2 OrElse Now.Hour = 3 OrElse Now.Hour = 4 OrElse Now.Hour = 5然后 txtDate.Text = Now.Date.AddDays（-1）其他 txtDate.Text = Now.Date 如果结束

    dte = Now
    Select Case dte.Hour
        Case 6 To 13
            Shift = "A"
        Case 14 To 21
            Shift = "B"
        Case 9 To 17
            Shift = "G"
        Case Else
            Shift = "C"
    End Select
    Dim i As Integer = 0
    rblShift.ClearSelection()
    For i = 0 To rblShift.Items.Count - 1
        If rblShift.Items(i).Text = Shift Then
            rblShift.Items(i).Selected = True
            Exit For
        End If
    Next
    dte = Nothing
    Shift = Nothing
End Sub

txtDate.Text = Now.Date //获取系统的当前日期

CDate（txtDate.Text）//将值传递给函数

Format（CDate（txtDate.Text），“ MM / dd / yyyy”）//将数据保存到数据库中

或

Convert.ToDateTime（txtDate.Text）//在数据库中传递值并起作用

每当txtHeat文本框更改时txtDate格式都不应更改，并且在保存表单时txtDate也不会更改

Answer 1

如果我理解正确，几天前发生了类似的事情，我正在从数据库中检索一个日期并将其放在文本框中，并且VB不断更改格式并显示MM / DD / YYYY hh：mm我用这行代码解决了。

Textbox1.text=DateValue(DateSource.ToString("yyyy-MM-dd")

替换变量的DateSource或您的日期。由于某种原因，如果没有DateValue，它将引发错误，当它识别为时间或日期时，它看起来像是文本框自动格式化。

希望这就是您想要的。

Answer 2

我在页面再次加载所需的函数中使用了以下代码

将sFormat设置为System.Globalization.DateTimeFormatInfo =新的System.Globalization.DateTimeFormatInfo（）

sFormat.ShortDatePattern =“ dd-MM-yyyy” txtDate.Text = Format（Convert.ToDateTime（Now.Date，sFormat），“ dd-MM-yyyy”）

在页面加载的文本框中固定日期格式

2 个答案: