Springen naar inhoud


- - - - -
VS 2015

Van A Tot Zzzz...

VS2015

  • Log in a.u.b. om te beantwoorden
Er zijn 7 reacties in dit onderwerp

#1 Damic

Damic

    Master Developer

  • Leden
  • PipPipPipPipPip
  • 606 berichten
    Laatst bezocht 07 dec 2017 19:30
  • LocatieMechelen (BE)

Geplaatst op 16 juni 2017 - 22:55

Ik was wat aan't proberen om een textbox te vullen van a tot zzzzzzz..... nu was ik al lang aan't proberen en ik kom tot aaa>aZz en dan loopt het mis.
Code:
a b c d e f g h i j k l m n o p q r s t u v w x y z
aa ab ac ad ae af ag ah ai aj ak al am an ao ap aq ar as at au av aw ax ay az
ba bb bc bd be bf bg bh bi bj bk bl bm bn bo bp bq br bs bt bu bv bw bx by bz
ca cb cc cd ce cf cg ch ci cj ck cl cm cn co cp cq cr cs ct cu cv cw cx cy cz
da db dc dd de df dg dh di dj dk dl dm dn do dp dq dr ds dt du dv dw dx dy dz
ea eb ec ed ee ef eg eh ei ej ek el em en eo ep eq er es et eu ev ew ex ey ez
fa fb fc fd fe ff fg fh fi fj fk fl fm fn fo fp fq fr fs ft fu fv fw fx fy fz
ga gb gc gd ge gf gg gh gi gj gk gl gm gn go gp gq gr gs gt gu gv gw gx gy gz
ha hb hc hd he hf hg hh hi hj hk hl hm hn ho hp hq hr hs ht hu hv hw hx hy hz
ia ib ic id ie if ig ih ii ij ik il im in io ip iq ir is it iu iv iw ix iy iz
ja jb jc jd je jf jg jh ji jj jk jl jm jn jo jp jq jr js jt ju jv jw jx jy jz
ka kb kc kd ke kf kg kh ki kj kk kl km kn ko kp kq kr ks kt ku kv kw kx ky kz
la lb lc ld le lf lg lh li lj lk ll lm ln lo lp lq lr ls lt lu lv lw lx ly lz
ma mb mc md me mf mg mh mi mj mk ml mm mn mo mp mq mr ms mt mu mv mw mx my mz
na nb nc nd ne nf ng nh ni nj nk nl nm nn no np nq nr ns nt nu nv nw nx ny nz
oa ob oc od oe of og oh oi oj ok ol om on oo op oq or os ot ou ov ow ox oy oz
pa pb pc pd pe pf pg ph pi pj pk pl pm pn po pp pq pr ps pt pu pv pw px py pz
qa qb qc qd qe qf qg qh qi qj qk ql qm qn qo qp qq qr qs qt qu qv qw qx qy qz
ra rb rc rd re rf rg rh ri rj rk rl rm rn ro rp rq rr rs rt ru rv rw rx ry rz
sa sb sc sd se sf sg sh si sj sk sl sm sn so sp sq sr ss st su sv sw sx sy sz
ta tb tc td te tf tg th ti tj tk tl tm tn to tp tq tr ts tt tu tv tw tx ty tz
ua ub uc ud ue uf ug uh ui uj uk ul um un uo up uq ur us ut uu uv uw ux uy uz
va vb vc vd ve vf vg vh vi vj vk vl vm vn vo vp vq vr vs vt vu vv vw vx vy vz
wa wb wc wd we wf wg wh wi wj wk wl wm wn wo wp wq wr ws wt wu wv ww wx wy wz
xa xb xc xd xe xf xg xh xi xj xk xl xm xn xo xp xq xr xs xt xu xv xw xx xy xz
ya yb yc yd ye yf yg yh yi yj yk yl ym yn yo yp yq yr ys yt yu yv yw yx yy yz
za zb zc zd ze zf zg zh zi zj zk zl zm zn zo zp zq zr zs zt zu zv zw zx zy zz
aba abb abc abd abe abf abg abh abi abj abk abl abm abn abo abp abq abr abs abt abu abv abw abx aby abz
aca acb acc acd ace acf acg ach aci acj ack acl acm acn aco acp acq acr acs act acu acv acw acx acy acz
ada adb adc add ade adf adg adh adi adj adk adl adm adn ado adp adq adr ads adt adu adv adw adx ady adz
aea aeb aec aed aee aef aeg aeh aei aej aek ael aem aen aeo aep aeq aer aes aet aeu aev aew aex aey aez
afa afb afc afd afe aff afg afh afi afj afk afl afm afn afo afp afq afr afs aft afu afv afw afx afy afz
aga agb agc agd age agf agg agh agi agj agk agl agm agn ago agp agq agr ags agt agu agv agw agx agy agz
aha ahb ahc ahd ahe ahf ahg ahh ahi ahj ahk ahl ahm ahn aho ahp ahq ahr ahs aht ahu ahv ahw ahx ahy ahz
aia aib aic aid aie aif aig aih aii aij aik ail aim ain aio aip aiq air ais ait aiu aiv aiw aix aiy aiz
aja ajb ajc ajd aje ajf ajg ajh aji ajj ajk ajl ajm ajn ajo ajp ajq ajr ajs ajt aju ajv ajw ajx ajy ajz
aka akb akc akd ake akf akg akh aki akj akk akl akm akn ako akp akq akr aks akt aku akv akw akx aky akz
ala alb alc ald ale alf alg alh ali alj alk all alm aln alo alp alq alr als alt alu alv alw alx aly alz
ama amb amc amd ame amf amg amh ami amj amk aml amm amn amo amp amq amr ams amt amu amv amw amx amy amz
ana anb anc and ane anf ang anh ani anj ank anl anm ann ano anp anq anr ans ant anu anv anw anx any anz
aoa aob aoc aod aoe aof aog aoh aoi aoj aok aol aom aon aoo aop aoq aor aos aot aou aov aow aox aoy aoz
apa apb apc apd ape apf apg aph api apj apk apl apm apn apo app apq apr aps apt apu apv apw apx apy apz
aqa aqb aqc aqd aqe aqf aqg aqh aqi aqj aqk aql aqm aqn aqo aqp aqq aqr aqs aqt aqu aqv aqw aqx aqy aqz
ara arb arc ard are arf arg arh ari arj ark arl arm arn aro arp arq arr ars art aru arv arw arx ary arz
asa asb asc asd ase asf asg ash asi asj ask asl asm asn aso asp asq asr ass ast asu asv asw asx asy asz
ata atb atc atd ate atf atg ath ati atj atk atl atm atn ato atp atq atr ats att atu atv atw atx aty atz
aua aub auc aud aue auf aug auh aui auj auk aul aum aun auo aup auq aur aus aut auu auv auw aux auy auz
ava avb avc avd ave avf avg avh avi avj avk avl avm avn avo avp avq avr avs avt avu avv avw avx avy avz
awa awb awc awd awe awf awg awh awi awj awk awl awm awn awo awp awq awr aws awt awu awv aww awx awy awz
axa axb axc axd axe axf axg axh axi axj axk axl axm axn axo axp axq axr axs axt axu axv axw axx axy axz
aya ayb ayc ayd aye ayf ayg ayh ayi ayj ayk ayl aym ayn ayo ayp ayq ayr ays ayt ayu ayv ayw ayx ayy ayz
aza azb azc azd aze azf azg azh azi azj azk azl azm azn azo azp azq azr azs azt azu azv azw azx azy azz
abaa abab abac abad abae abaf abag abah abai abaj abak abal abam aban abao abap abaq abar abas abat abau abav abaw abax abay abaz
abba abbb abbc abbd abbe abbf abbg abbh abbi abbj abbk abbl abbm abbn abbo abbp abbq abbr abbs abbt abbu abbv abbw abbx abby abbz
abca abcb abcc abcd abce abcf abcg abch abci abcj abck abcl abcm abcn abco abcp abcq abcr abcs abct abcu abcv abcw abcx abcy abcz
abda abdb abdc abdd abde abdf abdg abdh abdi abdj abdk abdl abdm abdn abdo abdp abdq abdr abds abdt abdu abdv abdw abdx abdy abdz
abea abeb abec abed abee abef abeg abeh abei abej abek abel abem aben abeo abep abeq aber abes abet abeu abev abew abex abey abez
abfa abfb abfc abfd abfe abff abfg abfh abfi abfj abfk abfl abfm abfn abfo abfp abfq abfr abfs abft abfu abfv abfw abfx abfy abfz
abga abgb abgc abgd abge abgf abgg abgh abgi abgj abgk abgl abgm abgn abgo abgp abgq abgr abgs abgt abgu abgv abgw abgx abgy abgz
abha abhb abhc abhd abhe abhf abhg abhh abhi abhj abhk abhl abhm abhn abho abhp abhq abhr abhs abht abhu abhv abhw abhx abhy abhz
abia abib abic abid abie abif abig abih abii abij abik abil abim abin abio abip abiq abir abis abit abiu abiv abiw abix abiy abiz
abja abjb abjc abjd abje abjf abjg abjh abji abjj abjk abjl abjm abjn abjo abjp abjq abjr abjs abjt abju abjv abjw abjx abjy abjz
Mijn code, de fout zit wrs tussen lijn8 en 15
Visual Basic Code:
 Sub A2Z()
	 Dim sPre As String = ""
	 Dim runs As Integer = 0, mods As Integer = 0
	 While KeepRunning
		 If runs > 0 Then
			 If runs > 26 Then
				 mods = Math.Truncate(runs / 26)
				 For i = 1 To mods
					 sPre &= ChrW(96 + i)
				 Next
				 mods = runs - mods * 26
			 Else
				 mods = runs - 1
			 End If
			 sPre &= ChrW(97 + mods)
		 End If

		 For j = 97 To 122
			 Addtext(sPre & ChrW(j) & " ")
		 Next j
		 runs += 1
		 Addtext(Environment.NewLine)
		 sPre = ""
	 End While
	 Done()
