Giao diện MSFleGrid là gì vậy bạn, tôi chưa nghe bao giờ?
Private Sub MSFlexGrid1_KeyPress(KeyAscii As Integer)
If KeyAscii <> 8 Then
Me.MSFlexGrid1.Text = Me.MSFlexGrid1.Text + Chr$(KeyAscii)
Else
If Len(Me.MSFlexGrid1.Text) > 0 Then
Me.MSFlexGrid1.Text = Mid(Me.MSFlexGrid1.Text, 1, Len(Me.MSFlexGrid1.Text) - 1)
End If
End If
End Sub
Private Sub MSFlexGrid1_KeyUp(KeyCode As Integer, ByVal Shift As Integer)
If KeyCode = 46 Then Me.MSFlexGrid1.Text = ""
End Sub
ý mình là có doan code nhỏ nào để tránh được việc lỗi font không,mình chuyển sang file dbf để Famis đọc được.những thông tin trên Excel là thông tin về Bản đồ địa chính,mà lại không có dấu thì không được bạn à.Hầu như tất cả các phần mềm Kế toán do các lập trình viên chuyên nghiệp lập hiện nay đều dùng kể cả trên VB hay VS Foxpro. Nếu có điều kiện nên học, nó hay lắm đấy.
Ý mình "cực chẳng đã" là phải viết *. prg để chuyển font thôi. Cần thiết thì chữa cháy bằng cách dùng Unikey chuyển chuyển file Excel sang không dấu trước khi Convert dùng tạm.
Mình cũng đang thiết kế một form trong VBE excel 2007 mà mình không đưa được MSHflexGrid lên form. Mặc dù trong Toolbox đã có. Khi kích và đưa lên form nó báo lỗi " The subject is not trusted for the specified action.". Mọi người giúp mình với nhé!