帮忙做一个VB作业，留下邮箱，发给你大部分代码与VB设计要求（作业是拼图游戏下载），多少分都行，谢谢各位

来源：蜘蛛抓取(WebSpider) 时间：2012-05-18 04:01 标签： 拼图游戏下载
vb作业3_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
上传于|0|0|暂无简介
阅读已结束，如果下载本文需要使用1下载券
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，查找使用更方便
还剩8页未读，继续阅读
定制HR最喜欢的简历
你可能喜欢扫二维码下载作业帮
1.75亿学生的选择
下载作业帮安装包
扫二维码下载作业帮
1.75亿学生的选择
求vb大神帮忙做一道题.要求；只需要要程序写出来,界面的截图；超长正整数的加法,请设计一个算法完成两个超长正整数的加法.
扫二维码下载作业帮
1.75亿学生的选择
基本思路,是把数字作为字符串处理,然后运算的时候,先把它截取成长度一定的（比如4位）若干段,分段转换成数字求和（要考虑进位）,然后转换成字符,在连接起来输出：界面如下：代码如下：Option ExplicitPrivate Sub Command1_Click()Dim ssss As Stringssss = PPP(Text1.Text,Text2.Text)Text3.Text = ssssEnd Sub'自定义函数求两个长整数之和Private Function PPP(ByVal s1 As String,ByVal s2 As String) As StringDim dd1() As StringDim n1 As IntegerDim dd2() As StringDim n2 As IntegerDim s As StringDim i As IntegerDim d1 As IntegerDim d2 As IntegerDim t As IntegerDim j As IntegerDim JinWei As BooleanDim K As IntegerDim SS1 As StringDim SS2 As StringIf Len(s1) & Len(s2) Then& &SS1 = s1& &SS2 = s2Else& &SS1 = s2& &SS2 = s1End Ifn1 = 0s = SS1Do While Len(s) & 4& &n1 = n1 + 1& &ReDim Preserve dd1(1 To n1) As String& &dd1(n1) = Right(s,4)& &s = Left(s,Len(s) - 4)Loopn1 = n1 + 1ReDim Preserve dd1(1 To n1) As Stringdd1(n1) = sn2 = 0s = SS2Do While Len(s) & 4& &n2 = n2 + 1& &ReDim Preserve dd2(1 To n2) As String& &dd2(n2) = Right(s,4)& &s = Left(s,Len(s) - 4)Loopn2 = n2 + 1ReDim Preserve dd2(1 To n2) As Stringdd2(n2) = sJinWei = FalseK = 0For i = 1 To n1& &K = K + 1& &If K & n2 Then Exit For& &If Not JinWei Then& & & t = Val(dd1(i)) + Val(dd2(K))& &Else& & & t = Val(dd1(i)) + Val(dd2(K)) + 1& &End If& &If Len(CStr(t)) & 4 Then& & & JinWei = True& &Else& & & JinWei = False& &End If& &dd1(i) = Right(CStr(t),4)Next iIf JinWei Then& &For i = n2 + 1 To n1& & & If JinWei Then& & & & &t = Val(dd1(i)) + 1& & & Else& & & & &t = Val(dd1(i))& & & End If& & & If Len(CStr(t)) & 4 Then& & & & &JinWei = True& & & Else& & & & &JinWei = False& & & End If& & & dd1(i) = Right(CStr(t),4)& &Next iEnd IfPPP = ""For i = n1 To 1 Step -1& &PPP = PPP & dd1(i)Next iIf JinWei Then PPP = "1" & PPPEnd Function
为您推荐：
其他类似问题
扫描下载二维码VB上机作业5_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
VB上机作业5
上传于|0|0|文档简介
&&老师每次留的作业
阅读已结束，如果下载本文需要使用1下载券
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，查找使用更方便
还剩2页未读，继续阅读
定制HR最喜欢的简历
你可能喜欢

我要回帖

更多关于 拼图游戏下载 的文章

 

随机推荐