End Sub

Na wat zoeken kwam ik een post tegen van RedThread: http://www.sitemaste...n_van_letters/2 maar het volledige project is niet meer beschikbaar :( en de code dat daar gepost is is maar een gedeelte van wat je eigenlijk moet hebben.

Ik heb de volledige code aan de ts gehangen :)

Bijgevoegde Bestanden



#2 RedThread

RedThread

    Beheerder VBIB

  • Beheerder
  • 3577 berichten
    Laatst bezocht 14 dec 2017 23:40
  • LocatieTongeren,Belgium.
Inzender

Geplaatst op 30 juni 2017 - 13:42

Zal kijken of ik dat nog ergens heb liggen ;-)

*** Vergeet ons geen bezoekje te brengen op facebook ***

 

- Any fool can know, the point is to understand -


RedThread@vbib.be

 

Huisregels | Tutorials | VS 2017 Community | Keybinding Posters | Code Tags gebruiken | MSDN


#3 Damic

Damic

    Master Developer

  • Leden
  • PipPipPipPipPip
  • 606 berichten
    Laatst bezocht 07 dec 2017 19:30
  • LocatieMechelen (BE)

Geplaatst op 30 juni 2017 - 17:50

Thanks mate

#4 Damic

Damic

    Master Developer

  • Leden
  • PipPipPipPipPip
  • 606 berichten
    Laatst bezocht 07 dec 2017 19:30
  • LocatieMechelen (BE)

