尺寸标注怎么确定基准:VB的题目
来源：百度文库 编辑：查人人中国名人网 时间：2024/04/30 13:46:41
1.求出所有的水仙花数.
水仙花是指三位的正整数,其各位数字的立方和等于该正整数本身.例如: 407=4*4*4+0*0*0+7*7*7
2.使用VB表达式表示以下各题.
⑴产生一个11-99的随机数;
⑵将一个两位数的个位和十位数对换;
⑶将一个Single型变量X的值取两位小数；
⑷取字符串变量String1的右边5个字符。
水仙花是指三位的正整数,其各位数字的立方和等于该正整数本身.例如: 407=4*4*4+0*0*0+7*7*7
2.使用VB表达式表示以下各题.
⑴产生一个11-99的随机数;
⑵将一个两位数的个位和十位数对换;
⑶将一个Single型变量X的值取两位小数；
⑷取字符串变量String1的右边5个字符。
第1题：
Dim i As Long, j As Long, k As Long
For i = 1 To 9
For j = 0 To 9
For k = 0 To 9
If i ^ 3 + j ^ 3 + k ^ 3 = i & j & k Then Print i & j & k
Next k
Next j
Next i
第2题：
1、Int(Rnd * 89) + 11
2、(Number mod 10)*10+Number\10
3、format(X,"##.##")
4、right(String1,5)