Question

VB中怎样把ARGB颜色各分量提取出来呢？

Answer 1

rgb值的格式为（16进制）：0x00bbggrr

1. 提取rgb各分量值：
Function RGBbit(ByVal RGB&, blue%, green%, red%)
blue = ((RGB And &HFF0000) \ &H10000)
green = ((RGB And &HFF00&) \ &H100)
red = (RGB And &HFF&)
End Function
调用方法：定义3个变量r,g,b 整形，Call RGBbit(13870724, r, g, b)

2. 由三色获得RGB值
Function RevRGB(blue%, green%, red%) As Long
RevRGB = (blue * &H10000) + (green * &H100&) + red
End Function

Answer 2

参考答案:力度和音乐中的其他要素一样,在音乐表现中是非常重要的,是不应忽视的。音乐力度的强或弱和乐曲的内容有着密切的关系。例如摇篮曲总是用较轻的声音来演唱或演奏的,这类音乐的内容与强的声音是有矛盾的；而隆重的、胜利的、具有战斗性的乐曲,却需要用强的声音来演唱或演奏,这类音乐的内容与轻的声音是有一定距离的。利用力度的变化还可以获得鲜明的强弱对比,来有力的塑造音乐形象。