r_c
dzięki za pomoc , i sorki za problem - ale na początku miał być txtbox ale się zmieniło na inputbox :)
jeszcze raz sorki
pozdr.
napisał: tedew postów: 19
umieszczony: 22 czerwca 2005 09:40
@r_c
dzięki za kłopot , i sorki za problem - ale na początku miał być txtbox ale się zmieniło na inputbox :)
jeszcze raz sorki
pozdr.
napisał: r_c postów: 38
umieszczony: 21 czerwca 2005 17:25
Raz wspominasz o textboxie raz o imputboxie o co właściwie chodzi?
Ponizej kod który formatuje datę
Sub PrawidlowaData()
Const F = "yyyy/mm/dd;@" Dim m_data Do
m_data = InputBox("Podaj datę", "Data", _
"Podaj datę w formacie rrrr-mm-dd") If IsDate(m_data) Then Exit Do
MsgBox "Podaj prawidłowy format daty: np. " _
& Format(Date, F) & " .", vbCritical, "Popraw" Loop
m_data = Format(m_data, F)
MsgBox "Tak jest b.dobrze : " & m_data
EndSub
napisał: tedew postów: 19
umieszczony: 21 czerwca 2005 10:16
witam
Panowie dzieki za odp :)
tylko mam problem z ustaleniem formatu daty :( , musi być koniecznie taki , np:
2005-05-02 czyli rok-miesiac-dzien ( razem z tymi myślnikiami )
date taką przesyłam do zmiennej za pomocą inputBox
pozdr.
napisał: r_c postów: 38
umieszczony: 16 czerwca 2005 18:47
A może tak:
Dim m_data
m_data = Format(TextBox1.Value, vbShortDate) ' vbshortDate pobiera ustawienie krótkiej daty w Panelu Sterowania IfNot IsDate(TextBox1.Value) Then
MsgBox "Podaj prawidłowy format daty: np. " & Date & " .", vbCritical, "Popraw" With TextBox1
.Value = ""
.SetFocus EndWith Else EndIf EndSub
r_c
napisał: pil postów: 154
umieszczony: 16 czerwca 2005 15:31
Może coś takiego ?
Do while (IsDate(wartosc_z_txt) = False) 'pętla wykonywana dopóki użytkownik 'nie poda właściwego formatu
MsgBox "Podaj prawidłowy format" Loop
napisał: tedew postów: 19
umieszczony: 16 czerwca 2005 13:01
witam:)
ostatnio napotkałem na taki oto problem:)
jest pole txt do którego wprowadzam date - która jest wykorzytsawan później w programie. Wszytsko pięknie jak user wprowadzi poprawny format daty, jednak zawsze ktoś poda zły i się wywala program
prawidłowy format jest taki : 2005-05-05
I pytanko
Czy może zrobic tak aby program tak długo kazał wpisywać date aż będzie miała odp format ??? trzeba by było stworzyć jakąś maskę ( lub coś podobnego ) aby to sprawdzało - tylko że niezabradzo wiem jak to zrobić :(
wstecz 1 dalej
otwarty rozpoczął: tedew
postów: 7
