Edit - NEVER MIND I SUCCEED
I turned the individual FlexGrind WordWrap to True. (FlexGrid Properties).
*TOPIC*
the result i want to get, for example:Code:Private Sub ThreeModeClickEnable(code As Integer) Set rs1 = conAccess.Execute("select * from tblInstructorRoomSchedule where instructorCode = " & code) If Not txtGroupCode.Text = -1 And Not txtInstructorCode.Text = -1 And Not txtRoomRow.Text = -1 Then bcolor = 8 Else bcolor = 0 End If If Not rs1.EOF Then rs1.MoveFirst While (Not rs1.EOF) flxRoomSchedule.Col = rs1.Fields("scheduleDay").Value flxRoomSchedule.Row = rs1.Fields("scheduleHour").Value flxRoomSchedule.TextMatrix(flxRoomSchedule.Row, flxRoomSchedule.Col) = flxInstructors.TextMatrix(txtInstructorCode.Text, 1) & _ " " & flxInstructors.TextMatrix(txtInstructorCode.Text, 2) & vbNewLine & "hello" flxRoomSchedule.CellBackColor = QBColor(bcolor) rs1.MoveNext Wend End If End Sub
Mike Mall
hello
what i get now
Mike Mallבהhello
thanks![]()


Reply With Quote

