马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
是不是实质都是API?有的好像不只是API那么简单的,有的也是一种框架就像MFC一样。有的还是一种思想(就是做软件的思想)(好像很深奥,其实我也不懂^_^)asp.net之前找了一C#的Ca⒖,但有一句用VB.NETs找不出怎,乃至好L一段rg我的Ca都是重的,明天在小W友的耐烦指c下,用DimaaAsInteger=CType(DateTime.Now.TicksModSystem.Int32.MaxValue,Integer)作了Random的N子,可是O中嗲r下绦胁耪,若]O中t霈FSystem.StackOverflowException的未砝rl生於mscorlib.dll的e`
於是修改代a以下,算跑出本人尚算M意的Y果
DimallCharAsString="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,0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,W,X,Y,Z"
DimallCharArray()AsString=allChar.Split(",")
DimrandomCodeAsString=""
DimtempAsInteger=-1
DimrandAsRandom=NewRandom
DimiAsInteger=0
DoWhile(i<codeCount)
If(temp-1)Then
rand=NewRandom(i*temp)若]有上面H@Yr常重的
DimaaAsInteger=CType(DateTime.Now.TicksModSystem.Int32.MaxValue,Integer)用VB.NET法,往失落了cI和TEMP的相乘
rand=NewRandom(aa)
EndIf
DimtAsInteger=rand.Next(61)+1+1是改,61暗示字符的,索引值0_始
Ift>allCharArray.Length-1Thent=allCharArray.Length-1改
Iftemp=tThen遏止Ca的Bm重
Returncreaterandomcode(codecount)出Fmscorlib.dll的逝世胡同
i-=1改
randomCode=Microsoft.VisualBasic.Left(randomCode,i)改
EndIf
temp=t
randomCode=randomCode+allCharArray(t)
i+=1
Loop
ReturnrandomCode
M信t不如o,@是我最想f的一句,不要信l束`了本人的头脑喔^__^
归根到底,Java跨平台可以,但是要重新编写代码,否则还分什么J2EE/J2SE/J2ME呢! |