第7章 用户界面设计(6学时理论+4学时上机)课件.ppt

第7章 用户界面设计(6学时理论+4学时上机)课件.ppt

第7章用户界面设计(6学时理论4学时上机)课件

课堂编程,练一练,提高你的编程能力:;第7章 用户界面设计 ;;第7章 用户界面设计 7.1 常用控件 ;重要属性: Value属性:值为整型,表示复选框的状态 0 —vbUnchecked:未选定 1 —vbChecked :被选定 2 —vbGrayed:灰色,并显示一个选中标记 重要事件: Click事件;Function ish(n$) As Boolean ish = True For i = 1 To Len(n) \ 2 If Mid(n, i, 1) Mid(n, Len(n) + 1 - i, 1) Then ish = False Exit Function End If Next i End Function;Function isws (m%) As Boolean For i = 1 To m / 2 If m Mod i = 0 Then s = s + i End If Next i If m = s Then isws = True Else isws = False End If End Function;Sub delestr (s1$, s2$) If InStr(s1, s2) 0 Then s1

文档评论(0)

1亿VIP精品文档

相关文档