[填空题] 在窗体上建立名称为Text1、Text2和删的三个文本框，其中Text1和Text2文本框用来接受两个整数(假设为M和N)，建立一个名称为command1的命令按钮，单击它将得到数M从右边

15 查阅

[填空题] 在窗体上建立名称为Text1、Text2和删的三个文本框，其中Text1和Text2文本框用来接受两个整数(假设为M和N)，建立一个名称为command1的命令按钮，单击它将得到数M从右边起的N位数字，并把该数字显示在Text3文本框中，如下图所示。请填空。

private Fuction digit(ByVal m As Integer, ByVal n As Integer) As Integer

Dim i As Integer

For i = 1 To n - 1

M=m 10

Next i

Digit= 【6】

End Function

Private Sub Command1_Click()

Dim m As Integer，n As Integer，k As Integer

m=Val(Text1.Text)

n=Val(Tex2.Text)

k= 【7】

Text3.Text = Str(k)

End Sub

参考答案:

m Mod A0 digit(m, n)

本题digit函数的作用是求第一个形参m从右数的第n(第二个形参)位数字。为求m的第n位数字，可先让m除以10n-1(上标)，再求商除以10的余数，该余数就是所需要的数字。因此【6】处应填“m Mod 10”。当发生Command1_Click事件时，将调用该函数求得m和右数第n位数字，因此在【7】处应填函数调用“digit(m, n)”。

计算机考试