关于Basic语言的一些问题

我是用VisualBasic6.0的,才刚刚接触~~~最近发现由于自己对Basic语言的不熟悉,导致不能编好,希望各位能帮小弟一个忙~首先,我用比较简单的Inputbox... 我是用Visual Basic 6.0的,才刚刚接触~~~最近发现由于自己对Basic语言的不熟悉,导致不能编好,希望各位能帮小弟一个忙~
首先,我用比较简单的Inputbox来设定密码,可是打出来是原文,就是不象那些打上去变成“*”的那样,那么请问加什么上去才可以实现这个效果?
其次,我做了一个猜数游戏,像下面一样:
Private Sub Form_click()
Dim x As Integer
Dim guess As Single
x = Rnd(10) * 100 + 1
guess = InputBox("请输入你猜的数字(1-100)", "猜猜看")
Do While guess <> x
If guess > x Then
Print guess; "太大了"
Else
Print guess; "太少了"
End If
guess = InputBox("请输入你猜的数字(1-100)", "猜猜看")
Loop
Print "恭喜你,你猜对了!"
End Sub

调试时发现如果在guess的Inputbox中输入一些较大的数或者一些字母和汉字,就会出现数据“溢出”,我怎么试也不能修复它,请问如何解决?
如果对上面的程序有建议的话提议一下,谢谢大家~!
对于你的建议,我有些不明白,你可以说明一下具体的代码吗?
展开
 我来答
甲甲虫
2006-09-03 · TA获得超过976个赞
知道小有建树答主
回答量:648
采纳率:0%
帮助的人:429万
展开全部
input前加val()转换一下。
另外既然你输入的数字不带小数,那最好是把guess定义为long

要实现“*”显示,需要再加入一个窗体,加入Textbox,将其Password属性设置为“*”,将窗体用vbmodel显示,返回时检查输入。。。
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式