Как изменить текст в файле .txt? - VB

Формулировка задачи:

Private Sub Form_Load()
If Dir$("C:\tmp\amd.txt", vbNormal) = "" Then
Dim f As Integer
f = FreeFile
Open "C:\tmp" & "\amd.txt" For Output As f
Print #f, Date
Print #f, Time
Close f
End If
Dim file
Dim e As String
file = FreeFile
Open "C:\tmp" & "\amd.txt" For Input As #file
Line Input #file, e
Close file
Label1.Caption = e
End Sub
Как видите у меня в Label1 дата. А как сделать так, чтобы была не дата, а часть этой даты, например не: 03.04.2013 , а 03 просто?

Код к задаче: «Как изменить текст в файле .txt? - VB»

textual
Day(Date)
Month(Date)
Year(Date)
+Format (,
:
Разделитель компонентов времени. В некоторых национальных настройках применяется другой символ. Разделитель компонентов времени используется для разделения компонентов времени (часов, минут и секунд). Фактический символ, используемый в качестве разделителя компонентов времени, определяется текущей национальной настройкой. В России в качестве разделителя компонентов времени используется двоеточие 
/
Разделитель компонентов даты. В некоторых национальный настройках применяется другой символ. Разделитель компонентов даты используется для разделения компонентов даты (дня, месяца и года). Фактический символ, используемый в качестве разделителя компонентов даты, определяется текущей национальной настройкой. В России в качестве разделителя компонентов даты используется точка 
c
Отображает дату как ddddd и время как ttttt. Если у числа нет дробной части, то отображается только дата; если у числа нет целой части, то отображается только время 
d
Выводит номер дня в месяце, содержащий одну или две цифры (1 – 31) 
dd
Выводит номер дня в месяце, содержащий одну или две цифры (01 – 31) 
ddd
Выводит сокращенное название дня недели (Пн– Вс) 
dddd
Выводит полное название дня недели (Понедельник– Воскресенье) 
ddddd
Отображает соответствующую числу полную дату (день, месяц и год) согласно краткому системному формату даты.Эквивалентно стандартному формату Short Date 
dddddd
Отображает соответствующую числу полную дату (день, месяц и год) согласно длинному системному формату даты.Эквивалентно стандартному формату Long Date 
w
Выводит номер дня недели (по умолчанию, от 1 для воскресенья до 7 для субботы),какой день считать первым определяется аргументом FirtsDayOfWeek 
ww
Выводит номер недели года (1 – 54),какую недель считать первой определяется аргументом FirtsWeekOfYear 
m
Выводит номер месяца, содержащий одну или две цифры (1 – 12). Если символ m следует сразу после символов h или hh, выводится число минут 
mm
Выводит номер месяца, содержащий две цифры (01 – 12). Если символ m следует сразу после символов h или hh, выводится число минут 
mmm
Выводит сокращенное название месяца (Янв – Дек) 
mmmm
Выводит полное название месяца (Январь – Декабрь) 
q
Выводит номер квартала года (1 – 4) 
y
Выводит номер дня года (1 – 366) 
yy
Выводит номер года, состоящий из двух цифр (00 – 99) 
yyyy
Выводит номер года, состоящий из трех или четырех цифр (100 – 9999) 
h
Выводит число часов, состоящее из одной или двух цифр (0 – 23) 
hh
Выводит число часов, состоящее из двух цифр (00 – 23) 
n
Выводит число минут, состоящее из одной или двух цифр (0 – 59) 
nn
Выводит число минут, состоящее из двух цифр (00 – 59) 
s
Выводит число секунд, состоящее из одной или двух цифр (0 – 59) 
ss
Выводит число секунд, состоящее из двух цифр (00 – 59) 
ttttt
Отображает полное время (часы, минуты и секунды) согласно текущему системному формату времени. В Microsoft Windows формат времени по умолчанию имеет вид "h:mm:ss" 
AM/PM
Использует 12-часовую шкалу, добавляя прописные буквы "AM" (до полудня) или "PM" (между полуднем и полуночью) 
am/pm
Использует 12-часовую шкалу, добавляя строчные буквы "am" (до полудня) или "pm" (между полуднем и полуночью) 
A/P
Использует 12-часовую шкалу, добавляя прописные буквы "A" (до полудня) или "P" (между полуднем и полуночью) 
a/p
Использует 12-часовую шкалу, добавляя строчные буквы "a" (до полудня) или "p" (между полуднем и полуночью) 
AMPM
Использует 12-часовую шкалу, добавляя текстовую константу, добавляя текстовую константу, заменяющую в текущей системе индикаторы "AM" (до полудня) или "PM" (между полуднем и полуночью). Регистр изображаемой текстовой строки определяется соответствующими системными настройками. В Microsoft Windows по умолчанию используется формат "AM/PM" )

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

6   голосов, оценка 4.000 из 5


СОХРАНИТЬ ССЫЛКУ