题目

编写一个将十进制数转换为二进制的VB自定义函数，完成划线处应填的语句。 Function dTOb(x As Integer)As String Dim s As String Do While x>0 If x Mod 2=0 Then s="0"Else s="1" x=x\2 Loop End Function 答案：【1】dTob=s+dTob

查看本题答案和解析