导航:首页 > 编程知识 > 如何用vb编程制作街霸

如何用vb编程制作街霸

发布时间:2023-09-04 18:32:20

Ⅰ 我是VB初学者,但是现在有个程序需要用MICROSOFT VISUAL BASIC 2010软件编程。 紧急求教该怎么编谢谢

首先我们观察一下这个变换规则。二进制0000就是十进制0,二进制0001就是十进制1,二进制0010就是十进制2……总之,把字符串的前半段和后半段各看为一个2进制数,则每经过一次迭代,这两个数分别加1。迭代三次,加三次1就可以了。但1111接下来是0000,也就是说这两个二进制数不能大于15。如出现大于十五的情况应减十五。
先来一个Textbox(假定为Textbox1)和一个Button(假定为Button1),定义如下五个变量:a,b,i,j为整数,Tempstr为字符串。然后双击按钮,在按钮中的Click事件下写如下代码
1.读取字符串
a=0
b=0
For i = 1 To 4
a = a * 2 + Val(GetChar(Textbox1.Text, i))
Next
For i = 5 To 8
b = b * 2 + Val(GetChar(Textbox1.Text, i))
Next
2.处理
tempstr=""
For j=1 To 3
tempstr=tempstr+" 迭代"+str(j)+"次:"
a=a+1
b=b+1
if a>15 then a=a-15
if b>15 then b=b-15
For i = 1 To 4
Tempstr = Str(b Mod 2) + Tempstr
b = b \ 2
Next
For i = 1 To 4
Tempstr = Str(a Mod 2) + Tempstr
a = a \ 2
Next
Next
textbox1.text=tempstr

阅读全文

与如何用vb编程制作街霸相关的资料

热点内容
cocos2d数据库操作 浏览:152
音小符app怎么样 浏览:606
数据包括哪些观测 浏览:726
u盘中毒文件夹 浏览:86
电机自动加速程序 浏览:442
xpsp3oem免激活工具 浏览:779
照片数据恢复精灵在哪里 浏览:272
win7zip文件怎么打开 浏览:761
插在车里的u盘可以装文件吗 浏览:651
jspsession用法 浏览:383
java查看jvm快照 浏览:581
新文件夹1 浏览:412
眉山微网站报价多少 浏览:138
数据库开发待遇什么样 浏览:721
cad文件打开工具栏图标太大怎么调整 浏览:52
苹果安坤杀了小妹吗 浏览:528
照片文件怎样长久存放 浏览:816
g76没退刀槽怎么编程 浏览:749
5位qq贴吧 浏览:470
appinventor求时长 浏览:473

友情链接