hic. anh làm ơn show lên tí code đi , hỏi thế này đến tía em cũng chịu
Mình làm câu hỏi trắc nghiệm 5 câu mỗi câu có 4 đáp án A B C D
khi mình đưa lần lượt ra file word thì từ câu 1 đến câu 4 bị mất mất câu trả lại D , câu 5 thì lại thấy có
chả hiểu sao?
mong mọi người chỉ giùm @@
hic. anh làm ơn show lên tí code đi , hỏi thế này đến tía em cũng chịu
câu 1 đến câu 4 bị mất mất câu trả lại D
câu trên có nghĩ là gì zậy bạn
nếu bạn ghi vào mà ghi đè thì những câu 1 2 3 4 sẽ mất thui
bạn làm thế này
StreamWriter stream = new StreamWriter("123.txt", true)
stream.WriteLine(cau1);
stream.WriteLine(cau2);
stream.WriteLine(cau3);
stream.WriteLine(cau4);
stream.Close();
hi
mình dùng "doc.Paragraphs.Add"
code cua mình đây (hơi dài mong các bác thông cảm) :
word.Application wrd = new Microsoft.Office.Interop.Word.Application();
object obj = Type.Missing;
word.Document doc = wrd.Documents.Add(ref obj, ref obj, ref obj, ref obj);
word.Range range = doc.Range(ref obj, ref obj);
word.Paragraph wP = doc.Paragraphs.Add(ref obj);
string a = "";
string b = "";
string c= "";
string d = "";
string dAn = "";
string sql = "select Cau,CauHoi,A,B,C,D,DapAn from CauHoi where MaKT='"+maKyThi+"' AND MaMon='"+maMon+"'";
SqlConnection con = kn.TaoKetNoi();
con.Open();
SqlCommand cmd = new SqlCommand(sql, con);
SqlDataReader reader = cmd.ExecuteReader();
while(reader.Read())
{
wP.Range.Text = "Câu " + reader[0].ToString().Trim()+":\t" + reader[1].ToString().Trim() + "\n";
a = reader[2].ToString().Trim();
b = reader[3].ToString().Trim();
c = reader[4].ToString().Trim();
d = reader[5].ToString().Trim();
dAn = reader[6].ToString().Trim();
switch(dAn)
{
case "A":
{
wP.Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorBlue;
wP.Range.Text = "A:\t" + a + "\n";
wP.Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorBlack ;
wP.Range.Text = "B:\t" + b + "\n";
wP.Range.Text = "C:\t" + c + "\n";
wP.Range.Text = "D:\t" + d;
break;
}
case "B":
{
// wP.Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorBlack ;
wP.Range.Text = "A:\t" + a + "\n";
wP.Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorBlue;
wP.Range.Text = "B:\t" + b + "\n";
wP.Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorBlack ;
wP.Range.Text = "C:\t" + c + "\n";
// wP.Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorBlack ;
wP.Range.Text = "D:\t" + d;
break;
}
case "C":
{
wP.Range.Text = "A:\t" + a + "\n";
wP.Range.Text = "B:\t" + b + "\n";
wP.Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorBlue;
wP.Range.Text = "C:\t" + c + "\n";
wP.Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorBlack ;
wP.Range.Text = "D:\t" + d;
break;
}
case "D":
{
wP.Range.Text = "A:\t" + a + "\n";
wP.Range.Text = "B:\t" +b + "\n";
wP.Range.Text = "C:\t" + c + "\n";
wP.Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorBlue;
wP.Range.Text = "D:\t" + d;
wP.Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorBlack ;
break;
}
}
mình chỉ in đc đáp án A ,B,C của câu 1 2 3 4 không in đc đáp án D
còn câu 5 thì vẫn in dc cả 4 đáp án
hik dc rôi
thieu moi "\n" ở chỗ in ra câu D hik