Geplaatst op 21 juli 2017 - 18:46

Bericht bekijkenRedThread, op 30 juni 2017 - 13:42, zei:

Zal kijken of ik dat nog ergens heb liggen ;-)
File not found :( ?

#5 RedThread

RedThread

    Beheerder VBIB

  • Beheerder
  • 3577 berichten
    Laatst bezocht 14 dec 2017 23:40
  • LocatieTongeren,Belgium.
Inzender

Geplaatst op 22 juli 2017 - 00:50

nop, spijtig genoeg niet.. Sorry

*** Vergeet ons geen bezoekje te brengen op facebook ***

 

- Any fool can know, the point is to understand -


RedThread@vbib.be

 

Huisregels | Tutorials | VS 2017 Community | Keybinding Posters | Code Tags gebruiken | MSDN


#6 Damic

Damic

    Master Developer

  • Leden
  • PipPipPipPipPip
  • 606 berichten
    Laatst bezocht 07 dec 2017 19:30
  • LocatieMechelen (BE)

Geplaatst op 22 juli 2017 - 09:36

Ok np dan maar zo verder proberen :D

#7 Dirk Andries

Dirk Andries

    Master Developer

  • Leden
  • PipPipPipPipPip
  • 977 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 24 juli 2017 - 21:57

Mijn poging: demonstreert waar het fout loopt bij jou bij a tot zzzzzz (6).

Bijgevoegde Bestanden


Trust me, I have no idea what I'm talking about.

#8 Damic

Damic

    Master Developer

  • Leden
  • PipPipPipPipPip
  • 606 berichten
    Laatst bezocht 07 dec 2017 19:30
  • LocatieMechelen (BE)

Geplaatst op 27 juli 2017 - 21:36

:o dat is nice :woohoo:





Ook met taq VS 2015, VS2015 voorzien

0 gebruiker(s) lezen dit onderwerp

0 lid(leden), 0 bezoeker(s), 0 anonieme gebruikers

Inloggen


[VS 2015] Untitled 1

Met dank aan J├╝rgen voor de jarenlange inzet van visualbasic.be (anno dec 2000)
Met dank aan Mike en Ronneke voor de jarenlange inzet van vbib.be (anno dec 2010)
Met dank aan PascalBianca voor de jarenlange inzet van vbib.be (anno dec 2016)