求高手解答学渣ACCESS的问题(⊙_⊙)
请高手告诉我下面这几道题应该怎么写代码可以吗?告诉我一道也行。感激不尽!P.S我只有5分了不能悬赏了。。(⊙_⊙)使用列表框输出“*”打印的斜三角形在文本框中输入一串字符...
请高手告诉我下面这几道题应该怎么写代码可以吗?告诉我一道也行。感激不尽!P.S我只有5分了不能悬赏了。。(⊙_⊙)
使用列表框输出“*”打印的斜三角形
在文本框中输入一串字符处,点击“去除空格”按钮,可以除掉字符串中空格,并把除掉空格的字符串在标签中显示。
在文本框(Text0)输入正整数n,将其转化为二进制数C,通过文本框(Text2)输出。
在文本框中输入文本信息,点击“统计”按钮,可以统计出字符串长度,并在对话框中输出。
在文本框中输入1到12的数字,通过标签显示英文的对应月份。 展开
使用列表框输出“*”打印的斜三角形
在文本框中输入一串字符处,点击“去除空格”按钮,可以除掉字符串中空格,并把除掉空格的字符串在标签中显示。
在文本框(Text0)输入正整数n,将其转化为二进制数C,通过文本框(Text2)输出。
在文本框中输入文本信息,点击“统计”按钮,可以统计出字符串长度,并在对话框中输出。
在文本框中输入1到12的数字,通过标签显示英文的对应月份。 展开
1个回答
展开全部
me.label.caption=replace(me.text," ","")
Private Sub 二进制_Click()
Dim n, m As Long
Dim c As String
n = Me.Text0
Do While n > 0
m = n Mod 2
n = n \ 2
c = Trim(Str(m)) + c
Loop
Me.Text2 = c
End Sub
msgbox len(me.text)
Me.Label1.Caption = Format$(DateSerial(2014, Me.Text0, 1), "mmmm")
一共17道题, 可以给你全部答案
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询