No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
4 Posted Topics
 | add Data Control and in its Properties Link its Database(name) path and Record Source to the Field needed to show up and in data grid properties Select Data Source as Data1 |
| | simple : use Two Command buttons as an example, Private Sub Command1_Click() Text1.Font = "Arial" End Sub Now whatevet types will show up in English Private Sub Command2_Click() Text1.Font = "Arabic" ' Select any Arabic Font Name Her from Your System Fonts End Sub Now whatevet types will show up … |
| | Dim a As String a = Text1 ' TextName If Text1 = " " Then MsgBox "Please Enter a Name" Else Label1.Caption = "Hello there" & a Text1 = " " ' Tested akg End If |
| | Private Sub Text1_KeyPress(KeyAscii As Integer) If (KeyAscii > 64 And KeyAscii < 91) Or (KeyAscii > 96 And KeyAscii < 123) Then Text1 = Text1 Else KeyAscii = o Beep MsgBox " a To z and A To Z only" End If ' Tested akg suresh End Sub |
The End.