windows之家1.关于MicrosoftVisualBasic6.0（企业版）的问
窗体需要1个command控件，不要忘记哦！！！！！ private sub command1_click() for a=3 to 30 '列举所有满足条件的1到50的数，去掉不可能的数，减少运行 for b=4 to 50 for c=5 to 50 if a+bc or a>b then goto 1 '判断能否满足三角形，并且去掉重复 if c^2=a^2+b^2 then print a; b; c 'RT三角形的条件 1 next c next b next a end sub 或 Private Sub command1_click() Dim a As Single, b As Single, c As Single For a = 3 To 30'列举所有满足条件1到50的数，去掉不可能的数，减少运行 For b = 4 To 50 For c = 5 To 50 If a + b > c And Abs(a - b)。
2.如何在win10安装vb6.0
WIN10好像不兼容某些32位数据处理模式，把VB6.0中的这些内容去掉就能安装了。
以《Visual Basic 6.0企业版》为例：
安装前右键点 SETUP.EXE文件，设置兼容性，选择WIN XP2。然后以管理员身份运行SETUP.EXE。
前面都正常做安装准备，到安装时选择“自定义安装”，点“数据访问”→“更改选项”，把（好像是第一行的）DAO和RDS前面的勾“√”去掉，继续安装。
安装完成重启后如果需要安装MSDN就勾选上一起安装，否则将来再另行安装的可能不好用。
网上也有一些其他的安装方法介绍，但是有一些是没有安装完成的，虽然能打开界面，但是不能正常使用。前面介绍的方法比较可靠好用。除了不能用DAO等访问数据之外没有什么问题，好在VB访问数据的方法很多，不一定非要用DAO。
3.电脑windows10能否使用vb6.0中文企业版
首先，在安装完成vb6.0的情况下，在桌面快捷方式单击右键，选择属性
选择兼容性选项卡
并将兼容模式中“以兼容模式运行这个程序”与设置中的 “禁用桌面元素” 前的方框勾选，，单击确定
安装步骤：
1. 去万能的百度下载VB6.0企业版安装包
2. 下载完成后打开安装包，右击”SETUP“选择属性。
3. 单击“兼容性”，勾选“以兼容模式运行这个程序”，选择下拉菜单的“XP”。
4. 再右击刚刚的“SETUP”，选择“以管理员身份运行”。
5. 然后正常安装就可以了。
6. 需要填序列号时，序列号填满“1”，就可以安装上去了。
转载请注明出处windows之家 » win10安装vb6.0企业版