重庆分公司,新征程启航

为企业提供网站建设、域名注册、服务器等服务

vb点虐 异或计算器 在线计算异或

怎样在VB .NET中调用记事本和计算器

这个啊,呵呵,应该不难吧

创新互联公司是一家集网站建设,清河门企业网站建设,清河门品牌网站建设,网站定制,清河门网站建设报价,网络营销,网络优化,清河门网站推广为一体的创新建站企业,帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿,时刻以成就客户成长自我,坚持不断学习、思考、沉淀、净化自己,让我们为更多的企业打造出实用型网站。

先找到你要打开的应用程序的文件

然后用一个调用代码:

System.Diagnostics.Process.Start("C:\WINDOWS\system32\notepad.exe")

这是要开记事本的

System.Diagnostics.Process.Start("C:\WINDOWS\system32\calc.exe")

这是打开计算器的

应该也可以把这两个应用程序复制到你的程序的默认目录下,就是BIN下吧!

呵呵,试试!!要给我加分哦!!!

vb点虐 中的xor怎么用?

xor表示双重作用,

textstyle = textstyle Xor FontStyle.Italic

就是说,在原来的基础上实现双重功能结合,比如你原来的字体是 加粗的,在运行这句语句后,就实验了加粗和倾斜的功能了,如果不用xor,实现就很麻烦了

vb二进制异或

因为VB本身是不存在“二进制数”这么一种数据类型的,你如果直接算 1000001 XOR 01111111,VB会把1000001和01111111按10进制数来看待的,所以结果是2078214!

你应该先把1000001和01111111都转化为10进制数,再来XOR!

补充一下:

VB中16进制数和8进制数有特殊的表示方法,比如:

x = HABCD   '这是16进制

x = O3456    '这是8进制,注意后面的是字母O!

但是,变量x中存储的是经过VB转化后的10进制数,因为VB并没有“16进制数”、“8进制数”这样的数据类型,凡是数值类型(Integer、Long、Double、Single等等)全部是10进制的!

而二进制数则连这样的特殊表示方法也没有,

x = 1000

你说这个1000是二进制还是10进制?总不能说由0和1组成的就是二进制吧?要是你老板要发1000元工资给你,却说这是个二进制数,那么你就只能得到8元钱了!

根据你对题目的补充作出的补充回答:

我不知道是哪个脑残的老师出的题目,两个数进行异或运算,运算结果与这两个数的进制是没有半毛钱关系的,比如:

10进制:20 Xor 30 = 10

16进制:H14 Xor H1E = H0A = 10进制的10

看见没有,结果不是都是10吗?所以你说的“必须用二进制进行异或运算”是错误的,除非是你的脑残老师一定要你们这么做。

所以这条题目最简单的解决办法就是把秘钥01111111转为10进制数(即127),然后用它与大写字母的ASCII码进行异或运算,最后把运算结果再转为字符即可。下面是个例子:

s = "ABCDEFGHIJKLM"

Print "加密前的字符串:"; s

t = ""

For i = 1 To Len(s)

t = t  Chr(Asc(Mid(s, i, 1)) Xor 127)

Next

Print "加密后的字符串:"; t

如果非得按题目要求转为二进制数再来异或,那就复杂10倍也不止了。首先,要把加密前的字符串逐个取出来,转为ASCII码,再转为二进制数(注意,二进制数要放在一个字符串变量中,因为我前面已经说了,VB中没有专门的二进制数类型的,所以如果放在数值变量中,VB会按10进制数来看待的),然后逐位与01111111进行异或运算(就是依次从上述储存二进制数的字符串变量中取出每一位数与01111111对应的位进行异或运算,如果相同就是0,不同就是1),比如:

01000001

01111111

-------------

00111110

把得出的运算结果再转为10进制数(上面例子中就是62),然后通过这个数再得出加密后的字符。你会发现,经过这么复杂运算得到的字符,跟我上面的代码运算的结果其实是一样的!

有关vb点虐 制作计算器的问题

判断吧,如果点击+按钮,则一个全局变量为1,-按钮,则全局变量为2.以此类推,然后if或case判断哪个数,如果为1,就两个数相加。


网站标题:vb点虐 异或计算器 在线计算异或
当前网址:http://cqcxhl.cn/article/ddiphjj.html

其他资讯

在线咨询
服务热线
服务热线:028-86922220
TOP