仅在代码中更改日期格式

时间:2013-10-16 21:17:06

标签: vb.net visual-studio-2012

我的代码只是在目录中创建一个文件夹,并根据datetimepicker和文本框的值为其命名。

日期选择器在表单上显示为“2013年10月16日”(我想如何保留)但是当我生成文件名时,我会以“161013”格式阅读日期

如果有帮助,我正在使用的代码

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)    Handles Button1.Click

    Dim lMailbox As String


    lMailbox = t2.Text & "-" & d1.Text

    ' Check if folder exists, if not: create it
    If Not Directory.Exists(nMailbox & lMailbox) Then
        Directory.CreateDirectory(nMailbox & lMailbox)

        ' Folder created message
        MessageBox.Show("Mailbox created!", "Lynx Control Panel", MessageBoxButtons.OK, MessageBoxIcon.Information)
    Else
        ' Folder already exists
        MessageBox.Show("Mailbox already exists!", "Lynx Control Panel", MessageBoxButtons.OK, MessageBoxIcon.Stop)
    End If
End Sub

nMailbox& lMailbox在代码页的顶部声明

d1是日期选择器的名称

我是VB.net的新手,非常感谢任何帮助

由于

1 个答案:

答案 0 :(得分:2)

试试这个:

lMailbox = t2.Text & "-" & d1.Value.ToString("ddMMyy")

format options与DateTime字符串格式相同。使用DTP的Value而不是格式化的Text /