请大家帮忙解释下语句第3部分谢谢 - VB6论坛

问题点数：0 回复次数：0

请大家帮忙解释下语句第3部分谢谢

If (v_lngRGBStartColor <> v_lngRGBEndColor) Then
      Call g_subGetRGBColors(v_lngRGBStartColor, l_lngStartRed, l_lngStartGreen, l_lngStartBlue)
      Call g_subGetRGBColors(v_lngRGBEndColor, l_lngEndRed, l_lngEndGreen, l_lngEndBlue)

      l_sngRedOffset = (CSng(l_lngEndRed - l_lngStartRed) / (l_lngScaleHeight - l_sngTextHeight))
      l_sngGreenOffset = (CSng(l_lngEndGreen - l_lngStartGreen) / (l_lngScaleHeight - l_sngTextHeight))
      l_sngBlueOffset = (CSng(l_lngEndBlue - l_lngStartBlue) / (l_lngScaleHeight - l_sngTextHeight))
   Else
      Call g_subGetRGBColors(v_lngRGBStartColor, l_lngCurrentRed, l_lngCurrentGreen, l_lngCurrentBlue)
   End If

搜索更多相关主题的帖子: 语句　 CSng　Call　lngEndBlue　lngEndGreen　