小编Kan*_*esh的帖子

我想在android中开发一个应用程序.要求是使用相机扫描文档并将扫描数据转换为pdf文件,以便它可以用作邮件中的附件.

请提供一些示例代码......谢谢.

我正在使用Visual Studio 2010创建Excel加载项.我想在用户单击组合键时运行一些代码.

这是我得到的代码

Public Class CC

Private Sub ThisAddIn_Startup() Handles Me.Startup
    EnableShortCut()
End Sub

Sub A1()
    MsgBox "A1"
End Sub

Sub A2()
    MsgBox "A2"
End Sub

Sub A3()
    MsgBox "A3"
End Sub

Public Sub EnableShortCut()
    With Application
        .OnKey "+^{U}", "A1"  'action A1 should be performed when user clicks  Ctrl + Shift + U
        .OnKey "+^{L}", "A2"  'action A2 should be performed when user clicks  Ctrl + Shift + L
        .OnKey "+^{P}", "A3"  'action A3 should be performed when user …

我想在联系人应用程序中使用fastscroll和albhabet索引器实现ListView.我正在使用SimpleAdapter来填充ListView.从图像中可以看出,通过从右侧的字母索引器中选择一个字母,listView选项将转到相应的ListItem.怎么做到这一点？请帮忙.

我正在使用kso​​ap2进行Web服务方法调用.我使用ksoap2-android-assembly-2.5.4-jar-with-dependencies.jar并能够从Web服务响应中检索标头值.我想保存任何返回的cookie,并随后调用Web服务返回它们.

我使用以下代码检索标头:

SoapSerializationEnvelope envelope = new SoapSerializationEnvelope(SoapEnvelope.VER11);

envelope.dotNet = true;

  envelope.setOutputSoapObject(request);

  HttpTransportSE androidHttpTransport = new HttpTransportSE(URL);

  List headerList = androidHttpTransport.call(SOAP_ACTION, envelope, null);

  for (Object header : headerList) {
      HeaderProperty headerProperty = (HeaderProperty) header;
      String headerKey = headerProperty.getKey();
      String headerValue = headerProperty.getValue();     
  }

Run Code Online (Sandbox Code Playgroud)

我试图将它保存在SharedPreferences中,但没有成功.我这么冷啊？请帮忙.

提前致谢.

我开发了一个应用程序,我可以在其中扫描QR码.我想将此扫描数据打印到网络打印机.

我在网上搜索过,但找不到相同的源代码.我得到的一些解决方案是使用Google云打印和一些应用程序,如PrintShare.

我想要的是开发应用程序,找到连接到我的Android设备所连接的WiFi网络的打印机并打印扫描数据.请帮忙.

我有一个MyBugList使用以下类创建的错误列表

internal class BugDetails
{
    public int Id { get; set; }
    public string State { get; set; }
    public string Severity { get; set; }
}

我想基于State和分组这些错误Severity.我使用以下代码来实现它.

var BugListGroup = (from bug in MyBugList
                             group bug by new
                             {
                                 bug.State,
                                 bug.Severity
                             } into grp
                             select new
                             {
                                 BugState = grp.Key.State,
                                 BugSeverity = grp.Key.Severity,
                                 BugCount = grp.Count()
                             }).OrderBy(x=> x.BugState).ToList();

这个linq查询给出了如下输出

Closed      Critical    40
Active      Critical    167
Closed      Medium      819
Closed      Low         323
Resolved    Medium …

我有一个共享的宏启用工作簿用于进行测验.我可以选择配置可以借助计算机名称访问测验的用户.一切都很好.但是,我想介绍一个功能来记录工作簿中的主要内容.用户不会手动输入任何内容.所有条目都使用userforms进行.

我创建了一个sub,每次用户执行我需要捕获的操作时都会运行.当单个用户处于活动状态时,代码就像魅力一样.当多个用户同时访问该文件时,会出现此问题.

问题是,用户会看到提示选择在关闭工作表时获胜的更改.我不希望这种情况发生.无论如何,可以删除提示并保存所有更改.

有没有解决方法呢？下面是我现在的代码.

Sub Actions()
    QA_Quiz_Master.Save
    Application.ScreenUpdating = False
    UN = Evaluate("=UserNameWindows()")
    QuizN = Sheet4.Range("F2").Value
    totlog = Log.Range("A1048576").End(xlUp).Row + 1
    Select Case Action
        Case "Open"
            Log.Range("C" & totlog).Value = "Accessed"
        Case "Start"
            Log.Range("C" & totlog).Value = "Started Quiz"
        Case "Submit"
            Log.Range("C" & totlog).Value = "Submitted Quiz"
        Case "AdminContact"
            Log.Range("C" & totlog).Value = "Contacted Admin"
        Case "AccessRequest"
            Log.Range("C" & totlog).Value = "Sent Access Request"
        Case "Publish"
            Log.Range("C" & totlog).Value = "Published Quiz"
        Case "Republish"
            Log.Range("C" & totlog).Value = "Republished Quiz" …

我正在使用Visual Studio 2010创建Excel加载项.我的目的是向单元格添加上下文菜单,并对选定的单元格执行某些操作.这是我现在的代码

    Public Class CC

    Private Sub ThisAddIn_Startup() Handles Me.Startup
        AddMenu()
    End Sub

    Private Sub ThisAddIn_Shutdown() Handles Me.Shutdown
        DeleteMenu()
    End Sub

    'AddMenu add context menu to excel
    Sub AddMenu()
        On Error Resume Next
        Dim Bar As Microsoft.Office.Core.CommandBar
        Dim NewControl As Microsoft.Office.Core.CommandBarControl
        Application.CommandBars("Cell").Controls("A").Delete()
        Bar = Application.CommandBars("Cell")
        NewControl = Bar.Controls.Add(Microsoft.Office.Core.MsoControlType.msoControlPopup, Id:=1, Temporary:=True)

        With NewControl
            .Caption = "A"
            .BeginGroup = True
            .TooltipText = "Change case of selected cells."
        End With

        With NewControl.Controls.Add(Microsoft.Office.Core.MsoControlType.msoControlButton)
            .Caption = "A1"
            .FaceId = 1144
            .OnAction = "A1"
        End …