VB中的两位数怎么取十位上的数字?

来源：百度知道 编辑：UC知道 时间：2024/07/08 19:47:21
VB中的两位数怎么取十位上的数字?
Dim bb As Single
Dim aa As Integer

bb = InputBox(" 请输入分数")
aa = bb / 10
结果bb=66的时候，aa是7

1、打开VB6.0软件，新建一个标准exe工程；

2、在设计界面上添加两个Label控件、两个Text控件和一个Command控件；

3、各个控件属性按照下图设计，然后双击Command控件，进入代码编辑界面，输入代码如下：

Private Sub Command1_Click()
Dim n As Integer, a As Integer, b As Integer
n = InputBox("请输入一个两位数")
a = n \ 10
b = n Mod 10
Text1.Text = a
Text2.Text = b
End Sub

VB中的两位数怎么取十位上的数字? 一个两位数,把它十位上的数----------- 一个两位数,十位上的数比个位上的数小1,十位与个位上的数的和是这个两位数的25% 一个两位数，十位上的数与个位上的数的和是12， 一个两位数，个位上的数是十位上的数的3倍., 一个两位数，十位上的数比个位上的数小1，十位与个位上的数的和是这个两位数的1/5，求这个两位数。 一个两位数,十位上的数比个位上的数小1,十位与个位上的数的和是这个两位数的五分之一,求这个两位数 有一个两位数，它十位上的数比个位上的数小2，如果这个两位数大于20幷且小于40，求这两个数。 一个两位数，其个位上比十位上的数大2，已知这个两位数大于40而小于60，求这个两位数？（最好用不等式做 一个两位数,个位上的数比十位上的数大5,个位上的数与十位上的数的和是9,求这个两位数.