怎么把题目的数学式子改成vb表达式?
解决方案 »
- 冰天雪地寒风刺骨等待解决办法,VB6.0用组件连接点崩溃问题
- VB如何判断判断菜单控件是否是菜单数组
- 帮忙!看一下这是为什么?
- 我现在需要做一个VB+SQL2000的处理二项分布统计的模块.遇到几个问题.
- 如何用vba代码在office文档中加水印?
- 如何读取指定目录下所有文件名(包括子目录内文件名)?并存放在某一数组变量中。。。。
- 开发批注时候遇到的问题,希望联合解决
- 用VB实现打印
- VB怎样把很多图片放在一起,然后在程序中直接使用名字就可以访问,不使用数据库
- 如何锁定msflexgrid的一列啊,即单击时此列的所有单元格不接受焦点
- IF OR 混用的问题
- 反病毒工具之病毒诊断程序(更新版增加智能行为分析功能)
x=-1
y=1
??x+y=0
x*y=-1
x/y=-1
X^y=-1 表示X的Y次方X^2+Y^2=Z^2X=3
Y=4
Z=(X^2+Y^2)^1/2=5
y<0 ?
x*y<0 ?
x>0 ?
y <0 ?
x*y <0 ?
我刚开始也这么想 但是觉得不大对 是不是这个书有点问题?
Option Explicit
Dim X As Double
Dim Y As Double
Private Sub Command1_Click()
X = -1
Y = 1
If X + Y < Abs(X) + Abs(Y) And (X > 0 Or Y > 0) Then
MsgBox "X与Y一定一个是正,一个是负"
End If
End Sub
楼主有没有考虑0呢???<0 * 0 = 0
>0 * 0 = 0
0 * 0 = 00 算正还是负???