题目

一个十进制整数的二进制表示中，如果数字“1”的个数多于数字“0”的个数，则称该整数为A类数。如十进制整数26的二进制表示为11010，26是一个A类数。下列VB程序的功能是寻找前1000个自然数中所有A类数，在List1中输出，并将统计个数在Text1中输出。 （1） 十进制数37（选填：是/不是）A类数。 （2） 请在划线处填入合适的代码。Private Sub Command1_Click( )Dim i As Integer, n As IntegerDim s As Integer ‘s为A类数的个数Dim t As Integer ‘t为二进制数中 “1” 同时掷两个质地均匀的正方体骰子，骰子的六个面上分别刻有1到6的点数，则两个骰子向上的一面的点数和为8的概率为 [　　] A． B． C． D．