VB中使用inputbox函数后 在对话框点取消按钮报错该如何解决?

VB中使用inputbox函数后 在对话框点取消按钮报错该如何解决?,第1张

啊,你的意思是,当点击取消按钮、或者是那个叉号按钮时,就重新打开这个对话框呗。

那就不要把InputBox的返回值直接赋值整数变量x

因为InputBox的返回值是字符串型,即文本型,

所以你要先把InputBox的值赋值给文本型变量,

然后用StrPtr函数转化一下,

如果用StrPtr函数转化后的值为0,说明点了取消或叉号,

如果用StrPtr函数转化后的值大于0,说明点了确定按钮,

Sub test()

    Dim s$, x%

    Do

        s = InputBox("请输入X的值")

    Loop Until StrPtr(s) '如果点的是确定则终止循环

    '当循环终止后,进行如下处理:

x = Val(s) '将文本s转化为数值赋值给x

    Select Case x '用select语句Select判断x的值

    Case Is < 0

        MsgBox "你输入了小于0的整数", 64

    Case Is < 100

        MsgBox "你输入了大于等于0且小于100的整数", 64

    Case Is < 300

        MsgBox "你输入了大于等于100且小于300的整数", 64

    Case Else

        MsgBox "你输入了大于等于300的整数", 64

    End Select

End Sub

错误发生在html代码这里:

<label binding="testBox1" />

应该改为

<label binding="testBox1"></label>

另一个label也要这样改。

不要以为input可以这样写就所有没内容的标签都可以这样写哦,只有html规定可以没有结束标记的标签才可以这样写的,比如<br/><img/><input/><link/><option/>等,而其他大部分标签都是需要结束标记的(即使这个标签的内容是空白的)。很明显的一个例子就是当网页的head区需要引用css和js时,区别就出来了:

<link href="css文件" type="text/css" />

<script src="js文件"></script>

代码如下

class Box{

private int width;

private int length;

private int height;

public Box(int width,int length,int height){

thiswidth = width;

thislength = length;

thisheight = height;

}

public void showBox(){

Systemoutprintln("盒子的width、length、height分别为"+width+","+length+","+height);

}

}

如果有帮助到你,请点击采纳

楼主你好~如果是WinForm程序的话,那么可以使用TextBoxPasswordChar属性设定一个屏蔽符号,这时候输入文本框的任何信息都会被符号屏蔽,类似密码框。如果是WPF程序,可以直接使用控件PasswordBox,使用Password属性来读取当前输入的内容。如果楼主想要实现的是不管用户输入什么内容,文本框内不显示任何东西,但是仍然能取到文本值的话,那么请在XXXXXXChanged事件中做相应处理,似的输入值被存到一个目标中,并把文本框清空。请追问~

这是用js实现 的。可以写js控制。控制textbox的两个属性默认灰色的提示输入数据格式

当鼠标移上去的时候也就是textbox获得焦点的时候清空提示恢复原样。这是用js的事件写出来的,现在我也不记得那个具体代码怎么写,你可以百度一下Js获取焦点事件。有写的很清楚的 我试了一下。

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/langs/12184497.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-21
下一篇 2023-05-21

发表评论

登录后才能评论

评论列表(0条)

保存