Hirdetés
-
iPaden is vége az App Store monopóliumának
ma Ősztől lehet alternatív alkalmazásboltból telepíteni az EU tagállamaiban.
-
Az Apple megszerezné a klubvilágbajnokság közvetítési jogait
ph A vállalat ezért irgalmatlan pénzt fizetne a FIFA-nak, és ezzel rajzolná át az online streaming platformok háborújában a frontvonalakat.
-
Sokat fogyaszt az AI, egyre több az adatközpont, kell az atomenergia
it Az AI-t kiszolgáló adatközpontok olyan nagy energiaigénnyel bírnak, hogy egyre több atomenergiára van szükség.
Új hozzászólás Aktív témák
-
Victorius
tag
Sziasztok!
Én is kérdeznék valamit ezzel a ''levágok egy darabot egy szövegből'' témával kapcsolatban.
Tehát adott egy sor:
If W0 = '''' Then Exit Sub Else W0 = Left(Trim$(W0) + ''--------'', 8).
Vagyis nyolc kötőjelet fűz a füzérhez, hogy azután mindjárt le is vágja. MI ennek az értelme? -
[HUN]Zolee
senior tag
válasz Victorius #202 üzenetére
8 kötőjelet fűz hozzá a füzér végéhez és levág a füzért 8 karakter husszúra. Azért kell a 8 kötöjel, hogy biztos 8 karakternél hosszabb legyen.
Egy kérdés
Fáljt akarok visszaolvastatni, de a bevitt elemeket egyszerre 1 sorba adja vissza, és nem csoprtonként. A könyvben azt találtam hogy input(lof(1),#1). Mit takar a LOF ? És hogy lehet betitt sorrendben egymás után kiolvasni úgy hogy ne 1 karakterláncnak vegye az egész szöveget?
[Szerkesztve]''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/
-
Diskcopy
tag
válasz [HUN]Zolee #203 üzenetére
LOF: [/L]http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vblr7/html/vafctlof.asp[/L]
másik esetleg így? Bővebben: link -
[HUN]Zolee
senior tag
van egy procedúra amit ha meghívok mindig valami hibát ír ki :S
Public Sub beszur(besz1 As String, besz2 As Integer, besz3 As Integer)
hiba :
Compile error:
Expected: =
Ha utána egyelőségjelet + egy változóz írok, akkor elfogadja (nem futtattam le), de miért csinálja ezt? más procedúráknál nem csinálja
És lehet rekord típust deklarálni? és ha igen hogyan?
[Szerkesztve]''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/
-
sonar
addikt
Nem tudtok olyan oldalakat ahol rengeteg VB program van forrással együtt?
A tudást mástól kapjuk, a siker a mi tehetségünk - Remember: Your life – Your choices!
-
update
csendes tag
Hali!
Hogy lehet azt megcsinálni VBA-ban, hogy egy adott min és max érték közé generáljon egy véleltlenszámot?
Én úgy próbáltam, hogy csináltam egy sima véletlenszámot, majd km hosszú If részekkel úgy alakítottam, hogy beleférjen min és max közé... szorztam, osztottam stb...
nincen egy egyszerűbb megoldás?
KÖSZI! -
update
csendes tag
Ja, és ez miért nem megy?
Label.Caption = Cells(1, 1) -
update
csendes tag
válasz Apollo17hu #211 üzenetére
Hmmm... köszi a segítséget!
De...
És pl 60 és 150 közé eső páros-páratlan véletlenszám?
És az igazán jó az lenne, ha... Min és Max értéket bármikor változtathassam...
Pl beviteli mező Min és beviteli mező Max, és erre a kettő közé generáljon véletlenszámot...
Ahol a min és max között nincsen kapcsolat... pl 13 és 100 vagy akármi!
(Rnd*Min)/Max vagy valami ilyesmi...
Ja... Caption működött végül így
UserForm1.Label.Caption=Cells(1,1)
Cells(1,1)-et az aktív worksheetből szedi... -
Victorius
tag
-
T_bee
aktív tag
Hali
Az lenne a kérdésem. hogyan lehet VB-ben egy szöveges változóban tárolt számot áttenni számváltozóba úgy, hogy ha a szöveges változóban nem szám van, akkor ne fagyjon meg a progi, hanem mondjuk egy harmadik változóba eltárolja hogy a szöveges változó hanyadik karaktere nem számjegy
remélem érthető voltam, köszi a választ
T_bee''Az erőszak a gyengék végső menedéke'' /Isaac Asimov : Alapítvány/
-
Victorius
tag
-
[HUN]Zolee
senior tag
Hogyan lehet több listbox-ot egyszerre görgetni ?
''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/
-
Apollo17hu
őstag
Mit jelent a ''Val''?
Pl. ez mit csinál a változóval: Val(<változó>) ? -
Apollo17hu
őstag
válasz Apollo17hu #222 üzenetére
ja, érték... -.-
-
[HUN]Zolee
senior tag
válasz Apollo17hu #222 üzenetére
szövegből számot csinál
Val(szöveges változó)
csak addig nézi amíg azámoz talál amit az első szövegkarakter megjelenik, abbahagya a számmá alakítást, és az addig talált számod adja vissza''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/
-
Apollo17hu
őstag
válasz [HUN]Zolee #224 üzenetére
Köszi, akkor már értem azt is, h ilyenkor a tizedesvesszős értékekkel miért tudtam néha számolni.
-
[HUN]Zolee
senior tag
válasz Apollo17hu #225 üzenetére
A Val fügvénynél a . (pont) a tizedesvesző a számoknál.
''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/
-
Apollo17hu
őstag
válasz [HUN]Zolee #226 üzenetére
Igen, azt vágom, h a tizedesjel VBA-ban a ''.''. Csak amikor '',''-t írtam, ezexerint a szövegként értelmezett számból az egészrészét tartotta meg.
-
F-ECT$
titán
Gyors kérdés: hogyan kell egy sima txt fájlt megnyitni és adatokat hozzáírni?
Ez:
Open ''F:\Results.txt'' For Output As #1
Print #1, strResults
Close #1
mindig törli is a tartalmát, és nekem az kellene, hogy hozzáírjon.Dive ever, work never.
-
[HUN]Zolee
senior tag
Hogy lehet record változót deklarálni?
''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/
-
F-ECT$
titán
-
muad_dib
tag
válasz [HUN]Zolee #232 üzenetére
en ezeket type-pal szoktam...
type myType
id as integer
data as string
end type
dim myDataArray() as myType
annyi, hogy a formon vagy modulban kell a type-ot deklaralni, eljarasban/fuggvenyben nem megy, es termeszetesen letezik private ill public fajtaja is
[Szerkesztve]
[Szerkesztve]Hogyan nősül a hálózati játék fanatikus? - Holtomiglan holtodiglan...
-
F-ECT$
titán
válasz [HUN]Zolee #234 üzenetére
Egérrel
Amúgy meg: Bővebben: link
''This program uses the ClientToScreen API function to convert the target coordinates from the screen's coordinate system to the screen's coordinates system. It then uses the SetCursorPos API function to move the mouse there. ''
Sub MoveMouse(x As Single, y As Single)
Dim pt As POINTAPI
pt.x = x
pt.y = y
ClientToScreen hwnd, pt
SetCursorPos pt.x, pt.y
End SubDive ever, work never.
-
anulu
félisten
pls help!
adott 2 form, az 1. command buttonnal nyitja meg a másodikat. hogyan tudom azt megoldani, hogy ameddig a 2. nyitva van, addig az elsővel ne lehessen semmit csinálni (mint pl a MSGBOX-nál), és a 2. mindíg az 1. felett legyen?
[Szerkesztve]"Jelenleg a cloud nem más mint a sales által elhazudott és eladott utópia, egy ígéret, csalánba csomagolt mézesmadzag, amit az üzemeltetés f@$zával vernek" | Feel the power! Intel Core i7 | iPhone 14Pro 256GB | iPad Pro 2017 64GB
-
-
anulu
félisten
köszi, nézem
mod: így már jó, köszi
[Szerkesztve]"Jelenleg a cloud nem más mint a sales által elhazudott és eladott utópia, egy ígéret, csalánba csomagolt mézesmadzag, amit az üzemeltetés f@$zával vernek" | Feel the power! Intel Core i7 | iPhone 14Pro 256GB | iPad Pro 2017 64GB
-
atifarkas
tag
Graph Edit-ben osszeraktam egy tv nezo ''programot''. Ezt hogy tudnam Visualbasic-ben osszehozni? Hogy ugy kapcsolodjanak ossze az eggyes reszek mint a graph editben. (egy ati theater 550pro tv kartya) koszi elore is a valaszt
-
atifarkas
tag
Senki nem tud segiteni????
-
Surda
tag
Sziasztok. Egy egyszerű kérdésem van. Excelben hogy tudom azt megcsinálni, hogy egy munkafüzet megnyitásakor automatikusan elinduljon egy Form? Így próbáltam:
Sub auto_open()
Run UserForm1
End Sub
...de azt írja:
Run-time error '450': Wrong number of arguments or invalid property assignment.A garancia meg... ha a címke meg...
-
corlagon
senior tag
Sracok, egyszeru kerdesem lenne, marmint VB profiknak lesz egyszeru:
Excel makro a tema, ami Pivot table-t gyart egy sheetbol.
Itt a lenyeg:
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
''xxx!R1C1:R100C85'').CreatePivotTable TableDestination:='''', TableName:= _
''PivotTable1''ActiveSheet.PivotTableWizard TableDestination:=ActiveSheet.Cells(3, 1)
A SourceData-ba valtozot kene bevinnem a RC-fele direkt hivatkozas helyett, de hogyan? Range vagy Variant tipusu definialt valtozot (meg ha a range-t jol is tartalmazza), nem fogad el.
[Szerkesztve] -
Apollo17hu
őstag
Hali!
Írtam Excel-ben egy makrót. Meg lehet azt oldani, hogy VB-ben írok egy olyan programot, aminek egy CommandButton-jéra rákattintva megjelenik egy megnyitás ablak, és az abban kijelölt (xls-)fájl megnyílik? (Megnyitás ablakot és kijelölést könyv segítségével sikerült megcsinálnom, de magát, a fájl megnyitását nem.) Ezután a makró futtatását egy másik CommandButton-nel el lehet indítani? Ha igen, hogyan? -
lapa
veterán
válasz Apollo17hu #248 üzenetére
OpenDialog_Filter = ''Szöveges fájlok (*.txt), *.txt''
OpenDialog_Caption = ''Válassza ki a feldolgozni kívánt fájlt''
OpenDialog_SelectedFile = _
Application.GetOpenFilename(OpenDialog_Filter, , OpenDialog_Caption)
...
Workbooks.OpenText Filename:=OpenDialog_SelectedFile
ez mondjuk txt-t nyit. vagy valami másra gondoltál?
Új hozzászólás Aktív témák
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Promenade Publishing House Kft.
Város: Budapest