Użyj właściwości Text komórki zamiast Value, czyli [syntax=text].TextFrame.Characters.Text = Cells(3, 2).Text[/syntax]
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
Jeśli datę zapisujesz w komórce, to może okazać się, że to nie taka prosta sprawa. W innym przypadku spróbuj podmienić separator. Np [syntax=vb]jakasData = Date If Application.International(xlDateSeparato... <> "." Then jakasData = Format(jakasData, "dd.MM.yyyy") End If MsgBox jakasData[/syntax]
Problem rozwiązany.
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 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]...
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,...
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")
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...
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...
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...
Chyba, że tworzyc swoja klasa 'Textboks' z reakcji na zdarzenie Change i następnie programowo wstawić je na formularzu (60 razy) Oczywiście musisz również programowo połączyć tekst i docelowe Dodano po 3 Ale jeśli te dane z tekstboks idzie do komórki w arkuszu, lepsze formatowanie już tam
Czy format pliku (rozszerzenie) to .pptm?
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)...
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
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 {...
string.Format("{0:.00}",3.12345);
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...
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...
Wielki dzięki za pomoc:D Kupiłem sobie dobrą książkę o C# bo ta z której teraz korzystam to dno. Doczytam o wątkach i będę kontynuował program. Ostatnie pytanie. Dlaczego jak w do projektu dodam klasę to nie mogę w niej zaprogramować niczego co jest umieszczone na "formatce" textbox itp. W moim przypadku nie mogę użyć serialPort. Kompilator udostępnia...
Witam serdecznie, mam pewien problem. W Windows form chciałbym na panelu dodawać dynamicznie po każdorazowym wciśnięciu przycisku textboxa jednego pod drugim z jakimś odstępem by się nie nakładały na siebie np. do 15 bo więcej się nie zmieści na formatce. Próbowałem z takim kodem, ale dodaje mi się tylko jeden textbox. [code][syntax=csharp] private...
witam serdecznie programuje w VB.NET problem jest tego typu - w formatce mam kilka poll textbox po wypełnieniu "textbox1" mozemy przejsć do "textbox2" po przyciśnięciu klawiszem "tab". Jak zrobić zeby uzytkownik po wypełnieniu "textbox1" przechodził do "textbox2" przyciskając klawisz "enter" a nie "tab" pozdrawiam
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...
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...
Witam, w jaki sposób mam odwołać się do texboxa w klasie programu. Mianowicie po wpisaniu parametrów na formatce, chciałbym aby wykonały się obliczenia zawarte w klasie programu.
Chciałbym zadać kilka pytań związanych z wyświetlaniem i sprawdzaniem formatów w oknie 'UserForm'. Jedno z nich: mam poniższy kod umieszczony w oknie 'TextBox' Ogólnie to kod dział poprawnie jednak problem pojawia się kiedy okno 'TextBox' umieszczę w 'Frame', wówczas kod przestaje działać i nie informuje mnie o niepoprawnie wprowadzonej formie daty....
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
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.
problemem jest to ze data wyswietlana w listbox jest w amerykanskim formacie Bez obrazy, ale stwierdzam, że "leń patentowany" jesteś ... :-) ... "Rozwiązanie" masz pod nosem i sam się w pewnym sensie nim posługiwałeś. Właściwość " List " ... dlaczego nie sprawdziłeś składni tej właściwości ? " object.List(row, column) " Gdybyś zerknął w pomoc podręczną,...
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...
mam problem z poniższym kodem: Private Sub TextBox3_AfterUpdate() TextBox3.MaxLength = 10 TextBox3 = Format(TextBox3.Text, "dd-mm-yyyy") If Not IsDate(TextBox3.Value) Then MsgBox "WPROWADŹ DATĘ W PODANYM FORMACIE" TextBox3.Value = "" Exit Sub End If End Sub kiedy wprowadzam dzień < od 12 lub = 12 komputer uporczywie zamienia dzień za miesiąc. Proszę...
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
Witam, Posiadam programik (nie ja go pisałem) który zmienia format liczby w zależności od podania ilości liczb znaczących oraz rozdzielczości liczby. Programik działa idealnie. Programik jest przypisany do Worksheet Arkusza1. Natomiast chciałbym program ten połączyć z UserForm wraz z textboxami. Podanie w textboxach liczby cyfr, rozdzielczości oraz...
Witam. Podpowiedzcie Panowie jak zrobić, żeby wyświetlona formatka nie blokowała aktualnie wyświetlanego arkusza. Precyzując. Mam formatkę z kilkoma textbox'ami. Dane do tych textbox'ów wpisuję z wyświetlonego wcześniej arkusza. Niestety, dane te są w różnych miejscach tego arkusza i muszę go przewijać. Jednak, gdy wyświetlę formatkę nie mogę przewijać...
Miał być plik Excela, a nie kod. Samego kodu bez danych i bez formantów nie da się uruchomić. Szanuj czas tych, od których oczekujesz pomocy. W załączonym pliku masz przykład formularza, do którego możesz wprowadzić datę i czas do pola 'Start' oraz czas w formacie [g]:mm do pola 'Czas trwania'. Wynik w polu 'Koniec'. Użyty kod: [syntax=vbnet]Private...
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;...
witam mam zadanko do zrobienia z errorprovider mam na formatce TExtBoxa a nizej pare ComboBoxów i innych TextBoxow zadanie polega na tym ze po zostawieniu pustego pola w tym TextBoxie albo wpisaniu czegos innego niz cyfra wyskakuje nam errorprovider ktory blokuje zamkniecie programu i mozliwosc klikania na innych elementach. Doszedlem do tego ze po...
Zmienna gora jest zmienną VBA, ale służy tylko do pobrania wartości z textboxu, przeliczenie jej i przekazanie do formatowania warunkowego. Na tym jej rola się kończy i nie ma potrzeby redefiniowania jej. Komórka A1 pełni rolę "włącznika" , czyli jak mamy w niej 1 to formatowanie działa, jeżeli zmienimy na 0 formatowanie obejmuje liczby od 0 do 0 (...
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...
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_...
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...
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)...
UserForm1 Wartość/Szanse na powodzenie: W polu wartość wpisywana jest kwota - jak zrobić, żeby po wpisaniu liczby, automatycznie formatowałaby się ona 0000,00 ZL? W przypadku pola Szanse na powodzenie - liczba automatycznie formatowana do procentów. Komentarz: Czy można wprowadzić automatyczne zawijanie tekstu? UserForm3 Zakładka Inwestycje/Projekty...
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...
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...
Witam Nadal nie napisałeś gdzie Ci się co blokuje. Pisząc blokuje chodziło mi, że programu nie dało się dalej obsługiwać, na nic reagował, procesor w moim PC 100% obciążony. Trzeba było Menedżerem wyłączyć, problem tkwił w tym że port był odpytywany gdy był zamknięty. Ale po blokowałem to poleceniem "Enabled" jest OK i teraz trzeba wpierw wybrać Port,...
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, 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...
Dzięki za zainteresowanie tematem. Poniżej przedstawiam całą przykładową aplikację: Główny form [syntax=csharp] using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; using System.Data.SqlClient; namespace WindowsFormsApplication1...
Z góry przepraszam za wodolejstwo. W skrócie program ma dwa okna - pierwsze to baza danych zrobiona na datagridview, drugie to pole edycji zaznaczonego wiersza zrobione na textboxach. Trafiłem na kolejny problem, mianowicie mam stworzoną Form1 i Form2. Form1 wygląda następująco (fragmenty): [syntax=cpp] #pragma once #include "Form2.h" ...... int a;...
Oczywiście jakoś tych ludzi do bazy dodać trzeba, ja zwykle robiąc jakieś aplikację tworze panel do dodawania czy to klientów, czy produktów itp. Następnie w evencie Load formatki wrzucam uzupełnianie Itemów w ComboBoxie wartościami w bazie. Co do uzupełniania textboxów robię to tak (tu przykład dla MySQL): [syntax=csharp]conn = new MySqlConnection(cs);...
. Net 4.0 vb Ale jakie zmienne chcesz deklarował? Twoje zadanie to przenieść kod z module1 w consoleapp do formularza w Windows form applucation. Oba projekty masz rozpoczęte. Na formatce dodaj 3 textbox i tam gdzie masz w aplikacji konsolowej readline, musisz zmienić na właściwość =textbox,dodaj button, który wywoła metodę calculate, wynik możesz prezentować...
Podam przykład: Posaidam formatkę na której istnieją dwa TextBoxy: Text1 i Text2 Na formatce znajduje się także Button a poniżej zamieszczam kod do przycisku: dim a as string Private Sub Command1_Click() a = Text1.Text Text2.Text = a End Sub TextBoxy mają multiline zaznaczone na true oraz scrole do przewijania. Do pierwszego okienka wklejam...
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...
Mam podobny kod wykorzystany w oknie gdzie wpisuję daty (dodałem do niego Twój sposób zaznaczania) jednak mam problem z tym kodem bo nie działa poprawnie ale tylko dlatego że okno 'TextBox' jest włożone w sumie do dwój okien 'Frame' (bez 'Frame' działa poprawnie). Czy można coś zrobić żeby kod działał poprawnie bez konieczności usuwania 'Frame'? A to...
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.
- W Bazie jest data w formacie 26-12-2013 bez godzin A na jakiej wersji językowej systemu pracujesz, na naszej, polskiej?? Z doświadczenia wiem, że najpewniejszym formatem daty (nie spotkałem jeszcze aplikacji która by go nie rozpoznała) jest yyyy-mm-dd, np. 2013-01-20, z myślnikami jako separatory. Z innymi formatami - różnie bywa... Wystarczy zrobić...
Ten parameter masz jako miesiące, nie lata... Czyli: [syntax=vbscript]TextBox6.Value = Format(DateAdd("m", Kalibracja1.Value, TextBox5.Value), "yyyy-mm-dd")[/syntax]
Witam, mam problemy z w/w konwersją. W mojej aplikacji wczytuje w textboxie liczbę rzeczywistą. Następnie muszę ją wymnożyć przez kolejną liczbę rzeczywistą i wyrzucić do innego textboxa, natrafiam jednak na problem. Niestety mam sporo operacji Convert, a nie da się ich uniknąć ponieważ textboxy bazują na stringach. Zastanawia mnie jednak dlaczego taka...
Witaj podst = Application.WorksheetFunction.Rept("0", 15 - Len(TextBox1.Text)) TextBox2.Text = Application.WorksheetFunction.Substitute... "-", podst)
Odpowiednio ustaw maskę wprowadzania. http://forum.idg.pl/topic/112388-excel-m... http://office.microsoft.com/pl-pl/access... http://excel.tips.net/T002746_Using_an_I...
Niestety nie działają mi te makra (Error 2043) na chwile obecna pracuje na 2003 W kwestii wyjaśnienia może jest inne rozwiązanie... 1. wykorzystany będzie do wprowadzenia dat tylko exel nie rozpoznaje ich jako datę brak możliwości późniejszego formatowania tej daty. 2. kwestia wyświetlenia wartości z komórki z formatowaniem czyli zawartość komórki 123456789...
Tylko przez chwilę próbowałem programować w C++/CLI i już prawie nic nie pamiętam. Udało mi się jednak coś napisać: Na początek dodajesz #include "Form2.h" w Form1 na samej górze. Klikasz 2 razy na przycisk NONAME (zakładam, że jego nazwa to button1) i umieszczasz to: [syntax=cpp]Form2^ testDialog = gcnew Form2; if(testDialog->ShowDialog() == System::Windows::Forms::DialogResult::OK...
Deklarację zmiennej wrs umieść w nagłówku i dodaj usuwanie... Coś w ten deseń [syntax=vb]Dim wrs As Long Private Sub EMAILONE_Click() 'MsgBox "i tu przepisujesz odwrotnie niż wczytanie przy Initialize" & vbNewLine _ & "czyli najpierw Find w razie poprawki a jeśli Err>0 to do ostatniego wiersza" With Sheets("DANE_PRZETWORZONE") ostatniwiersz1 = .Range("A65536").End(xlUp).Row...
Witam! Stworz forme z picturebox i 2 textboxami. [syntax=csharp] private void pictureBox1_Paint(object sender, PaintEventArgs e) { int numX = 0; int numY = 0; if (textBox1.Text != "" && textBox2.Text != "") { try { numX = Convert.ToInt16(textBox1.Text); numY = Convert.ToInt16(textBox2.Text); } catch (FormatException ex) { } catch (OverflowException...
Okej, to jest mój kod, który jest pod przyciskiem "Dodaj rekord" na formatce (bo wydaje mi się, że o to chodzi): [syntax=VBA] i = Application.CountA(Sheets("Sprzedaz").Ra... i = i + 1 Range("b" & i).Formula = TextBox1.Text Range("c" & i).Formula = TextBox2.Text Range("d" & i).Formula = TextBox3.Text Range("e" & i).Formula = TextBox4.Text Range("f"...
https://obrazki.elektroda.pl/1915818500_... Jak wykonać projekt w oparciu o najnowsze modele językowe dostępne lokalnie, takie jak deepseek-r1, llama, qwen, gemma i mistral? Jak działa jednolity interfejs Ollama oparty o zapytania HTTP? Tutaj postaram się to pokazać. Nauczymy się wysyłać zapytania chatu zawierające zarówno tekst, jak i obrazki....
Bardzo dziękuje koledzy za pomoc. W programiku wykorzystałem propozycję adamasa która działa bardzo dobrze. Bobo - dopiero raczkuję w VBA i metodami prób i błędów tworze małe programiki jak na razie na oddzielnych formatkach aby mieć dostęp do różnych kodów. W dalszej nauce będę się starał operować tylko w jednym UserForm. adamas - wyniki wyboru umieściłem...
Osobiście nie testowałem z background worker ,ale tak jak kolega napisał problemem jest,to że kontrolki formatki są w innym wątku. Nie działa ten kod co napisałeś? Bo wygląda ok
No to może jeszcze inaczej powiem. Chce wysłać ramkę modbus'ową bez CRC która będzie wpisana w textboxie. .... Już wiadomo o co chodzi ? to ja bym zrobił tak, że każdy bajt (dwa znaki) czymś oddzielasz ... PRZYKŁAD: w textboxie wpisujesz AB;32;FF;9A;3A; i to są kody HEX bajtów, oddzielone średnikami :!: W kodzie ja parsujesz - no i wysyłasz. Będzie...
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-...
Kompilator wywala: 1>c:\documents and settings\darek\moje dokumenty\visual studio 2010\projects\hfgf\hfgf\Form1.h(278): error C2440: 'initializing' : cannot convert from 'System::String ^' to 'std::basic_string<_Elem,_Traits,_Ax&... 1> with 1> [ 1> _Elem=char, 1> _Traits=std::char_traits<char>, 1> _Ax=std::allocator<char>...
Jak dodać do formatki kolejnego textboxa dopiero po wpisaniu tekstu do poprzedniego? Da radę w ogóle coś takiego zrealizować? Z góry dzięki za informacje
1. Procedury zdarzeniowe, takie jak ta poniżej: 877962
Witam No właśnie zrobiłem tak jak napisałeś: [syntax=csharp]using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; using System.Data.OleDb; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1()...
Aaa, to spróbuj Private Sub TextBox1_Change() Dim tekst As String, wynik As String tekst = TextBox1.Value wynik = TekstEtykiety(tekst, "Magazyn") If wynik <> "" Then Label1.Caption = wynik Else wynik = TekstEtykiety(tekst, "Magazyn2") If wynik <> "" Then Label1.Caption = wynik...
Witam, Może ktoś mi podpowiedzieć czemu jak piszę w polu TextBox o nazwie liczba np. 452 to w polu TexBox o nazwie slownie wyświetla mi się tekst "pięćset pięćdziesiąt dwa złote" ???? Poniżej kod: Dodano po 1 https://obrazki.elektroda.pl/9991929800_... Jak widać na screenie, jeśli wpisze się drugą liczbę powyżej 5 czyli w tym przypadku...
Posiadam działającą wyszukiwarkę w Excelu, która działa tylko dla jednej kolumny [syntax=vbscript]Private Sub TextBox1_Change() ActiveSheet.ListObjects("Data1").RANGE.A... field:=2, Criteria1:="*" & [a2] & "*", Operator:=xlFilterValues End Sub[/syntax], jak zmodyfikować makro bądź utworzyć całkowicie nowe, aby działało dla wielu kolumn....
Cześć, jednak w miarę upływu czasu i obchodzenia się z tą bazą zauważyłem kilka problemów z którymi nie mogę się uporać.. mianowicie: 1. po wstawieniu kolejnych wpisów w bazę krzaczą mi się wartości materiałów.. http://obrazki.elektroda.pl/2894038700_1... 2. wstawiłem normalnie formatowanie warunkowe, które niestety podkreśla mi 5 linijek(tyle...
Ad.1 Dzięki o to mi chodziło Przy wykorzystaniu dwóch textBoxów: Dodano po 13 Co do części kodu FirstFourDayWeek można to podmienić na: [syntax=csharp] public enum CalendarWeekRule { // Summary: // Indicates that the first week of the year starts on the first day of the // year and ends before the following designated first day of the week. The // value...
Bo do tego jeszcze jest formatka, na której są etykietki (label) i inne obiekty. To nie jest program konsolowy. Przecież widziałeś oryginał. Formatka:[syntax=csharp]namespace ReadPixelAndPressKey { partial class Form1 { /// <summary> /// Required designer variable. /// </summary> private System.ComponentModel.IContainer components = null;...
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. [syntax=vb]Private Sub CommandButton1_Click() bledy = False Me.Frame1.BorderColor = &H8000000F Me.Frame1.BorderStyle = fmBorderStyleNone Me.Frame1.SpecialEffect...
Ad 1. [syntax=c]try { // tu wstaw te wszystkie konwersji } catch(...) { richTextBox1->Text = "niepoprawne dane"; }[/syntax] Ad 2. A czego się spodziewasz skoro nadpisujesz po każdej wartości? Metodę AppendText znasz i używasz, jak widzę, więc chyba nie rozumiem pytania. Oprócz tego ... 1. czemu zamiast: [syntax=c]wysokosc = Convert::ToDouble(Jf->textBox1->Text);.....
Podpiąłem pod bindingsource'a tabelę zaciągniętą z bazy danych sql. Następnie zaś wykorzystałem tego bindingsource'a w listbox'ie ustawiając mu jako wyświetlaną wartość kolumnę Name tabeli (ListBox.DisplayMember="Name") a jako zwracaną wartość kolumnę ID tabeli (ListBox.ValueMember="ID") - kolumna ta jest kluczem głównym tabeli i zawiera wartości typu...
Witam. Poniżej fragment kodu. Wywala mi w Visualu błąd "error c2181: illegal else without matching if"... Proszę o pomoc co jest nie tak... [syntax=cpp]double x,error,c; double w,wyn; error=Convert::ToDouble(comboBox1->Te... int n;n=0; w=1; wyn=1; x=Convert::ToDouble(textBox2->Text); if(fabs(x)<=1) { {w=-w*(((2*n-1)*x)/(2*n+2)); n=n+1; wyn=wyn+(w);...
Witam Mam problem z poniższym kodem. ormularz nie wysyłą mejli. Chcialbym aby na adres podany przez zainteresowanego został wysłany mejl potwerdzajacy wypełnienie formularza. Proszę o pomoc:) [syntax=xml] <?xml version="1.0" encoding="UTF-8"?> <contact> <layout bg_color="0xb3c6d7" bg_alpha="1.5" fields="right" fields_color="7a99b5" fields_alpha="0.5"...
Parę rzeczy, żeby Cię nakierować ;) 1. Klasa - Uzytkownik [syntax=csharp] public class Uzytkownik { public string Imie { get; set; } public string Nazwisko { get; set; } // itd. }[/syntax] 2. W klasie Uzytkownik przesłaniasz metodę ToString() [syntax=csharp] public override string ToString() { // tutaj zwrócisz tekst, który będzie zawierać wszystkie...
Chociazby tak. -W miejscu kodu wczytaj formatke z textboxem. -w petli czekaj na odpowiedz po nacisnieciu buttona na formatce (nie zapomnij o DoEvents) -po wypelnieniu zmiennej zawartoscia textboxa wychodzi z petli i weryfikuje password -Jezeli nikt nic nie wpisze, wielkosc petli bedzie czasem na wpisanie inaczej wyjdzie z niej i przerwie namyslanie...
Więc napisałem aplikację, która w formie wyświetla za pomocą obsługi zdarzenia Kalkulator. Problem polega na tym, że chcąc trochę udoskonalić program chciałbym aby w kalkulatorze podczas wprowadzania liter bądź stringów nie będących liczbami wyświetlało alert w postaci Message Boxa o błędzie, jednak gdy korzystając z funkcji try catch chce kompilować...
:) :) Zapewniam Cie ze to nie jest wina VB ! Jakie dane sa na porcie takie otrzymujesz i czy to bedzie inny jezyk programowania czy inny system uklad UART odbiera dane i przekazuje je dalej. Do wizualizacji zrob sobie duzego textboxa i ustaw multiline na true. tam wyswietl zmienna DaneRs. jezeli chcesz dokladnie zobaczyc jakie bajty przychodza na port...
Mógłby być to exel, używam worda z uwagi na to, że łatwiej mi upchać po 3-4 tabelki na stronę :) Chodzi o to, że mam tabelkę z grafikami i chce wydrukować załóżmy na 6 tygodni. To wpisuje datę początkową i automatycznie na kolejnych kartkach wychodzących z drukarki data się zmienia. Excel ma coś takiego jak "wpasuj w stronę" w obcjach wydruku w ustawieniach...
Mam taki problem z kodem VBA kalendarza w formularzu Zanim zaczniesz kombinować z kodem kalendarza, najpierw usuń wszystkie błędy formatowania dat w arkuszu, oraz skoryguj działanie Twojego formularza. :D Na pierwszy rzut oka widać pomieszanie formatów - proponuje wykorzystać jeden format systemowy (no jeśli z RPA :?: - to jeden ale wszędzie :D ) 924267...
Witam, Mam problem z makrem do wczytu pliku (skoroszytu excel). Plik co prawda jest wczytywany ale tylko pierwszy arkusz. Jak zedytowac to makro tak żeby wczytane zostały wszystkie arkusze? Procedury które mam dalej dotyczą pierwszego arkusza. [syntax=vb] Dim plik As Variant Private Sub CommandButton1_Click() Dim Filtr As String Dim Tytul As String...
Cześć Chciałbym stworzyć makro, które wysyłało by emaile z listy z excel’a i dołączało spersonalizowane załącznik. W Arkuszu „lista” są komórki z spersonalizowanym numerem odbiorcy od „b6” do „b5006” np. D001425 a w komórkach od „c6” do „c5006” adresy email. Chciałbym aby pętla do każdego...
Dzięki za odpowiedz, w między czasie zrobiłem coś takiego : [syntax=vb]Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If Len(TextBox1.Text) = 8 Then TextBox1.Text = Format(TextBox1.Text, "##-##-####") TextBox1.Text = TextBox1.Text TextBox1.Text = Replace(TextBox1.Text, "-", ".") Else If Len(TextBox1.Text) = 6 Then TextBox1.Text = Format(TextBox1.Text,...
Witam, mam problem mianowicie chce aby bylo niemozliwe wpisywanie do textboxa liczb, tylko sam tekst. Sugerowano mi zeby zrobic to za pomoca Keypress i Keydown niby wszystko sie kompiluje ale zadnego rezultatu nie widac, dalej mozna wpisywac i tekst i liczby w pole textboxa. Oto moj kod programu: #pragma once namespace hhhhhhh { using namespace...
Masz rację. Dziękuję. 'System.FormatException' occurred in mscorlib.dll czy wystarczy jeśli obejmę ten fragment poprzez: [syntax=cpp] try { } catch (FormatException^ ) { } [/syntax] czy powinno się to inaczej zrobić?
Ok mam już coś takiego [syntax=vb]Private Sub CommandButton2_Click() Dim i As Integer For i = 3 To 12 Selection.NumberFormat = "General" Cells(i, 3) = "='" & Link(TextBox1.Text) & "[" & Nazwa(TextBox1.Text) & "]Input'!$C$" & i Next i For i = 14 To 287 If i <> 32 And i <> 33 And i <> 103 And i <> 104 And i...
textbox format liczby textbox format czasu textbox format liczba
random timera telewizor odświeżanie moduł zapłon nissan
samsung ue50ju6400 światło awaryjne
Problem z demontażem silnika w pompie hydroforowej Rozmiar klucza Torx do cewki zapłonowej Renault
