求两段简单VB作业的代码，进来看看

1.编写程序，输入两实数，再输入+、-、*、/，根据运算符计算并输出者两个数的和差积商。要求用标签或文字框显示表达和运算结果
2用户想好一个两位数X，由计算机来猜这个数。当计算机猜出的数比X大时，用户输入1，当计算机猜出的数比X小时，用户输入-1，当计算机猜中时，用户输入0.这一过程一直进行到计算机猜中为止。编写这样一个猜数程序。

将以下内容复制到记事本 另存为frm1.frm 窗体文件
VERSION 5.00
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 1140
ClientLeft = 60
ClientTop = 450
ClientWidth = 7005
LinkTopic = "Form1"
ScaleHeight = 1140
ScaleWidth = 7005
StartUpPosition = 3 '窗口缺省
Begin VB.CommandButton Command1
Caption = "计算"
Height = 375
Left = 6240
TabIndex = 5
Top = 360
Width = 615
End
Begin VB.TextBox Text4
Height = 375
Left = 4800
TabIndex = 3
Top = 360
Width = 1215
End
Begin VB.TextBox Text3
Height = 375
Left = 3000