הי
פתחתי תוכנה קטנה, ב-Visual Studio 2012 בחרתי ב-Visual Basic + WPF...
עכישו אני לא מוצא ברשת איזו שפה זו - כי זה לא בדיוק Visual Basic (מה שכן - למדתי לתאם VB לשפה הזו)
(דרך אגב, זה הקוד הראשון שלי.. .שאני כתבתי מההתחלה ועד הסוף .. אם היה אפשר לפרסם פורומים מתחרים הייתי מפרסם את ההודעה שפרסמתי בה את התוכנה, אני רוצה שזה יופיע תחת שם אחיד, ופה זה שם אחר)
הנה קוד דוגמא: (זה רק חלק מהקוד, כמובן)
תודה לעוזריםקוד:Imports Microsoft.Win32 Class MainWindow Inherits System.Windows.Window Private Property BitMode As String Private Property BitModeEXE As String Private Property Version As String Private Property IsBitModeSaved As Boolean ' ** For multiple function to come from one If statement, use the : or write "And" to seperate between functions ' ** Private Sub Window_Loaded_1(sender As Object, e As RoutedEventArgs) ' Checks if there's saved setting If Not (My.Settings.OSBitSupport = "") Then ' If there Is saved setting BitMode = My.Settings.SavedBitMode 'setting it to local veri' ChooseDefaultBitMode() Else ' If no saved setting, generating GenerateArchitecture() End If End Sub Sub GenerateArchitecture() ' Automatic check if OS is 32 or 64 Bit using registry If Registry.LocalMachi.......essor\0").GetValue("Identifier").ToString.Contains("x86") Then : BitMode = "32" Else : BitMode = "64" : End If My.Settings.OSBitSupport = BitMode 'Saving setting My.Settings.SavedBitMode = BitMode 'Saving setting If BitMode = "32" Then Disable64BitOption() firstChooseDefaultBitMode() Else _64bit.IsEnabled = True firstChooseDefaultBitMode() End If firstChooseDefaultBitMode() End Sub Sub firstChooseDefaultBitMode() 'Checking and sending commands depending on the bit mode If My.Settings.OSBitSupport = "64" Then _64BitOS.Content = "Your system IS 64 Bit capable :)" Choose64BitMode() ElseIf My.Settings.OSBitSupport = "32" Then _64BitOS.Content = "Your system is NOT 64 Bit capable :(" Choose32BitMode() End If End Sub![]()



)
ציטוט ההודעה