Forum Pasja Informatyki - Najnowsze z tagiem basic

Tablica typów w procedurze

Thu, 08 Apr 2021 07:59:22 +0000

Dzień dobry.

Mam problem v Visual Basic 6.

Postaram się dokładnie sprecyzować zagadnienie na przykładzie. Mam taki kod:

Public Type typBudowa
     Dom As Boolean
     Sklep As Boolean
     Kościół As Boolean
End Type

Public Budowy(10) As typBudowa

Public Sub Odwiedź (ByRef Budynek As typBudowa)

     ' ... kod

     Dim i As Integer

     For i=1 To 10
          If Budynek(i) Then
          ' ... kod
          End If
     Next i

End Sub

' wywołanie procedury:

Odwiedź Kościół(2)

Problem polega na tym, że wewnątrz procedury Odwiedź nie mogę sprawdzić wszystkich elementów tablicy Budynek ponieważ Budynek jest w tym wypadku odnośnikiem do drugiego elementu Kościół. Czy można to w jakiś sposób rozwiązać? Innymi słowy, że bez względu jaki typ budowy wywołam w procedurze będę mógł sprawdzić wszystkie elementy tablicy.

VBa przypisanie wartości do textboxa

Thu, 13 Jun 2019 06:33:54 +0000

Witam.Programuje kalkulator w excelu a jestem początkującym z tym językiem i mam problem a mianowicie mam 3 textboxy które muszę zsumować ale każdy musi mieć przypisana różna wartosc z danych arkusza, tzn jeśli wpiszę do textboxa 4 to obliczy mi 4* przypisana wartosc. Chodzi o obliczanie ciężaru np sztuki desek po 10 kg. Wiem że można po prostu zrobić mnożenie ale chcę się dowiedzieć czy jest możliwość takiej opcji ?

Visual Basic, Jak złapać konkretny przycisk ?

Wed, 16 Jan 2019 18:42:58 +0000

Dzień dobry zaczynam przygodęz Visual Basic mam pytanie odnosnie " złapania" jakoś konkretnego elementu , zależy mi by kod napisać bez uzywania edytora graficznego ( znaczy takiego ze mogę przeciągną np. przycisk i programowac go na gotowo) , tylko za pomocą normalnego pisania kodu. Chciałbym zrobic prosty kalkulator który doda lub odejmie dwie liczby i za pomocą "Message" wyswietli wynik, zrobiłem program który wyswietla wynik odejmowania natomiast wyniku dodawania juz nie wyswietla, (wiem dlaczego ponieważ, operacja się wykonuje dobrze ale wyswietla sie ostatni wynik jak to w programowaniu czyli odejmowania) , wiem ze aby działało dobrze to muszę złapac konkretny przycisk i pewnie dać instrukcję IF THEN a nie zrobiłem tego PONIEWAŻ nie wiem jak się odnieść do konkretnego przyciski , dlatego proszę o pomoc, w jaki sposób mogęzłapać mój przycisk dodawania i odejmowania ?????

Sub Main
Begin Dialog TextBoxSample 16,30,180,96,"Text Boxes and Text"

PushButton 132,20,40,14, "SUMA", .przycisk1
PushButton 132,44,40,14, "Roznica", .przycisk2

TextBox 8,20,100,12,.TextBox1

TextBox 8,56,100,12,.TextBox2
End Dialog

Dim Dlg As TextBoxSample
Dialog Dlg

Dim x,y As Integer

'??????????????
x = Dlg.TextBox1
y = Dlg.TextBox2
Message(x+y)

'?????????????
x = Dlg.TextBox1
y = Dlg.TextBox2
Message(x-y)

End Sub

tu gdzie sąznaki zapytania powinna byc napewno instrukcja if ale nie zapisywałem zeby kod byl czytelniejszy :)

Błąd druku pdf

Sun, 09 Dec 2018 11:55:13 +0000

Doc.storeToURL("file://D:/Serwis/ZlecSer2019/"& sSheetName &"_2019.pdf",args2())

wyświetla mi taki błąd:

Błąd uruchomieniowy języka BASIC.
Wystąpił wyjątek
Type: com.sun.star.io.IOException
Message: SfxBaseModel::impl_store <file://D:/Serwis/ZlecSer2019/Zgłoszenie_serw_2019.pdf> failed: 0x81a(Error Area:Io Class:Parameter Code:26).

Ma ktoś pomysł co nie tak zrobiłem?

Jak skompilować program by działał na innym komputerze Visual Basic/Visual C++

Mon, 02 May 2016 19:01:58 +0000

Witam, napisałem program dla kumpla w visual studio w języku visual basic i nwm jak go skompilować aby działał na innym PC z windowsem, i jak w języku c++ to wygląda bo też się przyda :)

Visual C# rysowanie prostej pod kątem, względem innej prostej

Tue, 19 Apr 2016 20:17:54 +0000

Witam, chciałbym prosić Was panowie i panie o pomoc.
Mianowicie piszę program, który symuluje załamanie światła w różnych warunkach. Symulacja warunków sama w sobie to żaden wręcz problem, gdyż aby otrzymać kąt załamania wystarczy podstawić kąt padania i zmienne środowiska pod odpowiedni wzór.
Problem jednak rozebrał mnie na samym początku. Jak, używając Visual C# Windows Form Application mam wyrysować ten wykres do postaci jak na obrazku?

Próbowałem metody drawline i wzoru

double x1 = (aktualna_pozycja_x - x) * Math.Cos(kat) - (aktualna_pozycja_y - y) * Math.Sin(kat) + x;
double y1 = (aktualna_pozycja_x - x) * Math.Sin(kat) + (aktualna_pozycja_y - y) * Math.Cos(kat) + y;

Linie rysują się poprawnie, ale przy zmianie kata o 1 stopień moja prosta przemieszcza się dziwnie i chaotycznie. Dodam, że próbowałem różnie podstawiać zmienne pod ten wzór, a chodzi mi o funkcję, która przyjmuje kąt i odpowiednio drukuje linię nachyloną o TEN kąt względem punktu, który na obrazku wyżej jest w kółeczku. Z góry dziękuję za pomoc i rady.

Program o zjawisku fizycznym w Visual Basic

Fri, 25 Mar 2016 16:51:18 +0000

Witam, potrzebuję napisać prosty program na fizykę odnośnie jakiegoś zjawiska fizycznego. Jestem strasznie słaby jeśli chodzi o Visuala, ale program ten musi mieć jakieś obliczenia (ze wzorów), dobrze by było jakby miał jakieś wykresy czy coś.
Odpada już wszystko związane z prądem i prawem Archimedesa, bo już zaklepane przez kolegów. Co byście mi polecili? Coś co jest dość proste do zrobienia, bo tak jak powiedziałem nie jestem dobry w pisaniu w Visual Basic.

Proszę o pomoc w zadaniu z uzyciem jezyka Visual Basic

Wed, 04 Nov 2015 17:38:37 +0000

Czesc, dostałem takie zadanie zaliczeniowe do wykonania w jezyku visual basic, ale nie wiem jak sie za to zabrac, ponieważ jestem laikiem w tych sprawach, pomożecie?

https://onedrive.live.com/view.aspx?resid=8E2DCA3094B2EC49!116657&ithint=file%2cdot&app=Word&authkey=!AG22-p0FY5dfSb8