У нас вы можете посмотреть бесплатно اكتب نص واحسب عدد الحروف وعدد تكرار الحروف داخل النص ... فيجوال بيسك دوت نت ..الكود اسفل الفيديو или скачать в максимальном доступном качестве, видео которое было загружено на ютуб. Для загрузки выберите вариант из формы ниже:
Если кнопки скачивания не
загрузились
НАЖМИТЕ ЗДЕСЬ или обновите страницу
Если возникают проблемы со скачиванием видео, пожалуйста напишите в поддержку по адресу внизу
страницы.
Спасибо за использование сервиса ClipSaver.ru
اكتب نص واحسب عدد الحروف وعدد تكرار الحروف داخل النص فيجوال بيسك دوت نت Basic for you Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim strText As String = Trim(TextBox1.Text) MsgBox("طول النص شامل المسافات: " & Len(strText)) MsgBox("طول النص بدون المسافات: " & Len(Replace$(strText, " ", ""))) End Sub Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click Dim LetterToFind = Trim(TextBox2.Text) Dim Sentence = Trim(TextBox1.Text) 'answer should be 3 Dim myCount = Aggregate c As Char In Sentence Where c.ToString.ToLower = LetterToFind.ToLower Into Count() MessageBox.Show(myCount)