Question

用VB编写程序设计猜数游戏窗体

程序提示所输数字是大了小了（msgbox），直至猜出，此时显示“你猜对了，共猜了N次”（N为实际输入数字次数）信息提示
不是C语言。不要用特难特深的，只是简单地vba编程。

Answer 1

看不懂 啊，

Answer 2

Option Explicit

Private Sub Command1_Click()
Dim Tar%, Tmp%, C%, Rsp$
Randomize
Tar = Int(Rnd * 100) + 1
Tmp = InputBox("猜猜是几？1~100 ", "Just Guess")
C = C + 1
Do While Tmp <> Tar
Select Case Tar - Tmp
Case Is > 0
Rsp = "小了！ "
Case Is < 0
Rsp = "大了！ "
End Select
Tmp = InputBox(Rsp, "Just Guess")
C = C + 1
Loop
MsgBox Tar & "！ 终于猜对了！", , "猜测次数：" & C
End Sub

追问

我试了。弄不出来阿，不是整数。
没有相减=0的时候

追答

=0? 那就是猜中了，跳出循环。
都试好了才给你了，到你哪儿就不好了？

追问

Tar%, Tmp%, C%, Rsp$什么东西= =