Giúp mình bài này với .

[tang_bn]

Mình đang làm 1 bài để in ra bảng cửu chương mà nó cứ báo lỗi chỗ Right mình không hiểu, mình đã thử chuyển kiểu mà không được.
Private Sub Btn29_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn29.Click
Dim i As Integer
Dim j As Integer
Dim Xh As String
Dim Ch As String
Xh = Chr(13) & Chr(10)
For i = 2 To 9
For j = 1 To 9
If i = 2 Then
Ch = Ch & " " & i & " x " & j & " = " & i * j & Xh
Lbl2.Text = Right(Ch, Len(Ch) - 1)
End If
If i = 3 Then
Ch = Ch & " " & i & " x " & j & " = " & i * j & Xh
Lbl3.Text = Right(Ch, Len(Ch) - 2)
End If
If i = 4 Then
Ch = Ch & " " & i & " x " & j & " = " & i * j & Xh
Lbl4.Text = Right(Ch, Len(Ch) - 2)
End If
If i = 5 Then
Ch = Ch & " " & i & " x " & j & " = " & i * j & Xh
Lbl5.Text = Right(Ch, Len(Ch) - 2)
End If
If i = 6 Then
Ch = Ch & " " & i & " x " & j & " = " & i * j & Xh
Lbl6.Text = Right(Ch, Len(Ch) - 2)
End If
If i = 7 Then
Ch = Ch & " " & i & " x " & j & " = " & i * j & Xh
Lbl7.Text = Right(Ch, Len(Ch) - 2)
End If
If i = 8 Then
Ch = Ch & " " & i & " x " & j & " = " & i * j & Xh
Lbl8.Text = Right(Ch, Len(Ch) - 2)
End If
If i = 9 Then
Ch = Ch & " " & i & " x " & j & " = " & i * j & Xh
Lbl9.Text = Right(Ch, Len(Ch) - 2)
End If
Next
Ch = ""
Next
End Sub
End Class

Cảm ơn trước nhé.

[Mùa Thu]

Bạn dùng Visual Basic.NET à?
Nếu vậy mấy hàm Left, Right cắt chuỗi hết xài rồi, trừ khi bạn viết đầy đủ như vầy (hay Imports):


Microsoft.VisualBasic.Right(Ch, Len(Ch)-1)
Theo tôi thấy ví dụ của bạn có thể thay:

Right(Ch, Len(Ch) - 1)
bằng:

Mid(Ch, 1, Len(Ch) - 1)