Hirdetés

2024. április 25., csütörtök

Gyorskeresés

Útvonal

Fórumok  »  Szoftverfejlesztés  »  Visual Basic

Hozzászólások

(#151) F-ECT$


F-ECT$
titán

Bővebben: link

Ezt szeretném végigcsinálni, és ehhez az kellene, hogy a projekthez hozzáadjak egy dll-t. Ezt hogy kell?

Dive ever, work never.

(#152) F-ECT$


F-ECT$
titán

UP :U

Dive ever, work never.

(#153) Zol33 válasza F-ECT$ (#151) üzenetére


Zol33
tag

A References menüpontban kijelölöd a használni kívánt .dll-t

(#154) F-ECT$ válasza Zol33 (#153) üzenetére


F-ECT$
titán

Kösz.

Szintén innen a kérdés: Bővebben: link

Az 1. kódrész mgnyit egy ReqPro projektet, a 3. pedig listáz belőle. Kérdés, hogy ezt hova listázza ki?

Dive ever, work never.

(#155) anulu


anulu
félisten

hamár ilyen szépen összejöttünk...

VB .net alatt van egy ilyen bajom, hogy ki akarok csomagolni egy file-t adott helyre, és utána ezt el akarom indítani.

kicsomagot megoldja, de utána elszáll, mondván, hogy a file nem létezik. a kicsomag és a program indítás is shell('...',...)-el megy.

arra rájöttem, h még azelőtt akarja elindítani a progit, mielőtt az a kicsomaggal végezne. hogy lehet megoldani, hogy az indító shell várja meg, hogy a kicsomagolt file megjelenjen??

konkrétan:
''Private Sub Button4_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Shell(''rar e putty.rar'', AppWinStyle.Hide)
Shell(''putty.exe'', AppWinStyle.NormalFocus)
End Sub''


a putty helyére más fog kerülni, meg máshogy is lesz paraméterezve, most a fentebb leírtak a nagy bajom :O hogy kéne a 2 shell-t átalakítanom? :F

"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

(#156) Zol33 válasza F-ECT$ (#154) üzenetére


Zol33
tag

A debug window-ba listaz.

(#157) F-ECT$ válasza Zol33 (#156) üzenetére


F-ECT$
titán

''Debug.Print a_oReq.Tag & '' '' & a_oReq.Text'' - hogy ki nem szúrta a szemem.

''User defined type not defined'' hibát dob :O
Nagyjából tudom, hogy mi a kínja, csak még nem tudom, hogy hogy kell kijvítani :U

Azt nem értem, hogy miért közölnek olyan kódrészletet ami nem működik. (Vagy csak én vagyok béna :F )

Dive ever, work never.

(#158) JaneDoe


JaneDoe
csendes tag

Helló, egy primitív problémám lenne, de nincs hozzá szaktudásom. Ha valaki tudna segíteni végtelenül hálás lennék.

A problémám, hogy számtalan e-mailt meg kellene változtatnom, úgy, hogy az e-mail subjectje úgy nézzen ki, hogy az üzenet küldési időpontjával (hónap nap év időpont) kezdődjön majd jöjjön egy szóköz és utána az üzenet eredeti subjectje.

Sejtem, hogy ez macro-ban nem lehet túl bonyolult, de alaptudásom sincs hozzá.

Bármi megoldás érdekel, akár egyetlen e-mailre vonatkozó megoldás is érdekel (gombhoz hozzárendelni tudom, szal majd minden e-mailben megnyomom a gonbot). Vagy ha egy folder minden e-mailjét így megváltoztatja az is jó, mert akkor átnyomom az érintett e-maileket egy külön folderbe...

Szal szinte bármi érdekel.

Előre is köszönöm,

JD

(#159) F-ECT$


F-ECT$
titán

A Debug windowt hogy lehet megnyitni?

[Szerkesztve]

Dive ever, work never.

(#160) F-ECT$ válasza F-ECT$ (#159) üzenetére


F-ECT$
titán

Na megvan, de 3 is van belőle:
Local, Immediate és Watch.
Ezek miben különböznek?

Dive ever, work never.

(#161) F-ECT$ válasza F-ECT$ (#160) üzenetére


F-ECT$
titán

Na már ezt is tudom, a kérdés, hogy a Debug.Print az hova ír, vagy hogy van-e más mód/hely ahova ki lehet íratni 1-2 dolgot. (Váltzozók értéke pl.)

Dive ever, work never.

(#162) F-ECT$


F-ECT$
titán

Amikor a View/Code részen vagy, akkor ki lehet választani egy ilyet is, hogy ''(General)''. Az oda írt kód mikor hajtódik végre?

Dive ever, work never.

(#163) F-ECT$ válasza F-ECT$ (#161) üzenetére


F-ECT$
titán

Közben válaszolgatok magamnak :P
Nyitottam egy textboxot és oda írogatok :)

[Szerkesztve]

Dive ever, work never.

(#164) heihachi válasza F-ECT$ (#163) üzenetére


heihachi
addikt

elvagy :)

"Lehet a Shift 2 már realisztikusabb mint a valóság" by NOD

(#165) F-ECT$ válasza heihachi (#164) üzenetére


F-ECT$
titán

Ja :)


Textboxban lehet olyat hogy ne törölje a benne lévő szöveget új beírásakor, hanem hozzáírja?

''Trükkös'' megoldásom már van:
-Kiveszem ami benne van.
- ''+''-szal hozzáfűzök.
-Visszaírom.

[Szerkesztve]

Dive ever, work never.

(#166) BatemanX válasza F-ECT$ (#165) üzenetére


BatemanX
tag

Szerintem a Help, Google, Fórum sorrendet betartva gyorsíthatod az ügyvitelt. :D

''Budapest, hajnali fél három, gyenge szél, 14 fok. A hajam tökéletes, de azon a rohadt tesztszerveren még mindig 1000-es várakozási sor van...'' -F-ECT$ a WoW tesztszerverről.

(#167) F-ECT$ válasza BatemanX (#166) üzenetére


F-ECT$
titán

Találj rá erre a fórumra is :DDD
Egyébként mint látszik általában magamnak válaszolok, szóval megy a keresés is :)

Dive ever, work never.

(#168) JaneDoe válasza JaneDoe (#158) üzenetére


JaneDoe
csendes tag

Felhozom, hátha valaki megszán.

(#169) F-ECT$ válasza JaneDoe (#168) üzenetére


F-ECT$
titán

Szívesen segítenék, de én is csak most ismerkedek a VB-vel...

Dive ever, work never.

(#170) sonar válasza sonar (#150) üzenetére


sonar
addikt

Külső program hívás pl
Shell ''c:\windows\notepad.exe''

A tudást mástól kapjuk, a siker a mi tehetségünk - Remember: Your life – Your choices!

(#171) ollie válasza F-ECT$ (#165) üzenetére


ollie
MODERÁTOR

így nem jó?

textbox.value = textbox.value & ''amit hozzáadsz''

***

(#172) F-ECT$ válasza ollie (#171) üzenetére


F-ECT$
titán

Ez lett:


Kovetelmeny1 = a_oReq.Tag & '' '' & a_oReq.Text
txtBox.Text = txtBox.Text & vbCrLf & Kovetelmeny1


Most jön majd az adatbázisba helyezés, ami vagy MS-Access vagy MS SQL server lesz :)

Dive ever, work never.

(#173) [HUN]Zolee


[HUN]Zolee
senior tag

Lehet hogy láma kérdés, de még csak most kezdem a vb-t.

Hogy lehet egy szöveges változóból a karaktereket kitörölni egyesével hátulról?

pl.: asdf => asd => as

''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/

(#174) Victorius


Victorius
tag

Left(füzér, hossz).

Tehát pl.
sA=''Helló világ!''
sB=Left(sA, 5)

sB ez lesz: ''Helló''

A párja a right, az univerzális megoldás pedig a mid, amiel akár középről is kiemelhetsz részeket. A formátuma MID(füzér, kezdet, vég). A vég megadása nem kötelező, ilyenkor a füzér végéig megy.

(#175) F-ECT$ válasza Victorius (#174) üzenetére


F-ECT$
titán

Ehhez még ismerni kell a sztring hosszát, szóval azt először érdemes megszámoltatni, és egy intbe elrakni. (Gondolom van vmilyen length függvény.)

Dive ever, work never.

(#176) csiga997 válasza [HUN]Zolee (#173) üzenetére


csiga997
őstag

b$=left$(a$,len(a$)-1)

(#177) [HUN]Zolee válasza csiga997 (#176) üzenetére


[HUN]Zolee
senior tag

köce így műxik, csak nem tom mi az a sok $ jel a kódodban?

''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/

(#178) F-ECT$ válasza [HUN]Zolee (#177) üzenetére


F-ECT$
titán

Lehet, hogy hülyeség, de szvsz $=sztring.

Dive ever, work never.

(#179) F-ECT$


F-ECT$
titán

Találtam egy jó kis kezdőknek szóló oldalt: Bővebben: link

Dive ever, work never.

(#180) [HUN]Zolee válasza F-ECT$ (#178) üzenetére


[HUN]Zolee
senior tag

az lehet :) erre nem gondoltam :)

''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/

(#181) [HUN]Zolee


[HUN]Zolee
senior tag

Beírtam ezt a kódot és a helyett hogy elvenné az első betűt, az egész szöveget törli :(

txtkijelzo = Right(txtkijelto, Len(txtkijelzo) - 1)



itt a teljtes program :
Bővebben:� link

''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/

(#182) F-ECT$ válasza [HUN]Zolee (#181) üzenetére


F-ECT$
titán

Hülyeség, de így próbáltad már:

txt = Right ( txt , 1)

?

Dive ever, work never.

(#183) [HUN]Zolee válasza F-ECT$ (#182) üzenetére


[HUN]Zolee
senior tag

Igen, és akkor is ugyan azt csinálja :(

''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/

(#184) [HUN]Zolee


[HUN]Zolee
senior tag

még mindig enm jó a számológépem előjel megváltoztatója :(

''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/

(#185) F-ECT$ válasza [HUN]Zolee (#184) üzenetére


F-ECT$
titán

A left működik (#180), a right meg nem :F

Dive ever, work never.

(#186) csiga997 válasza [HUN]Zolee (#181) üzenetére


csiga997
őstag

az nem lehet probléma, hogy egyszer kijelzőt egyszer meg kijeltőt írsz...?
:U

(#187) F-ECT$ válasza csiga997 (#186) üzenetére


F-ECT$
titán

Szerintem az lesz az :DDD
A szokásos f@sz hiba, és ez itt még ki se bukik mert lazán ''lefordul'' :)

Dive ever, work never.

(#188) ollie válasza [HUN]Zolee (#181) üzenetére


ollie
MODERÁTOR

Eh, már látom a hibát én is. :D

[Szerkesztve]

***

(#189) csiga997 válasza F-ECT$ (#187) üzenetére


csiga997
őstag

Be kell állítani, hogy require variable declaration = yes és akkor egyből kibukik az ilyen...

(#190) [HUN]Zolee válasza csiga997 (#189) üzenetére


[HUN]Zolee
senior tag

Uhh köcce. Ezt nem vettem észre. Majd máskor jobban figyelek.

''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/

(#191) F-ECT$


F-ECT$
titán

Na azt már tudom, hogy ha van egy ms-access táblám, akkor abban hogy kell törölni/updatelni, stb, viszont azt még nem hogy hogyan kell létrehozni ha még nincs. Erről van vhol vmi leírás?

Dive ever, work never.

(#192) _Gudella


_Gudella
senior tag

hogyan lehet visual basic-be assembly részeket írni?

(#193) Zol33 válasza _Gudella (#192) üzenetére


Zol33
tag

Itt találsz hozzá egy tutorialt: Bővebben: link

(#194) _Gudella válasza Zol33 (#193) üzenetére


_Gudella
senior tag

köszönöm

szóval nincs olyan egyszerű megoldás, mint pascal-ban az asm-end közé beírni?

(#195) Zol33 válasza _Gudella (#194) üzenetére


Zol33
tag

Sajnos nincs :(

(#196) lapa válasza F-ECT$ (#187) üzenetére


lapa
veterán

ja. vba-ban (is) célszerű minden makrónál az ''option explicit'' az első sorban, akkor ráddobja egyből.

(#197) [HUN]Zolee


[HUN]Zolee
senior tag

A progi belemegy egy végtelen ciklusba, de nemtudom mért? Bővebben: link itt a teljes pogram.

Option Explicit
Dim s(15), i, j, cap As Integer

Private Sub Command3_Click()
For i = 0 To 15
s(i) = 0
Next
i = 0
j = 0
For j = 1 To 15

Me.Print j, cap
'cikl:
Randomize
s(1) = j
cap = (Rnd * 14) + 1
For i = 1 To 15
'Me.Print i, cap
If s(i) = cap Then
'GoTo cikl
s(j) = 0
Else
s(j) = cap
End If
Next
Next
For i = 1 To 15

Command1(i - 1).Caption = s(i)
Next
End Sub

''<[HUN]DrH>valaki mondjon egy tuningolos programot a mivel kocsis képeket tudok tuningoloni.'' https://ferromag.aranyoldalak.hu/

(#198) Aaalbi


Aaalbi
tag

Hi

Van nekem 1 Visual studio 2003.NET-em.
És a Visual Basic-ben ha SmartDeviceApplication-t akarok
írni. És szeretnék hasznmáln adatbázist , de a toolboxban csomó
contolom nem aktív csak szürkében látszanak az ikonjai.
Ez miért van? :F
Erre szeretnék 1 választ.
Köszönöm előre is.

Üdv

(#199) ollie válasza Aaalbi (#198) üzenetére


ollie
MODERÁTOR

Nem kéne feltenni SQL szervert?

***

(#200) Aaalbi válasza ollie (#199) üzenetére


Aaalbi
tag

hi

nem tom , lehet.

Más:
Már be tudok állítani adatbázis kapcsolatot.
Van a Tools menüben 1 Connect to Database nevezetű elem.
Ez mind nagyon szép.
Ezután megnyitom a dolgokat szépen.

adb.Open()
de ezután hogy hivatkozok a mezőkre :F
már mindent próbáltam

Itt egy textboxból akarok beleírni az adbbe az elhagyás eseményére

Dim adbconn As SqlClient.SqlConnection

Private Sub TextBox1_Leave(ByVal sender As Object, ByVal e As
System.EventArgs) Handles TextBox1.Leave
adbconn.Open()
adbconn.State.GetValues(''nev'') = TextBox1.Text
End Sub
End Class


Előre is köszönöm a segítséget.

Üdv

Útvonal

Fórumok  »  Szoftverfejlesztés  »  Visual Basic
Copyright © 2000-2024 PROHARDVER Informatikai Kft.