vb编程象限判断!声明字符与声明的数据类型不符 帮我指出哪里不对啊Private Sub Command1_Click()x = InputBox("请输入x的值")y = InputBox("请输入y的值")If x = 0 ThenPrint "点(" & x & "," & y & ")" & "位于y轴上"Exit

来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/21 09:24:00
vb编程象限判断!声明字符与声明的数据类型不符帮我指出哪里不对啊PrivateSubCommand1_Click()x=InputBox("请输入x的值")y=InputBox("请输入y的值")If

vb编程象限判断!声明字符与声明的数据类型不符 帮我指出哪里不对啊Private Sub Command1_Click()x = InputBox("请输入x的值")y = InputBox("请输入y的值")If x = 0 ThenPrint "点(" & x & "," & y & ")" & "位于y轴上"Exit
vb编程象限判断!声明字符与声明的数据类型不符 帮我指出哪里不对啊
Private Sub Command1_Click()
x = InputBox("请输入x的值")
y = InputBox("请输入y的值")
If x = 0 Then
Print "点(" & x & "," & y & ")" & "位于y轴上"
Exit Sub
End If
If y = 0 Then
Print "点(" & x & "," & y & ")" & "位于x轴上"
Exit Sub
End If
If Sgn(x) = 1 And Sgn(y) = 1 Then
Print "点(" & x & "," & y & ")" & "位于第一象限"
Exit Sub
End If
If Sgn(x) = -1 And Sgn(y) = -1 Then
Print "点(" & x & "," & y & ")" & "位于第三象限"
Exit Sub
End If
If Sgn(x) = -1 And Sgn(y) = 1 Then
Print "点(" & x & "," & y & ")" & "位于第二象限"
Exit Sub
End If
If Sgn(x) = 1 And Sgn(y) = -1 Then
Print "点(" & x & "," & y & ")" & "位于第四象限"
Exit Sub
End If
End Sub

vb编程象限判断!声明字符与声明的数据类型不符 帮我指出哪里不对啊Private Sub Command1_Click()x = InputBox("请输入x的值")y = InputBox("请输入y的值")If x = 0 ThenPrint "点(" & x & "," & y & ")" & "位于y轴上"Exit
感觉对了啊

试验了没错,输入什么时出错了

vb编程象限判断!声明字符与声明的数据类型不符 帮我指出哪里不对啊Private Sub Command1_Click()x = InputBox(请输入x的值)y = InputBox(请输入y的值)If x = 0 ThenPrint 点( & x & , & y & ) & 位于y轴上Exit java中声明三角形类,继承图像类,计算三角形的周长和面积,如何编程 函数声明与函数定义的区别 c语言的定义与声明是什么 声明的近义词是什么 声明一个Cat类,拥有静态数据成员HowManyCats.声明一个Cat类,拥有静态数据成员HowManyCats,记录Cat的个体数目;静态成员函数GetHowMany( ),获取HowManyCats.设计程序测试这个类,体会静态数据成员和静态 C语言中声明与定义的区别?通俗点 vs2008 如何找出一个函数的声明与定义 VB编程,输入平面上任一点的坐标(x,y),判断并显示该点位于哪个象限的信息. 请教“声明”的反义词是什么, 声明 反义词 一题C++,设计一个直线类Line.设计一个直线类Line,其中包含3个数据成员,用于描述直线方程的3 个系数,并声明一个友元函数,用于计算两条直线的交点,和显示函数,编程测试. 提示:两 在vb编程中如何进行字符和ASCII码之间的转换 声明一个一维字符型数组,有20个元素,每个元素最多包含10个字符.生成的字符分为4行,并输出字符数最多的 求文采高的大哥大姐!有没有“严重声明”这个词?郑重声明和严重声明有什么区别? 声明乃兴的兴是什么意思 声明鹤起的鹤是什么意思 金色的鱼钩读后感作文 声明: