作业帮 > 数学 > 作业

写VB,画流程图.输入任意实数x,求1/(x-5)的绝对值 若分母为零则输出"有误"

来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/08/27 13:46:52
写VB,画流程图.输入任意实数x,求1/(x-5)的绝对值 若分母为零则输出"有误"
急求啊 ,今天就要
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a = Val(InputBox("请输入一个不为0数"))
Text1 = Abs(1 / (a - 5))
If a