Nie, w UserForm, w sekcji UserForm_Initialize: Private Sub UserForm_Initialize() MultiPage1.Value = 0 DTPicker1.Value = Date MultiPage1.Value = 1 DTPicker2.Value = Date MultiPage1.Value = 2 DTPicker3.Value = Date End Sub
Jest tam wykorzystana kontrolka 'dtPicker' Potwierdzając problem z cytowanego przez autora wątku i dyskusję o problemach z tą kontrolką - oto zachowanie tego pliku na moim komputerze :) http://obrazki.elektroda.pl/5826995400_1... Czyli tak jak mówiliśmy - dateTimePicker = samo zło :D Plik kalendarza rozbudowany o textbox do wyboru godziny...
ok to sprawdzę to u siebie i odpiszę jak zrobić by działało Dodano po 35 Masz rację! Excel inaczej traktuje liczby. Może je porównywać większa/mniejsza/równa ale nie cyfra po cyfrze. Ustaw formatowanie kolumny z kodem jako tekst! Od tej pory każda wpisana w nią liczba będzie ciągiem znaków i będzie działać na niej filtrowanie. /// uwaga: u mnie w Excelu...
Witam Tu nie chodzi o format waluty tylko że masz txtboxy jako string zrób np. tak [syntax=vbnet]Private Sub produkt1CenaMax_DblClick(ByVal Cancel As MSForms.ReturnBoolean) produkt1CenaMax.Locked = False produkt1CenaMax = "" End Sub Private Sub produkt1CenaMax_Exit(ByVal Cancel As MSForms.ReturnBoolean) If Val(produkt1CenaMax.Value) > Val(produkt1CenaMin.Value)...
W TextBox chcę mięć zapisany format w jakim ma być zapisana numeracja (czyli mam formularz o nazwie "USTAWIENIA" na nim mam zakładkę NUMERACJA DOKUMENTÓW, a w niej TextBox w którym jest zapisany format (maska)). Niestety kombinuję i nie mogę wykombinować jak to zrobić :(
Witam, mam napisać program, który zczytuje wartość z pierwszego textbox'a oraz drugiego, a następnie wykonuje działania. Wszystko działa póki są wprowadzone wartości liczbowe w textbox'ach. Gdy pola są puste zaczyna się kłopot. Rozwiązaniem byłoby napisanie: if (textbox1.Text == "" || textbox2.Text == "") { MessageBox.Show("wrong values"); } else {...
Witajcie Od jakiegoś czasu walczę z problemem aby skopiować format z komórki (np Cells(3, 3) z formatem "0.00%") do pola tekstowego budowanego komendą myDocument.Shapes.AddTextBox(msoTextOrie... 581, 100, 71, 21) Wykorzystując zwyczajne odwołanie do komórki .TextFrame.Characters.Text = Cells(3, 2).Value kopiuje mi się wartość poprawnie...
Czy format pliku (rozszerzenie) to .pptm?
Witam, Od jakiegoś czasu pracuje nad swoim pliczkiem który ma za zadanie zebrać kilkaset danych i je przeliczyć. Teraz postanowiłem dodac do pliku formularz wpisywania tych danych. Zorganizowałem go tak, że w kolumnach mam pola textowe do wpisywania danych a podsumy robię polami typu label do których ściagam dane z arkusza kodem [syntax=vb] Label1ControlSource...
Dołączyłem screeny. Jak widać w bazie jest jeden format a w formatce drugi. A chciałbym żeby były takie same. Jak zmieniam daty przez formatkę to do bazy zapisuje się prawidłowo
... data zmienia się na system amerykański ...kiedy wprowadzam dzień < od 12 lub = 12 komputer uporczywie zamienia dzień za miesiąc ... A jaki format jest wprowadzony w ustawieniach systemu ? Jeśli amerykański właśnie, to jak można z tym walczyć w pojedynczym polu tekstowym ? Zawsze wartości od 1 do 12 ustawią się zgodnie z systemowymi. Najłatwiej...
Mam w oknie TextBox które służy mi do dodawania daty kod jak poniżej. Kod sprawdza czy dobrze zadałem format daty. Jednak czy można zrobić tak żeby kod zawsze brał pod uwagę jeden format daty niezależnie od regionu? Tz. chcę żeby kod zawsze zwracał datę w formacie 'dd.mm.yyyy'. Chodzi o to że mój plik często uruchamiam na czeskim komputerze a tam właśnie...
Niestety tak mam, że tłumaczę strasznie niejasno :) Rzeczywiście teraz kod jest bardziej przejrzysty. Chciałem jeszcze usprawnić co nieco tą formę i zrobić sumę textboxów, a gdzieś po drodze mnożenie jednego (gdzie wprowadzam dane) przez drugi (gdzie dane już są załadowane podczas uruchamiania formy (to co robiliśmy powyżej) :) Obrazowo: http://obrazki.elektroda.pl/8460102500_1...
Ostatecznie rozwiązanie z trzema polami TextBox dla jednej daty byłoby najlepszym rozwiązaniem i działa naprawdę wyśmienicie, jednak jak widać na załączonym screenie w moim przypadku tych dat zaznaczonych na czerwono jest sporo i musiałbym dużo zmieniać aby dla każdej daty zrobić trzy pola TextBox. Dlatego byłbym za zastosowaniem jednego TextBoxu dla...
Witam. Zalaczam: V*i*s*u*a*l B|a|s|i|c - L|e*k*s*y*k*o|n z H*e|l*i|o*n|u.Nie wiem czy jest dobry.Jesli jestes zorientowany w programowaniu pod windows ogolnie to powinno Ci sie przydać. Przed ściągnięciem zalecam jednak zerknąć na spis treści. Wstęp11 Rozdział 1. Podstawy obsługi programu VB13 1.1.Menu programu13 1.1.1.File13 1.1.2.Edit16 1.1.3.View20...
Aplikacja uruchamia się z ustawieniami języka, formatowania itd zgodnie z ustawieniami systemowymi. Prawdopodobnie masz system polski, gdzie część całkowitą i ułamkową oddziela przecinek. W textbox musisz więc wpisać wartość z przecinkiem aby prawidłowo skonwertować wartość (albo musisz dodatkowo zdefiniować format liczby i przekazać to ustawienie przy...
Poniżej masz kod, który dokonuje sprawdzenia tych warunków. Ponieważ nie wiem czy bazujesz na starym kodzie, czy robisz coś nowego, więc podpiąłem go do przycisku - chodzi o zasadzę działania. o kurde myslalem ze bedzie to troche mniej skomplikowane. latwiej sie mowi niz pisze. wielkie dzieki. juz nie chce Ci tak slodzic bo pomysliz zsaobie ze chce...
Witam Najprościej zamienić na format binarny i dopiero przypisać do TextBox'a. TextBox1.Text = binarna Pozdrawiam Jarek
W tym przykładzie co podałeś zmienna a jest typu DialogResult, czemu odwołujesz się do niej właśnie? [syntax=csharp]a.textBox1.Text;[/syntax] Przypuszczam że to pomyłka, bo kod się nie kompiluje. Można to uprościć do postaci: [syntax=csharp]using (Form2 b = new Form2()) { if (b.ShowDialog() == DialogResult.OK) { textBox1.Text = b.textBox1.Text; } }[/syntax]...
Problem rozwiązany.
Witam. Chciałbym liczbę pobraną z bazy danych do TextBox zapisać w formacie np. 1 000 000,00. Jak pobieram tą liczbę to obecnie w TextBox wyświetla mi się w postaci: 1000000.0000 Dane do TextBox dodaje w następujący sposób i nie chciałbym już tego zmieniać: Dodano po 1 Wiem, że poniższym kodem: [syntax=vbnet] frmNoweDane.txtLiczba.Text = Format(frmNoweDane.txtLiczba.Text,...
Witam Zobacz tak [syntax=vbnet]For Each Ctrl In UserForm1.Controls If TypeName(Ctrl) = "TextBox" Then Ctrl.Value = Replace(Ctrl.Value, "-", ".") Ctrl.Value = Replace(Ctrl.Value, ",", ".") Ctrl.Value = Replace(Ctrl.Value, "/", ".") End If Next[/syntax]
wiec na PL komputerze w opcjach regionalnych ustaw sobie Czeski możesz zrobic jeszcze tak txtGornik = Format(DateSerial(Year(txtGornik2) + 2, Month(txtGornik2), Day(txtGornik2) + 1), "d.m.yyyy")
Proszę o pomoc. Próbuję stworzyć aplikację "Menadżera pracy pojazdów". Mam problem z formatem wyświetlania czasu wprowadzonego w okienku UserForm. W Textbox wpisuje czas (w formacie hh:mm), a w ListBox pokazuje mi wynik dzielenia a nie czas (hh:mm), a do arkusza przerzuca prawidłowo. Nie wiem gdzie ustawić prawidłowy format. Z góry dziękuję za pomoc...
Spróbuj w 'Private Sub TextBox_Historia_klienta_Exit' dopisać na końcu (przed End If) https://obrazki.elektroda.pl/1635878000_... tak mam ustawiony format daty w OS.
Dobry kierunek - to nie obrazek a przykladowy plik, w szczególności, UserForm. Logiczne czas wpisac w jednym TextBox w formacie "gg:mm". Zamiast pola wyboru najlepsze radio guzik(Option Button), wtedy coś musi być zaznaczone.
string.Format("{0:.00}",3.12345);
witam. Mam pytanie odnośnie formatowania procentów w textbox. Jak zmodyfikować poniższy kod Cena = Format(Val(Cena)/100, "Percent") tak aby pojawiała mi się wartość powiedzmy 0,0025% lub 0,065%. wiem że zamiast "Percent" można wpisać np. "#.0000%" ale wtedy na sztywno będę miał 4 miejsca po przecinku, a ja bym chciał aby ilość miejsc po przecinku była...
Kontynuując, pola tekstowe należałoby "uporządkować numerycznie" zaś jedną etykietę (data) nazewniczo, np. tak: [syntax=txt]lab_dzis => 'Etykieta z wyświetlaną "dzisiejszą datą" TextBox1 => 'Nazwisko TextBox2 => 'Ulica TextBox3 => 'Kod pocztowy TextBox4 => 'Miejscowość TextBox5 => 'PESEL TextBox6 => 'NIP TextBox7 => 'Telefon TextBox8 => 'Pocztel TextBox9...
No, nie wiem... Moim zdaniem wystarczy użyć funkcji IsDate() do sprawdzenia, czy wpisana wartość zostanie przez Excela rozpoznana jako data. jak pisałem, wtedy fromat DD.MM.YYYY nie zostanie jako taki rozpoznany (co innego: DD-MM-YYYY). W tym kodzie co masz teraz za "poprawny" zostanie uznany np. taki zapis: 99.99.9999
Dzięki o coś takiego dokładnie mi chodziło:).W poprzedniej Twojej wypowiedzi myślałem że poprzez wirtualną kartkę rozumiesz to abym rzutował poszczególne zmienne stringowe do zmiennej plikowej która potem będzie zapisywana jako zbiór informacji zebranych z pól textbox.Stąd zrobiło się małe zamieszanie bo nie wiedziałem wtedy jak dokonać przejścia do...
Funkcja DateDiff jest wyczerpująco opisana w pomocy. Kłopot może sprawiać pobieranie dat z TextBox'ów. Jak sama nazwa wskazuje, są w formacie tekstowym. Przydatna może być tutaj funkcja DateValue oraz wymuszenie właściwego formatu podczas wpisywania.
Witam Po pierwsze zmiany w makro symbole narodowe na angielski w związku z tym mogą być błędy TextBox3.Value == w polu tekstowym tekst zawsze. trzeba przerobić na numer Ponadto sprawdź różnicę - arkusz -> Target(i).NumberFormatLocal = PodajFormat(.... makro -> Label3 = PodajFormat(..... Spróbuj oddzielnie - Label3.caption = format( 3, "0.000")
Proponuję wcześniej sprawdzać czy wpisana dana jest numeryczna i to załatwi sprawę. Dodatkowo po obliczeniach zamieniałbym obliczoną daną na string gdyż wtedy pokazywać będzie wartość liczbową po polsku czyli z przecinkiem Proponuje zmienić kod pod txt3 na Uważaj bo amerykanie inaczej zaokrąglają :) . To co dla nas jest normalne nie koniecznie dla funkcji...
Jeżeli to jest fragment o stałej długości to możesz użyć kilku sąsiadujących pól tekstowych z różnym formatem czcionki. Jeżeli ma to być coś bardziej ambitnego pozostaje kontrolka ActiveX o nazwie: "Microsoft Rich Textbox Control 6.0" (znajdziesz ją przez kliknięcie w prawą dolną ikonkę na przyborniku) i składanie tekstu ze stringów kopiowanych Np z...
Witam, proszę o pomoc w poniższym. Robię arkusz do skanowania wyrobów, które przyjeżdżają na magazyn. Zrobiłam to za pomocą formularza w VBA. Chciałabym aby w przypadku gdy któryś z TextBoxów w formularzu nie będzie posiadał tekstu to automatycznie po zatwierdzeniu będzie wpisywać się wartość "brak". W załączniku podgląd. mój kod: https://obrazki.elektroda.pl/7807554200_...
Witam, to moje pierwsze kroki w tym programie i natknąłem się na pewną przeszkodę której sam nie jestem w stanie wyminąć. Mianowicie proszę o pomoc lub podpowiedź gdzie znajdę wytłumaczenie poniższego problemu. Chcąc od czegoś zacząć moją naukę z visual basic zrobiłem w Excelu kalkulator odsetek, stworzyłem odpowiedni userform i taki kod: [syntax=vb]Private...
Jak wyżej ;) Data w Excelu zapisywana jest jako liczba i nie ingerowałbym w to. Formatowanie daty radziłbym stosować tylko dla estetyki formularza. Czyli: 1. User wpisuje datę do TetBoxa 2. Sprawdzamy czy wartość jest datą 3. Zapisujemy w "bazie" lub później, przy zapisie 'cells() = DateValue(TexBox.value) 4. Formatujemy w formularzu (coby ładnie, nie...
to wpisz w TextBox1 to: 44616D69616E37353436 No ładnie :) a wpisz w textbox 1111 albo 11 :)
Dzięki wielkie. Szczerze- nie wiedziałem że jak dodam 'Frame' to niektóre kody trzeba zadać w inny sposób. W sumie to dodanie do UserForm ramek Frame fajnie i estetycznie wygląda ale w pewnym momencie stało się to kłopotliwe. Okno 'cmbUrodzony' jest w sumie w dwóch ramkach Frame ale zadanie kodu tylko w jednej obudziło działanie kodu do życia. Jeszcze...
Wygląda na to, że słabo sprecyzowałem mój problem. Chodzi mi o to,że w momencie, gdy wyświetlona jest formatka z textbox'ami to nie mogę przesunąć arkusz, aby wyszukać dane do wpisania w te textbox'y. Podobnie mam w innym makro. Uruchamiam makro, pojawia się inputbox z poleceniem wpisania danych z arkusza. Jeśli akurat jestem w innej części arkusz,...
Pytanie jak ustawić prawidłowo TEXTBOXy a żeby np. che wprowadzić wartość godziny np. 15:01 to żebym mógł wprowadzić tylko 4 cyfry, podobnie ma się co do formatu daty np. 02-02-2017 próbowałem z opcją mapowania tag lecz wyrzuca błąd na danym texboxie
Napisałem prosty program, który ma robić za przeglądarkę. Z TextBoxu wysyłam adres strony do WebBrowsera. Większość stron (np. onet, interia), które wczytuję ładowana jest poprawnie, ale ta jedna, dla której to właśnie piszę (gra) podczas wczytywania wywala błąd, przy czym wszystko mimo tego błędu działa poprawnie (w sensie skryptów .php) ale zepsute...
Ważne jest w jakim formacie przychodzą dane. Dane są zakończone tabulatorem ? Tzn ramka danych jest taka?: x<nr>= <dana1><dana2>...<danax&g... ?? Ważne jest to dlatego, że dane mogą przychodzić w zasadzie losowo i tak: W pierwszym evencie dostaniesz np. x<nr>= <dana1> W drugim: <dana2>...<danax>\t Więc jeśli...
Na formatce mam panel, na nim Label (próbowałem też z PictureBox). A widzisz - ja próbowałem z TextBox'ami dlatego u mnie działało a u Ciebie nie. :D Problem w tym że żeby scrollować panel to panel lub kontrolka na nim musi przejąć focus. Label ani pixture box nie przejmują domyślnie focusa po najechaniu na nie myszą. Spróbuj dodać sobie dwa TextBox'y-...
Czesc, mam problem z userform a dokladnie textbox. Jak ustawic wartosc textboxa, aby mozna bylo wpisac konkretne liczby, a dokladnie chodzi mi o cos takiego: [syntax=vbscript]If TextBox5.value = "0,00" Then MsgBox ("Wprowadz stawke z zakresu: 0; 0,05; 0,08; 0,23!") ElseIf TextBox5.value = "0,05" Then MsgBox ("Wprowadz stawke z zakresu: 0; 0,05; 0,08;...
jest tak: x = TextBox1 For i = 1 To ThisWorkbook.Worksheets.Count If Sheets(i).Name = "M-" & x Then MsgBox "TAKA NAZWA JUZ ISTNIEJE!!!", vbOKOnly, "Podaj inną nazwe!" TextBox1 = "" TextBox2 = "" Exit Sub End If Next Sheets.Add ActiveSheet.Name = ("M-" & x) ' i tej Lini pokazuje...
Zapewne kolejne problemy przyjdą z czasem. Chociaż ... to właściwie temat pokrewny. Mianowicie: Maska wprowadzania w textboxie excela. Np. pod NIP "999-99-99-999" czy np. "000-00-000-00" Akces ma to wbudowane a excel ... Chodzi o to by wprowadzać tylko liczby i ewentualnie "-" (bo jak się nie wprowadzi "-" to i tak powinno wyświetlić się 999-99-99-999)...
Znaczy na jakiej zasadzie? Bo jak dowiążesz konkretną komórkę do TB to w nim będziesz miał tekst widoczny w komórce. A to zależne jest od formaty komórki a nie TB. TB jak sama nazwa mówi z założenia jest polem tekstowym i jakoś nie znalazłem w nim możliwości formatowania liczb. Edit: Po głębokim przemyśleniu i zastanowieniu oraz pochyleniu się nad problemem...
Sorki, Asp.net MVC C#:) Kod: [syntax=html5]<%(at) Page Language="C#" Inherits="System.Web.Mvc.ViewUserControl... %> <%(at) Register Assembly="Microsoft.ReportViewer.WebForm... Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" Namespace="Microsoft.Reporting.WebForms" TagPrefix="rsweb" %> <script runat="server"> protected...
textbox format liczby textbox format czasu textbox format liczba
wymiana grzałki gniazdo ładowania samsung zapalnik poduszka boczny kierowca
bateria niteo bateria milwaukee
Seat Altea 2.0 - Wszystkie kontrolki migają i sygnał dźwiękowy Jak naprawić stator: diagnostyka, czyszczenie, przezwajanie
