UC知道求用visual studio.net中的VB写一段程序
来源：百度知道 编辑：UC知道 时间：2024/06/03 12:14:09
清华附中有四位同学中的一位做了好事，不留名，表扬信来了之后，校长问这四位是谁做的好事。
A说：不是我。
B说：是C。C说：是D。D说：他胡说。
已知三个人说的是真话，一个人说的是假话。现在要根据这些信息，找出做了好事的人
麻烦各位不要用VB6.0的代码。。。
我需要以下这种形式的代码。谢谢
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox("谢谢使用，程序结束", MsgBoxStyle.OKOnly, "结束")
End
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Label1.Text = ""
Button3_Click(Me, e)
End Sub
A说：不是我。
B说：是C。C说：是D。D说：他胡说。
已知三个人说的是真话，一个人说的是假话。现在要根据这些信息，找出做了好事的人
麻烦各位不要用VB6.0的代码。。。
我需要以下这种形式的代码。谢谢
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox("谢谢使用，程序结束", MsgBoxStyle.OKOnly, "结束")
End
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Label1.Text = ""
Button3_Click(Me, e)
End Sub
public void guess()
{
int a= 0;
int b=0;
int c=0;
int d=0;
for (int i = 1; i < 5; i++)
if (i == 1) { a = 1; }
else if (i == 2) { a = 0; b = 1; }
else if (i == 3) { a = 0; b = 0; c = 1; }
else if (i == 4) { a = 0; b = 0; c = 0; d = 1; }
a = 0;
c = 1;
d = 1;
d = 0;
if ((a + b + c + d) == 1)
{ if(a==1)
MessageBox.Show("a");
else if(b==1)
MessageBox.Show("b");
else if(c==1)
MessageBox.Show("c");
else if(d==1)
MessageBox.Show("d");
}
}
输出c 证明c做了好事
代码都给你了 还不会用 自己改