30. oktober 2003 - 16:13Der er
6 kommentarer og 1 løsning
skrive ind i TextBox via tekstdokument
jeg har tænkt mig at lave sådan en side, med opdateringer til mit lille program... men jeg kan ik få det til at virke.... har flg. kode: --- Private Sub Form_Load() Dim strVariable As String Text1.Text = "" Open "C:\Documents and Settings\MyUser\Skrivebord\Programmering\VB\Eraser\" & _ "versions.txt" For Input As #1 Line Input #1, strVariable Do Until (EOF(1) = True) Text1.Text = Text1.Text & vbNewLine & strVariable & vbNewLine Line Input #1, strVariable Loop End Sub --- Og jeg har oz prøvet med en DataSource, men der var der så heller ik noget held i.... "any help appreciated" :D
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Private Sub Form_Load() Dim strLine As String Text1.Text = "" Open "versions.txt" For Input As #1 Do While Not EOF(1) Line Input #1, strLine Text1.Text = Text1.Text & strLine & vbCrLf Loop Close #1 End Sub
du har 2 x "Line Input #1, strVariable" og den sidste for du ikke med
Line Input #1, strVariable '<- Her Do Until (EOF(1) = True) Text1.Text = Text1.Text & vbNewLine & strVariable & vbNewLine Line Input #1, strVariable '<- Her
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
