VB 翻译C# 在线等待！！！

Question

[b]For i = 1 To 128
  bitinfo = tempzw(i)
  bitmap = &H80
  For k = 1 To 8
     getbit = bitinfo And bitmap
   If getbit = 0 Then
    Picture1.FillColor = &H0
   Else
   Picture1.FillColor = &HF0
   End If
     Picture1.Circle ((i - 1) * 6 + 2, (k - 1) * 6 + 2), 3, &H80
  bitmap = bitmap / 2
  Next k
Next i

Answer 1

这个代码没法直接转换成C#。简单地说，这个的功能是画图。好像是渐变画圆。你在C#引用System.Drawing，用对应的作图类去实现等效的功能就可以了。

Answer 2

http://www.developerfusion.com/tools/convert/vb-to-csharp/

Answer 3

补充一下 Dim bitinfo ，bitmap As Byte  &H80是十六进制  tempzw是256数组