vb6.0的速度来
'加密函数
Private Function JiaMi(ByVal varPass As String) As String '参数varPass是需要加密的文本内容
Dim varJiaMi As String * 20
Dim varTmp As Double
Dim strJiaMi As String
Dim I
For I = 1 To Len(varPass)
varTmp = AscW(Mid$(varPass, I, 1))
varJiaMi = Str$(((((varTmp * 1.5) / 5.6) * 2.7) * I))
strJiaMi = strJiaMi & varJiaMi
Next I
JiaMi = strJiaMi
End Function
'解密函数
Private Function JieMi(ByVal varPass As String) As String '参数varPass是需要解密的密文内容
Dim varReturn As String * 20
Dim varConvert As Double
Dim varFinalPass As String
Dim varKey As Integer
Dim varPasslenth As Long
varPasslenth = Len(varPass)
For I = 1 To varPasslenth / 20
varReturn = Mid(varPass, (I - 1) * 20 + 1, 20)
varConvert = Val(Trim(varReturn))
varConvert = ((((varConvert / 1.5) * 5.6) / 2.7) / I)
varFinalPass = varFinalPass & ChrW(Val(varConvert))
Next I
JieMi = varFinalPass
End Function
n x (n-30) =m
m+900=(n+30)^2
这两式不等
哦
VB6编程基本考题，在线等，速度来啊~
没看出什么错误
只是没见过 Print a(i); " "; 这个连接符号用分号的写法,C语言和Java才用分号
正常应该是
print a(i) & " "
Print "s=" & s
------------------------------------------------------
我才不管你什么肥波拉且数列呢，如果s=0，相乘最终得到结果当然是0，这并不违反程序逻辑，不能说错误
webbrowser控件的内核用的就是IE，所以其加载页面的速度与IE是完全相同的，安全机制也是完全一样的。
因此如果你必须依赖于Webbrowser控件的话，加载页面的速度只能与IE一样。但是加载页面速度还与其它因素有关，比如你是否被恶意软件、木马、病毒所感染？启动项程序里是否有驻留在内存同时还消耗网络及CPU的程序？又或者是否被ARP网络病毒攻击了？或者共享带宽被其它程序或者其他人下载软件占用了？
以上我所提及的这些因素都会造成网页浏览缓慢，而不一定是ie或者webbrowser的问题。可以装个安全卫士360好好查一下电脑。
如果不是上述原因，若只是想获取网页内特定数据的话，还可以用inet控件，它只传输网页代码而不执行和显示内容所以速度要快很多；你可以用它保存网页到文件后再用webbrowser从本地显示。
提供你个思路 :)
我家网是2M的,显示的网速总是6.0Mbps,看视频都不行,应该多少啊,都说应...
答：这个带宽其实并不是你上网的真实速率。真实速率就是你和宽带网路运营商协议达成的速率，2M，这个速度是计费服务器来限速的。也就是说，即使你的物理带宽达到6M，但是由于服务器的限速，理论最高峰值网速仅为2M，而且，一般情况下，只能达到200K左右。至于看视频不行，建议更新FLASH播放器或者下载飞速土豆...
UG 6.0有关画不规则图形问题,如图所示,高手速度来围观!
答：1,这是个对称件，只要做一半就好，然后镜像 2，先画一个平面a，再偏置一个b，在a上画一条线，可以用两点画线，然后用此线拉伸出一个面，再拉伸的时候，可以选择拔模角度，或者拉伸完了再使用拔模命令。3，图中的那个鼓起的部位，可以在拉伸出来的面上画一条线，用此线做一个BOS, 然后抽取BOS...
在b点的速度大小等于在abc段的平均速度大小
答：设初速度为v1,B点速度为v2,C点速度为v3.匀加速,有（v1+v2）/2=3.0;(v2+v3)=6.0;xAB=xBC有[（v2-v1）/a]*3.0=[(v3-v2)/a]*6.0;因为是匀加速运动,a可以消掉得到（v2-v1）*3=（v3-v2）*6联立三个式子即可
VB6.0关于16进制的转换问题
答：Private Sub Text1_Change()a = Split(Text1.Text, " ")For i = 0 To UBound(a)s = s & Chr(Val("&h" & a(i))) & " "NextText2.Text = sEnd Sub
vb6.0中怎么使用MSCOMM
答：①字符形式：通常以小于ASCII码128的字符码来传递，通常用于传送指令。②二进制形式：将数据以二进制编码的方式传递，它可能含有ASCII码128以上的字符码，通常用来传送数据，以提高速度。3．串行通信实例 下面给出在Win2000下利用VB6.0的MSComm控件开发计算机与一智能采集模块进行串行通信的程序实现。在工控...
(int) a+ b/ b=6.0,怎么运算来着?
答：(int)a+b/b=6.0。(int)a = 5；对于b/b，因为b是double类型，所以它们的商也是一个double类型，为2.5/2.5 = 1.0(注意要在小数位上加一个0)；最后计算5 + 1.0 = 6.0，因为5是int类型，而1.0是double类型，它们俩相加时，5将自动转换成double类型数据5.0，从而实际参加运算的是：5...
VB6.0的双进程
答：方案一：将功能合并为一个程序A，将拷贝任务做为一个程序B，程序A的拷贝模块修改为调用程序B的，程序B运行完成拷贝后自动结束退出。这样等于是将框架和具体功能模块划分清楚分工合作。方案二：按你的方式来做两个程序同时运行，但之间的数据检查任务不要由时钟控件扫描数据库来检查，采用socket或者内存通信...
...的高度h=0.80m.有一滑块从A点以的V=6.0m/s初速度在台面上做匀变速...
答：基本物理知识：摩擦力f=mg=ma 故a=g s=2.2m V-V=2as V==。。。第二问：木块飞出B后到落地共历时：H=t+at2 故t==。。。木块飞出B后C为落点，则在水平方向上：SBC=Vt=。。。V , SBC 为所求 （数据自己代入计算）...
...B两物块都以v=6m/s的速度在光滑的水平地面上运动
答：弹簧的弹力变化是需要时间的，在碰撞的瞬间，弹簧的弹力依旧为0.楼主可以对A运用动量定理，外力为零的时候其动量必然是不变的
...测的她在50m处的瞬时速度为6.0m/s,16s末到达终点的瞬时速度是6.5m/...
答：运动员的位移为100m，运动的时间为16s，则平均速度 . v = △x △t = 100 16 m/s=6.25m/s ．故B正确，A、C、D错误．故选B．
